\documentclass[twoside]{scrartcl}
\usepackage[frame]{xy}
\usepackage{tabularx}
\usepackage[latin1]{inputenc}
\setlength{\voffset}{0.5cm}
\setlength{\hoffset}{-2.0cm}
\setlength{\topmargin}{0cm}
\setlength{\headheight}{0.5cm}
\setlength{\headsep}{1cm}
\setlength{\topskip}{0pt}
\setlength{\oddsidemargin}{1.0cm}
\setlength{\evensidemargin}{1.0cm}
\setlength{\textwidth}{19.2cm}
\setlength{\textheight}{24.5cm}
\setlength{\footskip}{1cm}
\setlength{\parindent}{0pt}
\renewcommand{\baselinestretch}{1}
\begin{document}

\newlength{\descrwidth}\setlength{\descrwidth}{10cm}

\newsavebox{\hdr}
\sbox{\hdr}{
  \fontfamily{cmss}\fontsize{10pt}{12pt}\selectfont

  \parbox{\textwidth}{
    \parbox[b]{12cm}{
      <?lsmb company ?>
      
      <?lsmb address ?>}\hfill
    \begin{tabular}[b]{rr@{}}
    Telefoon & <?lsmb tel ?>\\
    Fax & <?lsmb fax ?>
    \end{tabular}

    \rule[1.5ex]{\textwidth}{0.5pt}
  }
}
    
\fontfamily{cmss}\fontshape{n}\selectfont

\markboth{<?lsmb company ?>\hfill <?lsmb invnumber ?>}{\usebox{\hdr}}

\pagestyle{myheadings}
%\thispagestyle{empty}     use this with letterhead paper

<?lsmb pagebreak 65 27 37 ?>
\end{tabular*}

\newpage

\markright{<?lsmb company ?>\hfill <?lsmb invnumber ?>}

\vspace*{-12pt}

\begin{tabular*}{\textwidth}{@{}lp{\descrwidth}@{\extracolsep\fill}rll@{}}
  \textbf{Nummer} & \textbf{Omschrijving} & \textbf{Aantal} &
    \textbf{Eenheid} & \textbf{Bin} \\
<?lsmb end pagebreak ?>


\fontfamily{cmss}\fontsize{10pt}{12pt}\selectfont

\vspace*{2cm}

<?lsmb shiptoname ?>

<?lsmb shiptoaddr1 ?>

<?lsmb shiptoaddr2 ?>

<?lsmb shiptoaddr3 ?>

<?lsmb shiptoaddr4 ?>

\vspace{3.5cm}

\textbf{P A K B O N} \parbox{0.3cm}{\hfill} \textbf{L I S T}

\hfill
\begin{tabular}[t]{l@{\hspace{0.3cm}}l}
  \textbf{Datum} & <?lsmb invdate ?> \\
  \textbf{Faktuurnummer} & <?lsmb invnumber ?> \\
  \textbf{Klantnummer} & <?lsmb customer_id ?>
\end{tabular}

\vspace{1cm}

\begin{tabular*}{\textwidth}{@{}lp{\descrwidth}@{\extracolsep\fill}rll@{}}
  \textbf{Nummer} & \textbf{Omschrijving} & \textbf{Aantal} &
    \textbf{Eenheid} & \textbf{Bin} \\
<?lsmb foreach number ?>
  <?lsmb number ?> & <?lsmb description ?> & <?lsmb qty ?> &
    <?lsmb unit ?> & <?lsmb bin ?> \\
<?lsmb end number ?>
\end{tabular*}


\parbox{\textwidth}{
\rule{\textwidth}{2pt}

\vspace{12pt}

<?lsmb if notes ?>
  <?lsmb notes ?>
<?lsmb end if ?>

}

\vfill
\centerline{\textbf{Dank voor uw gewaardeerde klandizie!}}

\end{document}

t</a>/<a href='/ledger-smb/tree/bin?id=6253305b511a0d1f058cbdf5fbc365fdc15f0003'>bin</a>/<a href='/ledger-smb/tree/bin/pe.pl?id=6253305b511a0d1f058cbdf5fbc365fdc15f0003'>pe.pl</a></div><div class='content'>blob: f1c11d35291a238302a19bc136cf92ec51136dce (<a href='/ledger-smb/plain/bin/pe.pl?id=6253305b511a0d1f058cbdf5fbc365fdc15f0003'>plain</a>)
<table summary='blob content' class='blob'>
<tr>
<td class='lines'><pre><code><ol class="hl">
<li id="n_1" class="hl"><span class="hl slc">#=====================================================================</span></li>
<li id="n_2" class="hl"><span class="hl slc">#&nbsp;LedgerSMB</span></li>
<li id="n_3" class="hl"><span class="hl slc"># Small Medium Business Accounting software</span></li>
<li id="n_4" class="hl"><span class="hl slc"># http://www.ledgersmb.org/</span></li>
<li id="n_5" class="hl"><span class="hl slc">#</span></li>
<li id="n_6" class="hl"><span class="hl slc">#</span></li>
<li id="n_7" class="hl"><span class="hl slc"># See COPYRIGHT file for copyright information</span></li>
<li id="n_8" class="hl"><span class="hl slc">#======================================================================</span></li>
<li id="n_9" class="hl"><span class="hl slc">#</span></li>
<li id="n_10" class="hl"><span class="hl slc"># This file has NOT undergone whitespace cleanup.</span></li>
<li id="n_11" class="hl"><span class="hl slc">#</span></li>
<li id="n_12" class="hl"><span class="hl slc">#======================================================================</span></li>
<li id="n_13" class="hl"><span class="hl slc">#</span></li>
<li id="n_14" class="hl"><span class="hl slc"># project/job administration</span></li>
<li id="n_15" class="hl"><span class="hl slc"># partsgroup administration</span></li>
<li id="n_16" class="hl"><span class="hl slc"># translation maintainance</span></li>
<li id="n_17" class="hl"><span class="hl slc">#</span></li>
<li id="n_18" class="hl"><span class="hl slc">#======================================================================</span></li>
<li id="n_19" class="hl"></li>
<li id="n_20" class="hl"><span class="hl kwa">use </span>LedgerSMB<span class="hl opt">::</span>PE<span class="hl opt">;</span></li>
<li id="n_21" class="hl"><span class="hl kwa">use </span>LedgerSMB<span class="hl opt">::</span>AA<span class="hl opt">;</span></li>
<li id="n_22" class="hl"><span class="hl kwa">use </span>LedgerSMB<span class="hl opt">::</span>OE<span class="hl opt">;</span></li>
<li id="n_23" class="hl"></li>
<li id="n_24" class="hl"><span class="hl num">1</span><span class="hl opt">;</span></li>
<li id="n_25" class="hl"></li>
<li id="n_26" class="hl"><span class="hl slc"># end of main</span></li>
<li id="n_27" class="hl"></li>
<li id="n_28" class="hl"><span class="hl kwa">sub </span>add <span class="hl opt">{</span></li>
<li id="n_29" class="hl"></li>
<li id="n_30" class="hl">    <span class="hl slc"># construct callback</span></li>
<li id="n_31" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>callback<span class="hl opt">} =</span></li>
<li id="n_32" class="hl"><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{script}?action=add&amp;type=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{type}&amp;path=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{path}&amp;login=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{login}&amp;sessionid=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{sessionid}&quot;</span></li>
<li id="n_33" class="hl">      <span class="hl kwa">unless </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>callback<span class="hl opt">};</span></li>
<li id="n_34" class="hl"></li>
<li id="n_35" class="hl">    <span class="hl opt">&amp;{</span><span class="hl sng">&quot;prepare_</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{type}&quot;</span><span class="hl opt">};</span></li>
<li id="n_36" class="hl"></li>
<li id="n_37" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>orphaned<span class="hl opt">} = </span><span class="hl num">1</span><span class="hl opt">;</span></li>
<li id="n_38" class="hl">    <span class="hl opt">&amp;</span>display_form<span class="hl opt">;</span></li>
<li id="n_39" class="hl"></li>
<li id="n_40" class="hl"><span class="hl opt">}</span></li>
<li id="n_41" class="hl"></li>
<li id="n_42" class="hl"><span class="hl kwa">sub </span>edit <span class="hl opt">{</span></li>
<li id="n_43" class="hl"></li>
<li id="n_44" class="hl">    <span class="hl opt">&amp;{</span><span class="hl sng">&quot;prepare_</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{type}&quot;</span><span class="hl opt">};</span></li>
<li id="n_45" class="hl">    <span class="hl opt">&amp;</span>display_form<span class="hl opt">;</span></li>
<li id="n_46" class="hl"></li>
<li id="n_47" class="hl"><span class="hl opt">}</span></li>
<li id="n_48" class="hl"></li>
<li id="n_49" class="hl"><span class="hl kwa">sub </span>prepare_partsgroup <span class="hl opt">{</span></li>
<li id="n_50" class="hl">    PE-<span class="hl opt">&gt;</span><span class="hl kwd">get_partsgroup</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">)</span></li>
<li id="n_51" class="hl">      <span class="hl kwa">if </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">};</span></li>
<li id="n_52" class="hl"><span class="hl opt">}</span></li>
<li id="n_53" class="hl"><span class="hl kwa">sub </span>prepare_pricegroup <span class="hl opt">{</span></li>
<li id="n_54" class="hl">    PE-<span class="hl opt">&gt;</span><span class="hl kwd">get_pricegroup</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">)</span></li>
<li id="n_55" class="hl">      <span class="hl kwa">if </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">};</span></li>
<li id="n_56" class="hl"><span class="hl opt">}</span></li>
<li id="n_57" class="hl"></li>
<li id="n_58" class="hl"><span class="hl kwa">sub </span>prepare_job <span class="hl opt">{</span></li>
<li id="n_59" class="hl"></li>
<li id="n_60" class="hl">    <span class="hl slc"># $locale-&gt;text(&#39;Add Job&#39;)</span></li>
<li id="n_61" class="hl">    <span class="hl slc"># $locale-&gt;text(&#39;Edit Job&#39;)</span></li>
<li id="n_62" class="hl"></li>
<li id="n_63" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">} = </span><span class="hl sng">&#39;customer&#39;</span><span class="hl opt">;</span></li>
<li id="n_64" class="hl"></li>
<li id="n_65" class="hl">    PE-<span class="hl opt">&gt;</span><span class="hl kwd">get_job</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_66" class="hl"></li>
<li id="n_67" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>taxaccounts<span class="hl opt">} = </span><span class="hl sng">&quot;&quot;</span><span class="hl opt">;</span></li>
<li id="n_68" class="hl">    <span class="hl kwa">for </span><span class="hl opt">( </span><span class="hl kwc">keys </span><span class="hl opt">%{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>IC_links<span class="hl opt">} } ) {</span></li>
<li id="n_69" class="hl"></li>
<li id="n_70" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$_</span><span class="hl sng">&quot;</span><span class="hl opt">} = </span><span class="hl sng">&quot;&quot;</span><span class="hl opt">;</span></li>
<li id="n_71" class="hl">        <span class="hl kwa">foreach </span><span class="hl kwb">$ref </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>IC_links<span class="hl opt">}{</span><span class="hl kwb">$_</span><span class="hl opt">} } ) {</span></li>
<li id="n_72" class="hl">            <span class="hl kwa">if </span><span class="hl opt">(</span><span class="hl kwd">/IC_tax/</span><span class="hl opt">) {</span></li>
<li id="n_73" class="hl">                <span class="hl kwa">if </span><span class="hl opt">(</span><span class="hl kwd">/taxpart/</span><span class="hl opt">) {</span></li>
<li id="n_74" class="hl">                    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>taxaccounts<span class="hl opt">} .= </span><span class="hl sng">&quot;</span><span class="hl ipl">$ref</span><span class="hl sng">-&gt;{accno} &quot;</span><span class="hl opt">;</span></li>
<li id="n_75" class="hl">                    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;IC_tax_</span><span class="hl ipl">$ref</span><span class="hl sng">-&gt;{accno}_description&quot;</span><span class="hl opt">} =</span></li>
<li id="n_76" class="hl">                      <span class="hl sng">&quot;</span><span class="hl ipl">$ref</span><span class="hl sng">-&gt;{accno}--</span><span class="hl ipl">$ref</span><span class="hl sng">-&gt;{description}&quot;</span><span class="hl opt">;</span></li>
<li id="n_77" class="hl">                    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">} ) {</span></li>
<li id="n_78" class="hl">                        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>amount<span class="hl opt">}{ </span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span>accno<span class="hl opt">} } ) {</span></li>
<li id="n_79" class="hl">                            <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;IC_tax_</span><span class="hl ipl">$ref</span><span class="hl sng">-&gt;{accno}&quot;</span><span class="hl opt">} = </span><span class="hl sng">&quot;checked&quot;</span><span class="hl opt">;</span></li>
<li id="n_80" class="hl">                        <span class="hl opt">}</span></li>
<li id="n_81" class="hl">                    <span class="hl opt">}</span></li>
<li id="n_82" class="hl">                    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_83" class="hl">                        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;IC_tax_</span><span class="hl ipl">$ref</span><span class="hl sng">-&gt;{accno}&quot;</span><span class="hl opt">} = </span><span class="hl sng">&quot;checked&quot;</span><span class="hl opt">;</span></li>
<li id="n_84" class="hl">                    <span class="hl opt">}</span></li>
<li id="n_85" class="hl">                <span class="hl opt">}</span></li>
<li id="n_86" class="hl">            <span class="hl opt">}</span></li>
<li id="n_87" class="hl">            <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_88" class="hl">                <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$_</span><span class="hl sng">&quot;</span><span class="hl opt">} .=</span></li>
<li id="n_89" class="hl">                  <span class="hl sng">&quot;&lt;option&gt;</span><span class="hl ipl">$ref</span><span class="hl sng">-&gt;{accno}--</span><span class="hl ipl">$ref</span><span class="hl sng">-&gt;{description}</span><span class="hl esc">\n</span><span class="hl sng">&quot;</span><span class="hl opt">;</span></li>
<li id="n_90" class="hl">            <span class="hl opt">}</span></li>
<li id="n_91" class="hl">        <span class="hl opt">}</span></li>
<li id="n_92" class="hl">    <span class="hl opt">}</span></li>
<li id="n_93" class="hl">    <span class="hl kwc">chop </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>taxaccounts<span class="hl opt">};</span></li>
<li id="n_94" class="hl"></li>
<li id="n_95" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectIC_income<span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectIC_sale<span class="hl opt">};</span></li>
<li id="n_96" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>IC_income<span class="hl opt">}       = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>IC_sale<span class="hl opt">};</span></li>
<li id="n_97" class="hl"></li>
<li id="n_98" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>IC_income<span class="hl opt">} = </span>qq<span class="hl opt">|</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>income_accno<span class="hl opt">}--</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>income_description<span class="hl opt">}|;</span></li>
<li id="n_99" class="hl"></li>
<li id="n_100" class="hl">    <span class="hl kwc">delete </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>IC_links<span class="hl opt">};</span></li>
<li id="n_101" class="hl"></li>
<li id="n_102" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;old</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =</span></li>
<li id="n_103" class="hl">      qq<span class="hl opt">|</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}--</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">}|;</span></li>
<li id="n_104" class="hl"></li>
<li id="n_105" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;all_</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} } ) {</span></li>
<li id="n_106" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =</span></li>
<li id="n_107" class="hl">          qq<span class="hl opt">|</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}--</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">}|;</span></li>
<li id="n_108" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} = </span>qq<span class="hl opt">|&lt;</span>option<span class="hl opt">&gt;</span><span class="hl esc">\n</span><span class="hl opt">|;</span></li>
<li id="n_109" class="hl">        <span class="hl kwa">for </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;all_</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} } ) {</span></li>
<li id="n_110" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} .=</span></li>
<li id="n_111" class="hl">              qq<span class="hl opt">|&lt;</span>option value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$_</span><span class="hl sng">-&gt;{name}--</span><span class="hl ipl">$_</span><span class="hl sng">-&gt;{id}&quot;</span><span class="hl opt">&gt;</span><span class="hl kwb">$_</span><span class="hl opt">-&gt;{</span>name<span class="hl opt">}</span><span class="hl esc">\n</span><span class="hl opt">|;</span></li>
<li id="n_112" class="hl">        <span class="hl opt">}</span></li>
<li id="n_113" class="hl">    <span class="hl opt">}</span></li>
<li id="n_114" class="hl"></li>
<li id="n_115" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">get_partsgroup</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, { </span>all <span class="hl opt">=&gt; </span><span class="hl num">1 </span><span class="hl opt">} );</span></li>
<li id="n_116" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">} =</span></li>
<li id="n_117" class="hl">      <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">quote</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">} ) . </span><span class="hl sng">&quot;--</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{partsgroup_id}&quot;</span><span class="hl opt">;</span></li>
<li id="n_118" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_partsgroup<span class="hl opt">} } ) {</span></li>
<li id="n_119" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectpartsgroup<span class="hl opt">} = </span>qq<span class="hl opt">|&lt;</span>option<span class="hl opt">&gt;</span><span class="hl esc">\n</span><span class="hl opt">|;</span></li>
<li id="n_120" class="hl">        <span class="hl kwa">for </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_partsgroup<span class="hl opt">} } ) {</span></li>
<li id="n_121" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectpartsgroup<span class="hl opt">} .=</span></li>
<li id="n_122" class="hl">                qq<span class="hl opt">|&lt;</span>option value<span class="hl opt">=</span><span class="hl sng">&quot;|</span></li>
<li id="n_123" class="hl"><span class="hl sng">              . </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;quote( </span><span class="hl ipl">$_</span><span class="hl sng">-&gt;{partsgroup} )</span></li>
<li id="n_124" class="hl"><span class="hl sng">              . qq|--</span><span class="hl ipl">$_</span><span class="hl sng">-&gt;{id}&quot;</span><span class="hl opt">&gt;</span><span class="hl kwb">$_</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">}</span><span class="hl esc">\n</span><span class="hl opt">|;</span></li>
<li id="n_125" class="hl">        <span class="hl opt">}</span></li>
<li id="n_126" class="hl">    <span class="hl opt">}</span></li>
<li id="n_127" class="hl"></li>
<li id="n_128" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>locked<span class="hl opt">} =</span></li>
<li id="n_129" class="hl">      <span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>revtrans<span class="hl opt">} )</span></li>
<li id="n_130" class="hl">      <span class="hl opt">? </span><span class="hl sng">&#39;1&#39;</span></li>
<li id="n_131" class="hl">      <span class="hl opt">: ( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">datetonum</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>transdate<span class="hl opt">} ) &lt;=</span></li>
<li id="n_132" class="hl">          <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">datetonum</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>closedto<span class="hl opt">} ) );</span></li>
<li id="n_133" class="hl"></li>
<li id="n_134" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>readonly<span class="hl opt">} = </span><span class="hl num">1 </span><span class="hl kwa">if </span><span class="hl kwb">$myconfig</span><span class="hl opt">{</span>acs<span class="hl opt">} =~ </span><span class="hl kwd">/Job Costing--Add Job/</span><span class="hl opt">;</span></li>
<li id="n_135" class="hl"></li>
<li id="n_136" class="hl"><span class="hl opt">}</span></li>
<li id="n_137" class="hl"></li>
<li id="n_138" class="hl"><span class="hl kwa">sub </span>job_header <span class="hl opt">{</span></li>
<li id="n_139" class="hl"></li>
<li id="n_140" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(partnumber partdescription description notes unit)</span><span class="hl opt">) {</span></li>
<li id="n_141" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">quote</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} );</span></li>
<li id="n_142" class="hl">    <span class="hl opt">}</span></li>
<li id="n_143" class="hl"></li>
<li id="n_144" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(production weight)</span><span class="hl opt">) {</span></li>
<li id="n_145" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">format_amount</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} );</span></li>
<li id="n_146" class="hl">    <span class="hl opt">}</span></li>
<li id="n_147" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(listprice sellprice)</span><span class="hl opt">) {</span></li>
<li id="n_148" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">format_amount</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">}, </span><span class="hl num">2 </span><span class="hl opt">);</span></li>
<li id="n_149" class="hl">    <span class="hl opt">}</span></li>
<li id="n_150" class="hl"></li>
<li id="n_151" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( ( </span><span class="hl kwb">$rows </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">numtextrows</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partdescription<span class="hl opt">}, </span><span class="hl num">60 </span><span class="hl opt">) ) &gt; </span><span class="hl num">1 </span><span class="hl opt">) {</span></li>
<li id="n_152" class="hl">        <span class="hl kwb">$partdescription </span><span class="hl opt">=</span></li>
<li id="n_153" class="hl">qq<span class="hl opt">|&lt;</span>textarea name<span class="hl opt">=</span><span class="hl sng">&quot;partdescription&quot;</span> rows<span class="hl opt">=</span><span class="hl kwb">$rows </span>cols<span class="hl opt">=</span><span class="hl num">60 </span>style<span class="hl opt">=</span><span class="hl sng">&quot;width: 100%&quot;</span> wrap<span class="hl opt">=</span>soft<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partdescription<span class="hl opt">}&lt;/</span>textarea<span class="hl opt">&gt;|;</span></li>
<li id="n_154" class="hl">    <span class="hl opt">}</span></li>
<li id="n_155" class="hl">    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_156" class="hl">        <span class="hl kwb">$partdescription </span><span class="hl opt">=</span></li>
<li id="n_157" class="hl">qq<span class="hl opt">|&lt;</span>input name<span class="hl opt">=</span>partdescription size<span class="hl opt">=</span><span class="hl num">60 </span>value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{partdescription}&quot;</span><span class="hl opt">&gt;|;</span></li>
<li id="n_158" class="hl">    <span class="hl opt">}</span></li>
<li id="n_159" class="hl"></li>
<li id="n_160" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( ( </span><span class="hl kwb">$rows </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">numtextrows</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>description<span class="hl opt">}, </span><span class="hl num">60 </span><span class="hl opt">) ) &gt; </span><span class="hl num">1 </span><span class="hl opt">) {</span></li>
<li id="n_161" class="hl">        <span class="hl kwb">$description </span><span class="hl opt">=</span></li>
<li id="n_162" class="hl">qq<span class="hl opt">|&lt;</span>textarea name<span class="hl opt">=</span><span class="hl sng">&quot;description&quot;</span> rows<span class="hl opt">=</span><span class="hl kwb">$rows </span>cols<span class="hl opt">=</span><span class="hl num">60 </span>style<span class="hl opt">=</span><span class="hl sng">&quot;width: 100%&quot;</span> wrap<span class="hl opt">=</span>soft<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>description<span class="hl opt">}&lt;/</span>textarea<span class="hl opt">&gt;|;</span></li>
<li id="n_163" class="hl">    <span class="hl opt">}</span></li>
<li id="n_164" class="hl">    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_165" class="hl">        <span class="hl kwb">$description </span><span class="hl opt">=</span></li>
<li id="n_166" class="hl">          qq<span class="hl opt">|&lt;</span>input name<span class="hl opt">=</span>description size<span class="hl opt">=</span><span class="hl num">60 </span>value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{description}&quot;</span><span class="hl opt">&gt;|;</span></li>
<li id="n_167" class="hl">    <span class="hl opt">}</span></li>
<li id="n_168" class="hl"></li>
<li id="n_169" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( ( </span><span class="hl kwb">$rows </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">numtextrows</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>notes<span class="hl opt">}, </span><span class="hl num">40 </span><span class="hl opt">) ) &lt; </span><span class="hl num">2 </span><span class="hl opt">) {</span></li>
<li id="n_170" class="hl">        <span class="hl kwb">$rows </span><span class="hl opt">= </span><span class="hl num">2</span><span class="hl opt">;</span></li>
<li id="n_171" class="hl">    <span class="hl opt">}</span></li>
<li id="n_172" class="hl"></li>
<li id="n_173" class="hl">    <span class="hl kwb">$notes </span><span class="hl opt">=</span></li>
<li id="n_174" class="hl">qq<span class="hl opt">|&lt;</span>textarea name<span class="hl opt">=</span>notes rows<span class="hl opt">=</span><span class="hl kwb">$rows </span>cols<span class="hl opt">=</span><span class="hl num">40 </span>wrap<span class="hl opt">=</span>soft<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>notes<span class="hl opt">}&lt;/</span>textarea<span class="hl opt">&gt;|;</span></li>
<li id="n_175" class="hl"></li>
<li id="n_176" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectIC_income<span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">unescape</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectIC_income<span class="hl opt">} );</span></li>
<li id="n_177" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =</span></li>
<li id="n_178" class="hl">      <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">unescape</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} );</span></li>
<li id="n_179" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =~ </span><span class="hl kwd">s/ selected//</span><span class="hl opt">;</span></li>
<li id="n_180" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =~</span></li>
<li id="n_181" class="hl">      <span class="hl kwd">s/(&lt;option value=&quot;\Q$form-&gt;{&quot;$form-&gt;{vc}&quot;}\E&quot;)/$1 selected/</span><span class="hl opt">;</span></li>
<li id="n_182" class="hl"></li>
<li id="n_183" class="hl">    <span class="hl kwb">$label </span><span class="hl opt">= </span><span class="hl kwc">ucfirst </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">};</span></li>
<li id="n_184" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} ) {</span></li>
<li id="n_185" class="hl">        <span class="hl kwb">$name </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_186" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_187" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right nowrap<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl kwb">$label</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_188" class="hl">      <span class="hl opt">&lt;</span>td colspan<span class="hl opt">=</span><span class="hl num">3</span><span class="hl opt">&gt;&lt;</span><span class="hl kwc">select </span>name<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}&lt;</span><span class="hl kwd">/select&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_189" class="hl">      <span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;|</span></li>
<li id="n_190" class="hl"><span class="hl sng">          . </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;escape( </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{&quot;</span><span class="hl kwc">select</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">}</span><span class="hl sng">&quot;}, 1 ) . qq|&quot;</span><span class="hl opt">&gt;</span></li>
<li id="n_191" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_192" class="hl"><span class="hl opt">|;</span></li>
<li id="n_193" class="hl">    <span class="hl opt">}</span></li>
<li id="n_194" class="hl">    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_195" class="hl">        <span class="hl kwb">$name </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_196" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_197" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right nowrap<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl kwb">$label</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_198" class="hl">      <span class="hl opt">&lt;</span>td colspan<span class="hl opt">=</span><span class="hl num">3</span><span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{&quot;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">}</span><span class="hl sng">&quot;}&quot;</span> size<span class="hl opt">=</span><span class="hl num">35</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_199" class="hl">      <span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;|</span></li>
<li id="n_200" class="hl"><span class="hl sng">          . </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;escape( </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{&quot;</span><span class="hl kwc">select</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">}</span><span class="hl sng">&quot;}, 1 ) . qq|&quot;</span><span class="hl opt">&gt;</span></li>
<li id="n_201" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_202" class="hl"><span class="hl opt">|;</span></li>
<li id="n_203" class="hl">    <span class="hl opt">}</span></li>
<li id="n_204" class="hl"></li>
<li id="n_205" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>orphaned<span class="hl opt">} ) {</span></li>
<li id="n_206" class="hl"></li>
<li id="n_207" class="hl">        <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(income)</span><span class="hl opt">) {</span></li>
<li id="n_208" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;selectIC_</span><span class="hl ipl">$_</span><span class="hl sng">&quot;</span><span class="hl opt">} =~ </span><span class="hl kwd">s/ selected//</span><span class="hl opt">;</span></li>
<li id="n_209" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;selectIC_</span><span class="hl ipl">$_</span><span class="hl sng">&quot;</span><span class="hl opt">} =~</span></li>
<li id="n_210" class="hl">              <span class="hl kwd">s/option&gt;\Q$form-&gt;{&quot;IC_$_&quot;}\E/option selected&gt;$form-&gt;{&quot;IC_$_&quot;}/</span><span class="hl opt">;</span></li>
<li id="n_211" class="hl">        <span class="hl opt">}</span></li>
<li id="n_212" class="hl"></li>
<li id="n_213" class="hl">        <span class="hl kwb">$production </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_214" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_215" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right nowrap<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Production&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_216" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>production size<span class="hl opt">=</span><span class="hl num">10 </span>value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{production}&quot;</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_217" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right nowrap<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Completed&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_218" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>completed<span class="hl opt">}&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_219" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_220" class="hl"><span class="hl opt">|;</span></li>
<li id="n_221" class="hl"></li>
<li id="n_222" class="hl">    <span class="hl opt">}</span></li>
<li id="n_223" class="hl">    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_224" class="hl"></li>
<li id="n_225" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectIC_income<span class="hl opt">} = </span>qq<span class="hl opt">|&lt;</span>option selected<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>IC_income<span class="hl opt">}|;</span></li>
<li id="n_226" class="hl"></li>
<li id="n_227" class="hl">        <span class="hl kwb">$production </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_228" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_229" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right nowrap<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Production&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_230" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span>production value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{production}&quot;</span><span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>production<span class="hl opt">}&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_231" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right nowrap<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Completed&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_232" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>completed<span class="hl opt">}&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_233" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_234" class="hl"><span class="hl opt">|;</span></li>
<li id="n_235" class="hl"></li>
<li id="n_236" class="hl">    <span class="hl opt">}</span></li>
<li id="n_237" class="hl"></li>
<li id="n_238" class="hl">    <span class="hl kwa">for </span><span class="hl opt">( </span><span class="hl kwc">split </span><span class="hl kwd">/ /</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>taxaccounts<span class="hl opt">} ) {</span></li>
<li id="n_239" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;IC_tax_</span><span class="hl ipl">$_</span><span class="hl sng">&quot;</span><span class="hl opt">} = ( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;IC_tax_</span><span class="hl ipl">$_</span><span class="hl sng">&quot;</span><span class="hl opt">} ) ? </span><span class="hl sng">&quot;checked&quot;</span> <span class="hl opt">: </span><span class="hl sng">&quot;&quot;</span><span class="hl opt">;</span></li>
<li id="n_240" class="hl">    <span class="hl opt">}</span></li>
<li id="n_241" class="hl"></li>
<li id="n_242" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectpartsgroup<span class="hl opt">} ) {</span></li>
<li id="n_243" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectpartsgroup<span class="hl opt">} =</span></li>
<li id="n_244" class="hl">          <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">unescape</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectpartsgroup<span class="hl opt">} );</span></li>
<li id="n_245" class="hl"></li>
<li id="n_246" class="hl">        <span class="hl kwb">$partsgroup </span><span class="hl opt">=</span></li>
<li id="n_247" class="hl">          qq<span class="hl opt">|&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span>selectpartsgroup value<span class="hl opt">=</span><span class="hl sng">&quot;|</span></li>
<li id="n_248" class="hl"><span class="hl sng">          . </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;escape( </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{selectpartsgroup}, 1 ) . qq|&quot;</span><span class="hl opt">&gt;|;</span></li>
<li id="n_249" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">quote</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">} );</span></li>
<li id="n_250" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectpartsgroup<span class="hl opt">} =~</span></li>
<li id="n_251" class="hl">          <span class="hl kwd">s/(&lt;option value=&quot;\Q$form-&gt;{partsgroup}\E&quot;)/$1 selected/</span><span class="hl opt">;</span></li>
<li id="n_252" class="hl"></li>
<li id="n_253" class="hl">        <span class="hl kwb">$partsgroup </span><span class="hl opt">.=</span></li>
<li id="n_254" class="hl">          qq<span class="hl opt">|</span><span class="hl esc">\n</span><span class="hl opt">&lt;</span><span class="hl kwc">select </span>name<span class="hl opt">=</span>partsgroup<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectpartsgroup<span class="hl opt">}&lt;/</span><span class="hl kwc">select</span><span class="hl opt">&gt;|;</span></li>
<li id="n_255" class="hl">        <span class="hl kwb">$group </span><span class="hl opt">= </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Group&#39;</span><span class="hl opt">);</span></li>
<li id="n_256" class="hl">    <span class="hl opt">}</span></li>
<li id="n_257" class="hl"></li>
<li id="n_258" class="hl">    <span class="hl kwb">$linkaccounts </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_259" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_260" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right nowrap<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Income&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_261" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span><span class="hl kwc">select </span>name<span class="hl opt">=</span>IC_income<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectIC_income<span class="hl opt">}&lt;</span><span class="hl kwd">/select&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_262" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_263" class="hl"><span class="hl opt">|;</span></li>
<li id="n_264" class="hl"></li>
<li id="n_265" class="hl">    <span class="hl kwa">for </span><span class="hl opt">( </span><span class="hl kwc">split </span><span class="hl kwd">/ /</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>taxaccounts<span class="hl opt">} ) {</span></li>
<li id="n_266" class="hl">        <span class="hl kwb">$tax </span><span class="hl opt">.= </span>qq<span class="hl opt">|</span></li>
<li id="n_267" class="hl">        <span class="hl opt">&lt;</span>input <span class="hl kwa">class</span><span class="hl opt">=</span>checkbox type<span class="hl opt">=</span>checkbox name<span class="hl opt">=</span><span class="hl sng">&quot;IC_tax_</span><span class="hl ipl">$_</span><span class="hl sng">&quot;</span> value<span class="hl opt">=</span><span class="hl num">1 </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;IC_tax_</span><span class="hl ipl">$_</span><span class="hl sng">&quot;</span><span class="hl opt">}&gt;&amp;</span>nbsp<span class="hl opt">;&lt;</span>b<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;IC_tax_${_}_description&quot;</span><span class="hl opt">}&lt;/</span>b<span class="hl opt">&gt;</span></li>
<li id="n_268" class="hl">    <span class="hl opt">&lt;</span>br<span class="hl opt">&gt;&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span>IC_tax_<span class="hl opt">${</span>_<span class="hl opt">}</span>_description value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{&quot;</span>IC_tax_<span class="hl opt">${</span>_<span class="hl opt">}</span>_description<span class="hl sng">&quot;}&quot;</span><span class="hl opt">&gt;</span></li>
<li id="n_269" class="hl"><span class="hl opt">|;</span></li>
<li id="n_270" class="hl">    <span class="hl opt">}</span></li>
<li id="n_271" class="hl"></li>
<li id="n_272" class="hl">    <span class="hl kwa">if </span><span class="hl opt">(</span><span class="hl kwb">$tax</span><span class="hl opt">) {</span></li>
<li id="n_273" class="hl">        <span class="hl kwb">$linkaccounts </span><span class="hl opt">.= </span>qq<span class="hl opt">|</span></li>
<li id="n_274" class="hl">              <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_275" class="hl">            <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Tax&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_276" class="hl">        <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$tax</span><span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_277" class="hl">          <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_278" class="hl"><span class="hl opt">|;</span></li>
<li id="n_279" class="hl">    <span class="hl opt">}</span></li>
<li id="n_280" class="hl"></li>
<li id="n_281" class="hl">    <span class="hl kwb">$partnumber </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_282" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_283" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_284" class="hl">        <span class="hl opt">&lt;</span>table<span class="hl opt">&gt;</span></li>
<li id="n_285" class="hl">          <span class="hl opt">&lt;</span>tr valign<span class="hl opt">=</span>top<span class="hl opt">&gt;</span></li>
<li id="n_286" class="hl">            <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>left<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Number&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_287" class="hl">        <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>left<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Description&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_288" class="hl">        <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>left<span class="hl opt">&gt;</span><span class="hl kwb">$group</span><span class="hl opt">&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_289" class="hl">          <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_290" class="hl">          <span class="hl opt">&lt;</span>tr valign<span class="hl opt">=</span>top<span class="hl opt">&gt;</span></li>
<li id="n_291" class="hl">            <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>partnumber value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{partnumber}&quot;</span> size<span class="hl opt">=</span><span class="hl num">20</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_292" class="hl">        <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$partdescription</span><span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_293" class="hl">        <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$partsgroup</span><span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_294" class="hl">          <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_295" class="hl">        <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_296" class="hl">      <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_297" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_298" class="hl"><span class="hl opt">|;</span></li>
<li id="n_299" class="hl"></li>
<li id="n_300" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} =</span></li>
<li id="n_301" class="hl">      <span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">} ) ? </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Edit Job&#39;</span><span class="hl opt">) : </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Add Job&#39;</span><span class="hl opt">);</span></li>
<li id="n_302" class="hl"></li>
<li id="n_303" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">header</span><span class="hl opt">;</span></li>
<li id="n_304" class="hl"></li>
<li id="n_305" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_306" class="hl"><span class="hl opt">&lt;</span>body<span class="hl opt">&gt;</span></li>
<li id="n_307" class="hl"></li>
<li id="n_308" class="hl"><span class="hl opt">&lt;</span>form <span class="hl kwa">method</span><span class="hl opt">=</span>post action<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>script<span class="hl opt">}&gt;</span></li>
<li id="n_309" class="hl"><span class="hl opt">|;</span></li>
<li id="n_310" class="hl"></li>
<li id="n_311" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(partnumber startdate enddate)</span><span class="hl opt">) { </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;old</span><span class="hl ipl">$_</span><span class="hl sng">&quot;</span><span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} }</span></li>
<li id="n_312" class="hl"></li>
<li id="n_313" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span><span class="hl sng">&quot;selectIC_income&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;|</span></li>
<li id="n_314" class="hl"><span class="hl sng">      . </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;escape( </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{&quot;</span>selectIC_income<span class="hl sng">&quot;}, 1 )</span></li>
<li id="n_315" class="hl"><span class="hl sng">      . qq|&quot;</span><span class="hl opt">&gt;</span><span class="hl esc">\n</span><span class="hl opt">|;</span></li>
<li id="n_316" class="hl"></li>
<li id="n_317" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">hide_form</span><span class="hl opt">(</span></li>
<li id="n_318" class="hl">        <span class="hl sng">&quot;id&quot;</span><span class="hl opt">,             </span><span class="hl sng">&quot;type&quot;</span><span class="hl opt">,</span></li>
<li id="n_319" class="hl">        <span class="hl sng">&quot;old</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">, </span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">,</span></li>
<li id="n_320" class="hl">        <span class="hl sng">&quot;orphaned&quot;</span><span class="hl opt">,       </span><span class="hl sng">&quot;taxaccounts&quot;</span><span class="hl opt">,</span></li>
<li id="n_321" class="hl">        <span class="hl sng">&quot;vc&quot;</span><span class="hl opt">,             </span><span class="hl sng">&quot;project&quot;</span></li>
<li id="n_322" class="hl">    <span class="hl opt">);</span></li>
<li id="n_323" class="hl"></li>
<li id="n_324" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_325" class="hl">  </li>
<li id="n_326" class="hl"><span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_327" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_328" class="hl">    <span class="hl opt">&lt;</span>th <span class="hl kwa">class</span><span class="hl opt">=</span>listtop<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">}&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_329" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_330" class="hl">  <span class="hl opt">&lt;</span>tr height<span class="hl opt">=</span><span class="hl sng">&quot;5&quot;</span><span class="hl opt">&gt;&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_331" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_332" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_333" class="hl">      <span class="hl opt">&lt;</span>table<span class="hl opt">&gt;</span></li>
<li id="n_334" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_335" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Number&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_336" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>projectnumber size<span class="hl opt">=</span><span class="hl num">20 </span>value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{projectnumber}&quot;</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_337" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Description&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_338" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$description</span><span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_339" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_340" class="hl">    <span class="hl kwb">$name</span></li>
<li id="n_341" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_342" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Startdate&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_343" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;date&quot;</span> name<span class="hl opt">=</span>startdate size<span class="hl opt">=</span><span class="hl num">11 </span>title<span class="hl opt">=</span><span class="hl sng">&quot;(</span><span class="hl ipl">$myconfig</span><span class="hl sng">{dateformat})&quot;</span> value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>startdate<span class="hl opt">}&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_344" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Enddate&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_345" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;date&quot;</span> name<span class="hl opt">=</span>enddate size<span class="hl opt">=</span><span class="hl num">11 </span>title<span class="hl opt">=</span><span class="hl sng">&quot;(</span><span class="hl ipl">$myconfig</span><span class="hl sng">{dateformat})&quot;</span> value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>enddate<span class="hl opt">}&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_346" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_347" class="hl">    <span class="hl kwb">$production</span></li>
<li id="n_348" class="hl">      <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_349" class="hl">    <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_350" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_351" class="hl">  <span class="hl opt">&lt;</span>tr <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;listheading&quot;</span><span class="hl opt">&gt;</span></li>
<li id="n_352" class="hl">    <span class="hl opt">&lt;</span>th <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;listheading&quot;</span> align<span class="hl opt">=</span><span class="hl sng">&quot;center&quot;</span><span class="hl opt">&gt;|</span></li>
<li id="n_353" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Assembly&#39;</span><span class="hl opt">)</span></li>
<li id="n_354" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_355" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_356" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_357" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_358" class="hl">      <span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_359" class="hl">    <span class="hl kwb">$partnumber</span></li>
<li id="n_360" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_361" class="hl">      <span class="hl opt">&lt;</span>td colspan<span class="hl opt">=</span><span class="hl num">3</span><span class="hl opt">&gt;</span></li>
<li id="n_362" class="hl">        <span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_363" class="hl">          <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_364" class="hl">            <span class="hl opt">&lt;</span>td width<span class="hl opt">=</span><span class="hl num">70</span><span class="hl opt">%&gt;</span></li>
<li id="n_365" class="hl">          <span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_366" class="hl">            <span class="hl opt">&lt;</span>tr <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;listheading&quot;</span><span class="hl opt">&gt;</span></li>
<li id="n_367" class="hl">              <span class="hl opt">&lt;</span>th <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;listheading&quot;</span> align<span class="hl opt">=</span><span class="hl sng">&quot;center&quot;</span> colspan<span class="hl opt">=</span><span class="hl num">2</span><span class="hl opt">&gt;|</span></li>
<li id="n_368" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Link Accounts&#39;</span><span class="hl opt">)</span></li>
<li id="n_369" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_370" class="hl">            <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_371" class="hl">            <span class="hl kwb">$linkaccounts</span></li>
<li id="n_372" class="hl">            <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_373" class="hl">              <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span><span class="hl sng">&quot;left&quot;</span><span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Notes&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_374" class="hl">            <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_375" class="hl">            <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_376" class="hl">              <span class="hl opt">&lt;</span>td colspan<span class="hl opt">=</span><span class="hl num">2</span><span class="hl opt">&gt;</span></li>
<li id="n_377" class="hl">            <span class="hl kwb">$notes</span></li>
<li id="n_378" class="hl">              <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_379" class="hl">            <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_380" class="hl">          <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_381" class="hl">        <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_382" class="hl">        <span class="hl opt">&lt;</span>td align<span class="hl opt">=</span>right<span class="hl opt">&gt;</span></li>
<li id="n_383" class="hl">          <span class="hl opt">&lt;</span>table<span class="hl opt">&gt;</span></li>
<li id="n_384" class="hl">            <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_385" class="hl">              <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span><span class="hl sng">&quot;right&quot;</span> nowrap<span class="hl opt">=</span><span class="hl sng">&quot;true&quot;</span><span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Updated&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_386" class="hl">              <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>priceupdate size<span class="hl opt">=</span><span class="hl num">11 </span>title<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$myconfig</span><span class="hl sng">{dateformat}&quot;</span> value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>priceupdate<span class="hl opt">}&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_387" class="hl">            <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_388" class="hl">            <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_389" class="hl">              <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span><span class="hl sng">&quot;right&quot;</span> nowrap<span class="hl opt">=</span><span class="hl sng">&quot;true&quot;</span><span class="hl opt">&gt;|</span></li>
<li id="n_390" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;List Price&#39;</span><span class="hl opt">)</span></li>
<li id="n_391" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_392" class="hl">              <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>listprice size<span class="hl opt">=</span><span class="hl num">11 </span>value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>listprice<span class="hl opt">}&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_393" class="hl">            <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_394" class="hl">            <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_395" class="hl">              <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span><span class="hl sng">&quot;right&quot;</span> nowrap<span class="hl opt">=</span><span class="hl sng">&quot;true&quot;</span><span class="hl opt">&gt;|</span></li>
<li id="n_396" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Sell Price&#39;</span><span class="hl opt">)</span></li>
<li id="n_397" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_398" class="hl">              <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>sellprice size<span class="hl opt">=</span><span class="hl num">11 </span>value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>sellprice<span class="hl opt">}&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_399" class="hl">            <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_400" class="hl">            <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_401" class="hl">              <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span><span class="hl sng">&quot;right&quot;</span> nowrap<span class="hl opt">=</span><span class="hl sng">&quot;true&quot;</span><span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Weight&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_402" class="hl">              <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_403" class="hl">            <span class="hl opt">&lt;</span>table<span class="hl opt">&gt;</span></li>
<li id="n_404" class="hl">              <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_405" class="hl">                <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_406" class="hl">                  <span class="hl opt">&lt;</span>input name<span class="hl opt">=</span>weight size<span class="hl opt">=</span><span class="hl num">10 </span>value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>weight<span class="hl opt">}&gt;</span></li>
<li id="n_407" class="hl">                <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_408" class="hl">                <span class="hl opt">&lt;</span>th<span class="hl opt">&gt;</span></li>
<li id="n_409" class="hl">                  <span class="hl opt">&amp;</span>nbsp<span class="hl opt">;</span></li>
<li id="n_410" class="hl">                  <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>weightunit<span class="hl opt">}</span></li>
<li id="n_411" class="hl">                  <span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span>weightunit value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>weightunit<span class="hl opt">}&gt;</span></li>
<li id="n_412" class="hl">                <span class="hl opt">&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_413" class="hl">              <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_414" class="hl">            <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_415" class="hl">              <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_416" class="hl">            <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_417" class="hl">              <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span><span class="hl sng">&quot;right&quot;</span> nowrap<span class="hl opt">=</span><span class="hl sng">&quot;true&quot;</span><span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Bin&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_418" class="hl">              <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>bin size<span class="hl opt">=</span><span class="hl num">10 </span>value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{bin}&quot;</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_419" class="hl">            <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_420" class="hl">            <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_421" class="hl">              <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span><span class="hl sng">&quot;right&quot;</span> nowrap<span class="hl opt">=</span><span class="hl sng">&quot;true&quot;</span><span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Unit&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_422" class="hl">              <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>unit size<span class="hl opt">=</span><span class="hl num">5 </span>value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{unit}&quot;</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_423" class="hl">            <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_424" class="hl">          <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_425" class="hl">        <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_426" class="hl">          <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_427" class="hl">        <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_428" class="hl">      <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_429" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_430" class="hl">      <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_431" class="hl">    <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_432" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_433" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_434" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>hr size<span class="hl opt">=</span><span class="hl num">3 </span>noshade<span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_435" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_436" class="hl"><span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_437" class="hl"><span class="hl opt">|;</span></li>
<li id="n_438" class="hl"></li>
<li id="n_439" class="hl"><span class="hl opt">}</span></li>
<li id="n_440" class="hl"></li>
<li id="n_441" class="hl"><span class="hl kwa">sub </span>job_footer <span class="hl opt">{</span></li>
<li id="n_442" class="hl"></li>
<li id="n_443" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">hide_form</span><span class="hl opt">(</span><span class="hl sng">qw(callback path login sessionid)</span><span class="hl opt">);</span></li>
<li id="n_444" class="hl"></li>
<li id="n_445" class="hl">    <span class="hl slc"># type=submit $locale-&gt;text(&#39;Update&#39;)</span></li>
<li id="n_446" class="hl">    <span class="hl slc"># type=submit $locale-&gt;text(&#39;Save&#39;)</span></li>
<li id="n_447" class="hl">    <span class="hl slc"># type=submit $locale-&gt;text(&#39;Delete&#39;)</span></li>
<li id="n_448" class="hl"></li>
<li id="n_449" class="hl">    <span class="hl kwb">%button </span><span class="hl opt">=</span></li>
<li id="n_450" class="hl">      <span class="hl opt">( </span><span class="hl sng">&#39;update&#39;</span> <span class="hl opt">=&gt; { </span>ndx <span class="hl opt">=&gt; </span><span class="hl num">1</span><span class="hl opt">, </span>key <span class="hl opt">=&gt; </span><span class="hl sng">&#39;U&#39;</span><span class="hl opt">, </span>value <span class="hl opt">=&gt; </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Update&#39;</span><span class="hl opt">) },</span></li>
<li id="n_451" class="hl">      <span class="hl opt">);</span></li>
<li id="n_452" class="hl"></li>
<li id="n_453" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$myconfig</span><span class="hl opt">{</span>acs<span class="hl opt">} !~ </span><span class="hl kwd">/Job Costing--Add Job/ </span><span class="hl opt">) {</span></li>
<li id="n_454" class="hl">        <span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl sng">&#39;save&#39;</span><span class="hl opt">} =</span></li>
<li id="n_455" class="hl">          <span class="hl opt">{ </span>ndx <span class="hl opt">=&gt; </span><span class="hl num">3</span><span class="hl opt">, </span>key <span class="hl opt">=&gt; </span><span class="hl sng">&#39;S&#39;</span><span class="hl opt">, </span>value <span class="hl opt">=&gt; </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Save&#39;</span><span class="hl opt">) };</span></li>
<li id="n_456" class="hl"></li>
<li id="n_457" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">} &amp;&amp; </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>orphaned<span class="hl opt">} ) {</span></li>
<li id="n_458" class="hl">            <span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl sng">&#39;delete&#39;</span><span class="hl opt">} =</span></li>
<li id="n_459" class="hl">              <span class="hl opt">{ </span>ndx <span class="hl opt">=&gt; </span><span class="hl num">16</span><span class="hl opt">, </span>key <span class="hl opt">=&gt; </span><span class="hl sng">&#39;D&#39;</span><span class="hl opt">, </span>value <span class="hl opt">=&gt; </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Delete&#39;</span><span class="hl opt">) };</span></li>
<li id="n_460" class="hl">        <span class="hl opt">}</span></li>
<li id="n_461" class="hl">    <span class="hl opt">}</span></li>
<li id="n_462" class="hl"></li>
<li id="n_463" class="hl">    <span class="hl kwa">for </span><span class="hl opt">( </span><span class="hl kwc">sort </span><span class="hl opt">{ </span><span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl kwb">$a</span><span class="hl opt">}-&gt;{</span>ndx<span class="hl opt">} &lt;=&gt; </span><span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl kwb">$b</span><span class="hl opt">}-&gt;{</span>ndx<span class="hl opt">} } </span><span class="hl kwc">keys </span><span class="hl kwb">%button </span><span class="hl opt">) {</span></li>
<li id="n_464" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">print_button</span><span class="hl opt">( </span>\<span class="hl kwb">%button</span><span class="hl opt">, </span><span class="hl kwb">$_ </span><span class="hl opt">);</span></li>
<li id="n_465" class="hl">    <span class="hl opt">}</span></li>
<li id="n_466" class="hl"></li>
<li id="n_467" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>lynx<span class="hl opt">} ) {</span></li>
<li id="n_468" class="hl">        <span class="hl kwa">require </span><span class="hl sng">&quot;bin/menu.pl&quot;</span><span class="hl opt">;</span></li>
<li id="n_469" class="hl">        <span class="hl opt">&amp;</span>menubar<span class="hl opt">;</span></li>
<li id="n_470" class="hl">    <span class="hl opt">}</span></li>
<li id="n_471" class="hl"></li>
<li id="n_472" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_473" class="hl"><span class="hl opt">&lt;/</span>form<span class="hl opt">&gt;</span></li>
<li id="n_474" class="hl"></li>
<li id="n_475" class="hl"><span class="hl opt">&lt;/</span>body<span class="hl opt">&gt;</span></li>
<li id="n_476" class="hl"><span class="hl opt">&lt;/</span>html<span class="hl opt">&gt;</span></li>
<li id="n_477" class="hl"><span class="hl opt">|;</span></li>
<li id="n_478" class="hl"></li>
<li id="n_479" class="hl"><span class="hl opt">}</span></li>
<li id="n_480" class="hl"></li>
<li id="n_481" class="hl"><span class="hl kwa">sub </span>list_stock <span class="hl opt">{</span></li>
<li id="n_482" class="hl"></li>
<li id="n_483" class="hl">    PE-<span class="hl opt">&gt;</span><span class="hl kwd">list_stock</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_484" class="hl"></li>
<li id="n_485" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">}  = </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Stock Finished Goods&#39;</span><span class="hl opt">);</span></li>
<li id="n_486" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>action<span class="hl opt">} = </span><span class="hl sng">&quot;list_stock&quot;</span><span class="hl opt">;</span></li>
<li id="n_487" class="hl"></li>
<li id="n_488" class="hl">    <span class="hl kwb">$href </span><span class="hl opt">= </span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{script}?&quot;</span><span class="hl opt">;</span></li>
<li id="n_489" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(action direction oldsort type path login sessionid status)</span><span class="hl opt">) {</span></li>
<li id="n_490" class="hl">        <span class="hl kwb">$href </span><span class="hl opt">.= </span><span class="hl sng">&quot;</span><span class="hl ipl">$_</span><span class="hl sng">=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{</span><span class="hl ipl">$_</span><span class="hl sng">}&amp;&quot;</span><span class="hl opt">;</span></li>
<li id="n_491" class="hl">    <span class="hl opt">}</span></li>
<li id="n_492" class="hl"></li>
<li id="n_493" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">sort_order</span><span class="hl opt">();</span></li>
<li id="n_494" class="hl"></li>
<li id="n_495" class="hl">    <span class="hl kwb">$callback </span><span class="hl opt">= </span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{script}?&quot;</span><span class="hl opt">;</span></li>
<li id="n_496" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(action direction oldsort type path login sessionid status)</span><span class="hl opt">) {</span></li>
<li id="n_497" class="hl">        <span class="hl kwb">$callback </span><span class="hl opt">.= </span><span class="hl sng">&quot;</span><span class="hl ipl">$_</span><span class="hl sng">=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{</span><span class="hl ipl">$_</span><span class="hl sng">}&amp;&quot;</span><span class="hl opt">;</span></li>
<li id="n_498" class="hl">    <span class="hl opt">}</span></li>
<li id="n_499" class="hl"></li>
<li id="n_500" class="hl">    <span class="hl kwb">&#64;column_index </span><span class="hl opt">=</span></li>
<li id="n_501" class="hl">      <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">sort_columns</span><span class="hl opt">(</span></li>
<li id="n_502" class="hl">        <span class="hl sng">qw(projectnumber description startdate partnumber production completed stock)</span></li>
<li id="n_503" class="hl">      <span class="hl opt">);</span></li>
<li id="n_504" class="hl"></li>
<li id="n_505" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>projectnumber<span class="hl opt">} ) {</span></li>
<li id="n_506" class="hl">        <span class="hl kwb">$href </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;projectnumber=&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">escape</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>projectnumber<span class="hl opt">} );</span></li>
<li id="n_507" class="hl">        <span class="hl kwb">$callback </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;projectnumber=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{projectnumber}&quot;</span><span class="hl opt">;</span></li>
<li id="n_508" class="hl">        <span class="hl opt">(</span><span class="hl kwb">$var</span><span class="hl opt">) = </span><span class="hl kwc">split </span><span class="hl kwd">/--/</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>projectnumber<span class="hl opt">};</span></li>
<li id="n_509" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">.= </span><span class="hl sng">&quot;</span><span class="hl esc">\n</span><span class="hl sng">&lt;br&gt;&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Job Number&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot; : </span><span class="hl ipl">$var</span><span class="hl sng">&quot;</span><span class="hl opt">;</span></li>
<li id="n_510" class="hl">    <span class="hl opt">}</span></li>
<li id="n_511" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>stockingdate<span class="hl opt">} ) {</span></li>
<li id="n_512" class="hl">        <span class="hl kwb">$href   </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;stockingdate=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{stockingdate}&quot;</span><span class="hl opt">;</span></li>
<li id="n_513" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">.= </span><span class="hl sng">&quot;</span><span class="hl esc">\n</span><span class="hl sng">&lt;br&gt;&quot;</span></li>
<li id="n_514" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;As of&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot; : &quot;</span></li>
<li id="n_515" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">date</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>stockingdate<span class="hl opt">}, </span><span class="hl num">1 </span><span class="hl opt">);</span></li>
<li id="n_516" class="hl">    <span class="hl opt">}</span></li>
<li id="n_517" class="hl"></li>
<li id="n_518" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>projectnumber<span class="hl opt">} =</span></li>
<li id="n_519" class="hl">        qq<span class="hl opt">|&lt;</span>th width<span class="hl opt">=</span><span class="hl num">30</span><span class="hl opt">%&gt;&lt;</span>a <span class="hl kwa">class</span><span class="hl opt">=</span>listheading href<span class="hl opt">=</span><span class="hl kwb">$href&amp;sort</span><span class="hl opt">=</span>projectnumber<span class="hl opt">&gt;|</span></li>
<li id="n_520" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Number&#39;</span><span class="hl opt">)</span></li>
<li id="n_521" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;</span><span class="hl kwd">/a&gt;&lt;/</span>th<span class="hl opt">&gt;|;</span></li>
<li id="n_522" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>description<span class="hl opt">} =</span></li>
<li id="n_523" class="hl">        qq<span class="hl opt">|&lt;</span>th width<span class="hl opt">=</span><span class="hl num">50</span><span class="hl opt">%&gt;&lt;</span>a <span class="hl kwa">class</span><span class="hl opt">=</span>listheading href<span class="hl opt">=</span><span class="hl kwb">$href&amp;sort</span><span class="hl opt">=</span>description<span class="hl opt">&gt;|</span></li>
<li id="n_524" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Description&#39;</span><span class="hl opt">)</span></li>
<li id="n_525" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;</span><span class="hl kwd">/a&gt;&lt;/</span>th<span class="hl opt">&gt;|;</span></li>
<li id="n_526" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>startdate<span class="hl opt">} =</span></li>
<li id="n_527" class="hl">        qq<span class="hl opt">|&lt;</span>th width<span class="hl opt">=</span><span class="hl num">10</span><span class="hl opt">%&gt;&lt;</span>a <span class="hl kwa">class</span><span class="hl opt">=</span>listheading href<span class="hl opt">=</span><span class="hl kwb">$href&amp;sort</span><span class="hl opt">=</span>startdate<span class="hl opt">&gt;|</span></li>
<li id="n_528" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Startdate&#39;</span><span class="hl opt">)</span></li>
<li id="n_529" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;</span><span class="hl kwd">/a&gt;&lt;/</span>th<span class="hl opt">&gt;|;</span></li>
<li id="n_530" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>partnumber<span class="hl opt">} =</span></li>
<li id="n_531" class="hl">        <span class="hl sng">&quot;&lt;th&gt;&lt;a class=listheading href=</span><span class="hl ipl">$href&amp;sort</span><span class="hl sng">=partnumber&gt;&quot;</span></li>
<li id="n_532" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Assembly&#39;</span><span class="hl opt">)</span></li>
<li id="n_533" class="hl">      <span class="hl opt">. </span><span class="hl sng">&quot;&lt;/a&gt;&lt;/th&gt;&quot;</span><span class="hl opt">;</span></li>
<li id="n_534" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>production<span class="hl opt">} =</span></li>
<li id="n_535" class="hl">      <span class="hl sng">&quot;&lt;th class=listheading&gt;&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Production&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot;&lt;/a&gt;&lt;/th&gt;&quot;</span><span class="hl opt">;</span></li>
<li id="n_536" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>completed<span class="hl opt">} =</span></li>
<li id="n_537" class="hl">      <span class="hl sng">&quot;&lt;th class=listheading&gt;&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Completed&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot;&lt;/a&gt;&lt;/th&gt;&quot;</span><span class="hl opt">;</span></li>
<li id="n_538" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>stock<span class="hl opt">} =</span></li>
<li id="n_539" class="hl">      <span class="hl sng">&quot;&lt;th class=listheading&gt;&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Add&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot;&lt;/a&gt;&lt;/th&gt;&quot;</span><span class="hl opt">;</span></li>
<li id="n_540" class="hl"></li>
<li id="n_541" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">header</span><span class="hl opt">;</span></li>
<li id="n_542" class="hl"></li>
<li id="n_543" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_project<span class="hl opt">} } ) {</span></li>
<li id="n_544" class="hl">        <span class="hl kwb">$sameitem </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_project<span class="hl opt">}-&gt;[</span><span class="hl num">0</span><span class="hl opt">]-&gt;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwc">sort</span><span class="hl opt">} };</span></li>
<li id="n_545" class="hl">    <span class="hl opt">}</span></li>
<li id="n_546" class="hl"></li>
<li id="n_547" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_548" class="hl"><span class="hl opt">&lt;</span>body<span class="hl opt">&gt;</span></li>
<li id="n_549" class="hl"></li>
<li id="n_550" class="hl"><span class="hl opt">&lt;</span>form <span class="hl kwa">method</span><span class="hl opt">=</span>post action<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>script<span class="hl opt">}&gt;</span></li>
<li id="n_551" class="hl"></li>
<li id="n_552" class="hl"><span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_553" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_554" class="hl">    <span class="hl opt">&lt;</span>th <span class="hl kwa">class</span><span class="hl opt">=</span>listtop<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">}&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_555" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_556" class="hl">  <span class="hl opt">&lt;</span>tr height<span class="hl opt">=</span><span class="hl sng">&quot;5&quot;</span><span class="hl opt">&gt;&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_557" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_558" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$option</span><span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_559" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_560" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_561" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_562" class="hl">      <span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_563" class="hl">    <span class="hl opt">&lt;</span>tr <span class="hl kwa">class</span><span class="hl opt">=</span>listheading<span class="hl opt">&gt;</span></li>
<li id="n_564" class="hl"><span class="hl opt">|;</span></li>
<li id="n_565" class="hl"></li>
<li id="n_566" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl kwb">&#64;column_index</span><span class="hl opt">) { </span><span class="hl kwc">print </span><span class="hl sng">&quot;</span><span class="hl ipl">$column_header</span><span class="hl sng">{</span><span class="hl ipl">$_</span><span class="hl sng">}</span><span class="hl esc">\n</span><span class="hl sng">&quot;</span> <span class="hl opt">}</span></li>
<li id="n_567" class="hl"></li>
<li id="n_568" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_569" class="hl">        <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_570" class="hl"><span class="hl opt">|;</span></li>
<li id="n_571" class="hl"></li>
<li id="n_572" class="hl">    <span class="hl slc"># escape callback</span></li>
<li id="n_573" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>callback<span class="hl opt">} = </span><span class="hl kwb">$callback </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;sort=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{sort}&quot;</span><span class="hl opt">;</span></li>
<li id="n_574" class="hl"></li>
<li id="n_575" class="hl">    <span class="hl slc"># escape callback for href</span></li>
<li id="n_576" class="hl">    <span class="hl kwb">$callback </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">escape</span><span class="hl opt">(</span><span class="hl kwb">$callback</span><span class="hl opt">);</span></li>
<li id="n_577" class="hl"></li>
<li id="n_578" class="hl">    <span class="hl slc"># flip direction</span></li>
<li id="n_579" class="hl">    <span class="hl kwb">$direction </span><span class="hl opt">= ( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>direction<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;ASC&#39;</span> <span class="hl opt">) ? </span><span class="hl sng">&quot;ASC&quot;</span> <span class="hl opt">: </span><span class="hl sng">&quot;DESC&quot;</span><span class="hl opt">;</span></li>
<li id="n_580" class="hl">    <span class="hl kwb">$href </span><span class="hl opt">=~ </span><span class="hl kwd">s/&amp;direction=(\w+)&amp;/&amp;direction=$direction&amp;/</span><span class="hl opt">;</span></li>
<li id="n_581" class="hl"></li>
<li id="n_582" class="hl">    <span class="hl kwb">$i </span><span class="hl opt">= </span><span class="hl num">0</span><span class="hl opt">;</span></li>
<li id="n_583" class="hl">    <span class="hl kwa">foreach </span><span class="hl kwb">$ref </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_project<span class="hl opt">} } ) {</span></li>
<li id="n_584" class="hl"></li>
<li id="n_585" class="hl">        <span class="hl kwb">$i++</span><span class="hl opt">;</span></li>
<li id="n_586" class="hl"></li>
<li id="n_587" class="hl">        <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(projectnumber description startdate enddate partnumber)</span><span class="hl opt">) {</span></li>
<li id="n_588" class="hl">            <span class="hl kwb">$column_data</span><span class="hl opt">{</span><span class="hl kwb">$_</span><span class="hl opt">} = </span>qq<span class="hl opt">|&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">}&amp;</span>nbsp<span class="hl opt">;&lt;/</span>td<span class="hl opt">&gt;|;</span></li>
<li id="n_589" class="hl">        <span class="hl opt">}</span></li>
<li id="n_590" class="hl">        <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(production completed)</span><span class="hl opt">) {</span></li>
<li id="n_591" class="hl">            <span class="hl kwb">$column_data</span><span class="hl opt">{</span><span class="hl kwb">$_</span><span class="hl opt">} =</span></li>
<li id="n_592" class="hl">                qq<span class="hl opt">|&lt;</span>td align<span class="hl opt">=</span>right<span class="hl opt">&gt;|</span></li>
<li id="n_593" class="hl">              <span class="hl opt">. </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">format_amount</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} )</span></li>
<li id="n_594" class="hl">              <span class="hl opt">. </span>qq<span class="hl opt">|&lt;/</span>td<span class="hl opt">&gt;|;</span></li>
<li id="n_595" class="hl">        <span class="hl opt">}</span></li>
<li id="n_596" class="hl">        <span class="hl kwb">$column_data</span><span class="hl opt">{</span>stock<span class="hl opt">} = </span>qq<span class="hl opt">|&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span><span class="hl sng">&quot;stock_</span><span class="hl ipl">$i</span><span class="hl sng">&quot;</span> size<span class="hl opt">=</span><span class="hl num">6</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;|;</span></li>
<li id="n_597" class="hl"></li>
<li id="n_598" class="hl">        <span class="hl kwb">$j++</span><span class="hl opt">;</span></li>
<li id="n_599" class="hl">        <span class="hl kwb">$j </span><span class="hl opt">%= </span><span class="hl num">2</span><span class="hl opt">;</span></li>
<li id="n_600" class="hl"></li>
<li id="n_601" class="hl">        <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_602" class="hl">        <span class="hl opt">&lt;</span>tr valign<span class="hl opt">=</span>top <span class="hl kwa">class</span><span class="hl opt">=</span>listrow<span class="hl kwb">$j</span><span class="hl opt">&gt;</span></li>
<li id="n_603" class="hl">    <span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span><span class="hl sng">&quot;id_</span><span class="hl ipl">$i</span><span class="hl sng">&quot;</span> value<span class="hl opt">=</span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">}&gt;</span></li>
<li id="n_604" class="hl"><span class="hl opt">|;</span></li>
<li id="n_605" class="hl"></li>
<li id="n_606" class="hl">        <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl kwb">&#64;column_index</span><span class="hl opt">) { </span><span class="hl kwc">print </span><span class="hl sng">&quot;</span><span class="hl ipl">$column_data</span><span class="hl sng">{</span><span class="hl ipl">$_</span><span class="hl sng">}</span><span class="hl esc">\n</span><span class="hl sng">&quot;</span> <span class="hl opt">}</span></li>
<li id="n_607" class="hl"></li>
<li id="n_608" class="hl">        <span class="hl kwc">print </span><span class="hl sng">&quot;</span></li>
<li id="n_609" class="hl"><span class="hl sng">        &lt;/tr&gt;</span></li>
<li id="n_610" class="hl"><span class="hl sng">&quot;</span><span class="hl opt">;</span></li>
<li id="n_611" class="hl">    <span class="hl opt">}</span></li>
<li id="n_612" class="hl"></li>
<li id="n_613" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_614" class="hl">      <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_615" class="hl">    <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_616" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_617" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_618" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>hr size<span class="hl opt">=</span><span class="hl num">3 </span>noshade<span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_619" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_620" class="hl"><span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_621" class="hl"><span class="hl opt">|;</span></li>
<li id="n_622" class="hl"></li>
<li id="n_623" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">hide_form</span><span class="hl opt">(</span><span class="hl sng">qw(callback type path login sessionid status)</span><span class="hl opt">);</span></li>
<li id="n_624" class="hl"></li>
<li id="n_625" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_626" class="hl"><span class="hl opt">&lt;</span>input type<span class="hl opt">=</span><span class="hl sng">&quot;hidden&quot;</span> name<span class="hl opt">=</span><span class="hl sng">&quot;nextsub&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;stock&quot;</span><span class="hl opt">&gt;</span></li>
<li id="n_627" class="hl"><span class="hl opt">&lt;</span>br<span class="hl opt">&gt;</span></li>
<li id="n_628" class="hl"><span class="hl opt">&lt;</span>button type<span class="hl opt">=</span><span class="hl sng">&quot;submit&quot;</span> <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;submit&quot;</span> name<span class="hl opt">=</span><span class="hl sng">&quot;action&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;continue&quot;</span><span class="hl opt">&gt;|</span></li>
<li id="n_629" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Continue&#39;</span><span class="hl opt">)</span></li>
<li id="n_630" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;/</span>button<span class="hl opt">&gt;</span></li>
<li id="n_631" class="hl"><span class="hl opt">&lt;/</span>form<span class="hl opt">&gt;</span></li>
<li id="n_632" class="hl"></li>
<li id="n_633" class="hl"><span class="hl opt">&lt;/</span>body<span class="hl opt">&gt;</span></li>
<li id="n_634" class="hl"><span class="hl opt">&lt;/</span>html<span class="hl opt">&gt;</span></li>
<li id="n_635" class="hl"><span class="hl opt">|;</span></li>
<li id="n_636" class="hl"></li>
<li id="n_637" class="hl"><span class="hl opt">}</span></li>
<li id="n_638" class="hl"></li>
<li id="n_639" class="hl"><span class="hl kwa">sub </span>stock <span class="hl opt">{</span></li>
<li id="n_640" class="hl"></li>
<li id="n_641" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span>PE-<span class="hl opt">&gt;</span><span class="hl kwd">stock_assembly</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">) ) {</span></li>
<li id="n_642" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Assembly stocked!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_643" class="hl">    <span class="hl opt">}</span></li>
<li id="n_644" class="hl">    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_645" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">error</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Cannot stock Assembly!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_646" class="hl">    <span class="hl opt">}</span></li>
<li id="n_647" class="hl"></li>
<li id="n_648" class="hl"><span class="hl opt">}</span></li>
<li id="n_649" class="hl"></li>
<li id="n_650" class="hl"><span class="hl kwa">sub </span>prepare_project <span class="hl opt">{</span></li>
<li id="n_651" class="hl"></li>
<li id="n_652" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">} = </span><span class="hl sng">&#39;customer&#39;</span><span class="hl opt">;</span></li>
<li id="n_653" class="hl"></li>
<li id="n_654" class="hl">    PE-<span class="hl opt">&gt;</span><span class="hl kwd">get_project</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_655" class="hl"></li>
<li id="n_656" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} =</span></li>
<li id="n_657" class="hl">      <span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">} )</span></li>
<li id="n_658" class="hl">      <span class="hl opt">? </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Edit Project&#39;</span><span class="hl opt">)</span></li>
<li id="n_659" class="hl">      <span class="hl opt">: </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Add Project&#39;</span><span class="hl opt">);</span></li>
<li id="n_660" class="hl"></li>
<li id="n_661" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;old</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =</span></li>
<li id="n_662" class="hl">      qq<span class="hl opt">|</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}--</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">}|;</span></li>
<li id="n_663" class="hl"></li>
<li id="n_664" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;all_</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} } ) {</span></li>
<li id="n_665" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =</span></li>
<li id="n_666" class="hl">          qq<span class="hl opt">|</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}--</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">}|;</span></li>
<li id="n_667" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} = </span>qq<span class="hl opt">|&lt;</span>option<span class="hl opt">&gt;</span><span class="hl esc">\n</span><span class="hl opt">|;</span></li>
<li id="n_668" class="hl">        <span class="hl kwa">for </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;all_</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} } ) {</span></li>
<li id="n_669" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} .=</span></li>
<li id="n_670" class="hl">              qq<span class="hl opt">|&lt;</span>option value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$_</span><span class="hl sng">-&gt;{name}--</span><span class="hl ipl">$_</span><span class="hl sng">-&gt;{id}&quot;</span><span class="hl opt">&gt;</span><span class="hl kwb">$_</span><span class="hl opt">-&gt;{</span>name<span class="hl opt">}</span><span class="hl esc">\n</span><span class="hl opt">|;</span></li>
<li id="n_671" class="hl">        <span class="hl opt">}</span></li>
<li id="n_672" class="hl">    <span class="hl opt">}</span></li>
<li id="n_673" class="hl"></li>
<li id="n_674" class="hl"><span class="hl opt">}</span></li>
<li id="n_675" class="hl"></li>
<li id="n_676" class="hl"><span class="hl kwa">sub </span>search <span class="hl opt">{</span></li>
<li id="n_677" class="hl"></li>
<li id="n_678" class="hl">    <span class="hl slc"># accounting years</span></li>
<li id="n_679" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">all_years</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig </span><span class="hl opt">);</span></li>
<li id="n_680" class="hl"></li>
<li id="n_681" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_years<span class="hl opt">} } ) {</span></li>
<li id="n_682" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectaccountingyear<span class="hl opt">} = </span><span class="hl sng">&quot;&lt;option&gt;</span><span class="hl esc">\n</span><span class="hl sng">&quot;</span><span class="hl opt">;</span></li>
<li id="n_683" class="hl">        <span class="hl kwa">for </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_years<span class="hl opt">} } ) {</span></li>
<li id="n_684" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectaccountingyear<span class="hl opt">} .= </span>qq<span class="hl opt">|&lt;</span>option<span class="hl opt">&gt;</span><span class="hl kwb">$_</span><span class="hl esc">\n</span><span class="hl opt">|;</span></li>
<li id="n_685" class="hl">        <span class="hl opt">}</span></li>
<li id="n_686" class="hl"></li>
<li id="n_687" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectaccountingmonth<span class="hl opt">} = </span><span class="hl sng">&quot;&lt;option&gt;</span><span class="hl esc">\n</span><span class="hl sng">&quot;</span><span class="hl opt">;</span></li>
<li id="n_688" class="hl">        <span class="hl kwa">for </span><span class="hl opt">( </span><span class="hl kwc">sort keys </span><span class="hl opt">%{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_month<span class="hl opt">} } ) {</span></li>
<li id="n_689" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectaccountingmonth<span class="hl opt">} .=</span></li>
<li id="n_690" class="hl">              qq<span class="hl opt">|&lt;</span>option value<span class="hl opt">=</span><span class="hl kwb">$_</span><span class="hl opt">&gt;|</span></li>
<li id="n_691" class="hl">              <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_month<span class="hl opt">}{</span><span class="hl kwb">$_</span><span class="hl opt">} ) . </span>qq<span class="hl opt">|</span><span class="hl esc">\n</span><span class="hl opt">|;</span></li>
<li id="n_692" class="hl">        <span class="hl opt">}</span></li>
<li id="n_693" class="hl"></li>
<li id="n_694" class="hl">        <span class="hl kwb">$fromto </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_695" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_696" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Startdate&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_697" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;|</span></li>
<li id="n_698" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;From&#39;</span><span class="hl opt">)</span></li>
<li id="n_699" class="hl">          <span class="hl opt">. </span>qq<span class="hl opt">| &lt;</span>input <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;date&quot;</span> name<span class="hl opt">=</span>startdatefrom size<span class="hl opt">=</span><span class="hl num">11 </span>title<span class="hl opt">=</span><span class="hl sng">&quot;(</span><span class="hl ipl">$myconfig</span><span class="hl sng">{&#39;dateformat&#39;})&quot;</span><span class="hl opt">&gt;|</span></li>
<li id="n_700" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;To&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|</span></li>
<li id="n_701" class="hl">      <span class="hl opt">&lt;</span>input <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;date&quot;</span> name<span class="hl opt">=</span>startdateto size<span class="hl opt">=</span><span class="hl num">11 </span>title<span class="hl opt">=</span><span class="hl sng">&quot;(</span><span class="hl ipl">$myconfig</span><span class="hl sng">{&#39;dateformat&#39;})&quot;</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_702" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_703" class="hl"><span class="hl opt">|;</span></li>
<li id="n_704" class="hl"></li>
<li id="n_705" class="hl">        <span class="hl kwb">$selectperiod </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_706" class="hl">        <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_707" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Period&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_708" class="hl">      <span class="hl opt">&lt;</span>td colspan<span class="hl opt">=</span><span class="hl num">3</span><span class="hl opt">&gt;</span></li>
<li id="n_709" class="hl">      <span class="hl opt">&lt;</span><span class="hl kwc">select </span>name<span class="hl opt">=</span>month<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectaccountingmonth<span class="hl opt">}&lt;/</span><span class="hl kwc">select</span><span class="hl opt">&gt;</span></li>
<li id="n_710" class="hl">      <span class="hl opt">&lt;</span><span class="hl kwc">select </span>name<span class="hl opt">=</span>year<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>selectaccountingyear<span class="hl opt">}&lt;/</span><span class="hl kwc">select</span><span class="hl opt">&gt;</span></li>
<li id="n_711" class="hl">      <span class="hl opt">&lt;</span>input name<span class="hl opt">=</span>interval <span class="hl kwa">class</span><span class="hl opt">=</span>radio type<span class="hl opt">=</span>radio value<span class="hl opt">=</span><span class="hl num">0 </span>checked<span class="hl opt">&gt;&amp;</span>nbsp<span class="hl opt">;|</span></li>
<li id="n_712" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Current&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|</span></li>
<li id="n_713" class="hl">      <span class="hl opt">&lt;</span>input name<span class="hl opt">=</span>interval <span class="hl kwa">class</span><span class="hl opt">=</span>radio type<span class="hl opt">=</span>radio value<span class="hl opt">=</span><span class="hl num">1</span><span class="hl opt">&gt;&amp;</span>nbsp<span class="hl opt">;|</span></li>
<li id="n_714" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Month&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|</span></li>
<li id="n_715" class="hl">      <span class="hl opt">&lt;</span>input name<span class="hl opt">=</span>interval <span class="hl kwa">class</span><span class="hl opt">=</span>radio type<span class="hl opt">=</span>radio value<span class="hl opt">=</span><span class="hl num">3</span><span class="hl opt">&gt;&amp;</span>nbsp<span class="hl opt">;|</span></li>
<li id="n_716" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Quarter&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|</span></li>
<li id="n_717" class="hl">      <span class="hl opt">&lt;</span>input name<span class="hl opt">=</span>interval <span class="hl kwa">class</span><span class="hl opt">=</span>radio type<span class="hl opt">=</span>radio value<span class="hl opt">=</span><span class="hl num">12</span><span class="hl opt">&gt;&amp;</span>nbsp<span class="hl opt">;|</span></li>
<li id="n_718" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Year&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|</span></li>
<li id="n_719" class="hl">      <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_720" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_721" class="hl"><span class="hl opt">|;</span></li>
<li id="n_722" class="hl">    <span class="hl opt">}</span></li>
<li id="n_723" class="hl"></li>
<li id="n_724" class="hl">    <span class="hl kwb">$orphaned </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_725" class="hl">      <span class="hl opt">&lt;</span>input name<span class="hl opt">=</span>status <span class="hl kwa">class</span><span class="hl opt">=</span>radio type<span class="hl opt">=</span>radio value<span class="hl opt">=</span>orphaned<span class="hl opt">&gt;&amp;</span>nbsp<span class="hl opt">;|</span></li>
<li id="n_726" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Orphaned&#39;</span><span class="hl opt">);</span></li>
<li id="n_727" class="hl"></li>
<li id="n_728" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;project&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_729" class="hl">        <span class="hl kwb">$report        </span><span class="hl opt">= </span><span class="hl sng">&quot;project_report&quot;</span><span class="hl opt">;</span></li>
<li id="n_730" class="hl">        <span class="hl kwb">$sort          </span><span class="hl opt">= </span><span class="hl sng">&quot;projectnumber&quot;</span><span class="hl opt">;</span></li>
<li id="n_731" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} = </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Projects&#39;</span><span class="hl opt">);</span></li>
<li id="n_732" class="hl"></li>
<li id="n_733" class="hl">        <span class="hl kwb">$number </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_734" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_735" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right width<span class="hl opt">=</span><span class="hl num">1</span><span class="hl opt">%&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Number&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_736" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>projectnumber size<span class="hl opt">=</span><span class="hl num">20</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_737" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_738" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_739" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Description&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_740" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>description size<span class="hl opt">=</span><span class="hl num">60</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_741" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_742" class="hl"><span class="hl opt">|;</span></li>
<li id="n_743" class="hl">    <span class="hl opt">}</span></li>
<li id="n_744" class="hl"></li>
<li id="n_745" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;stock&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_746" class="hl">        <span class="hl kwb">$report </span><span class="hl opt">= </span><span class="hl sng">&quot;list_stock&quot;</span><span class="hl opt">;</span></li>
<li id="n_747" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} = </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Stock Finished Goods&#39;</span><span class="hl opt">);</span></li>
<li id="n_748" class="hl">        PE-<span class="hl opt">&gt;</span><span class="hl kwd">list_stock</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_749" class="hl"></li>
<li id="n_750" class="hl">        <span class="hl kwb">$selectperiod </span><span class="hl opt">= </span><span class="hl sng">&quot;&quot;</span><span class="hl opt">;</span></li>
<li id="n_751" class="hl">        <span class="hl kwb">$orphaned     </span><span class="hl opt">= </span><span class="hl sng">&quot;&quot;</span><span class="hl opt">;</span></li>
<li id="n_752" class="hl">        <span class="hl kwb">$fromto       </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_753" class="hl">        <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_754" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right nowrap<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;As of&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_755" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;date&quot;</span> name<span class="hl opt">=</span>stockingdate size<span class="hl opt">=</span><span class="hl num">11 </span>title<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$myconfig</span><span class="hl sng">{dateformat}&quot;</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_756" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_757" class="hl"><span class="hl opt">|;</span></li>
<li id="n_758" class="hl"></li>
<li id="n_759" class="hl">        <span class="hl kwb">$number </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_760" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_761" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right width<span class="hl opt">=</span><span class="hl num">1</span><span class="hl opt">%&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Job Number&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_762" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>projectnumber size<span class="hl opt">=</span><span class="hl num">20</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_763" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_764" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_765" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Description&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_766" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>description size<span class="hl opt">=</span><span class="hl num">60</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_767" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_768" class="hl"><span class="hl opt">|;</span></li>
<li id="n_769" class="hl">    <span class="hl opt">}</span></li>
<li id="n_770" class="hl"></li>
<li id="n_771" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;job&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_772" class="hl">        <span class="hl kwb">$report        </span><span class="hl opt">= </span><span class="hl sng">&quot;job_report&quot;</span><span class="hl opt">;</span></li>
<li id="n_773" class="hl">        <span class="hl kwb">$sort          </span><span class="hl opt">= </span><span class="hl sng">&quot;projectnumber&quot;</span><span class="hl opt">;</span></li>
<li id="n_774" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} = </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Jobs&#39;</span><span class="hl opt">);</span></li>
<li id="n_775" class="hl"></li>
<li id="n_776" class="hl">        <span class="hl kwb">$number </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_777" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_778" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right width<span class="hl opt">=</span><span class="hl num">1</span><span class="hl opt">%&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Number&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_779" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>projectnumber size<span class="hl opt">=</span><span class="hl num">20</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_780" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_781" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_782" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Description&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_783" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>description size<span class="hl opt">=</span><span class="hl num">60</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_784" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_785" class="hl"><span class="hl opt">|;</span></li>
<li id="n_786" class="hl">    <span class="hl opt">}</span></li>
<li id="n_787" class="hl"></li>
<li id="n_788" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;partsgroup&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_789" class="hl">        <span class="hl kwb">$report        </span><span class="hl opt">= </span><span class="hl sng">&quot;partsgroup_report&quot;</span><span class="hl opt">;</span></li>
<li id="n_790" class="hl">        <span class="hl kwb">$sort          </span><span class="hl opt">= </span><span class="hl sng">&#39;partsgroup&#39;</span><span class="hl opt">;</span></li>
<li id="n_791" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} = </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Groups&#39;</span><span class="hl opt">);</span></li>
<li id="n_792" class="hl"></li>
<li id="n_793" class="hl">        <span class="hl kwb">$fromto       </span><span class="hl opt">= </span><span class="hl sng">&quot;&quot;</span><span class="hl opt">;</span></li>
<li id="n_794" class="hl">        <span class="hl kwb">$selectperiod </span><span class="hl opt">= </span><span class="hl sng">&quot;&quot;</span><span class="hl opt">;</span></li>
<li id="n_795" class="hl">        <span class="hl kwb">$number       </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_796" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_797" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right width<span class="hl opt">=</span><span class="hl num">1</span><span class="hl opt">%&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Group&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_798" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>partsgroup size<span class="hl opt">=</span><span class="hl num">20</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_799" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_800" class="hl"><span class="hl opt">|;</span></li>
<li id="n_801" class="hl">    <span class="hl opt">}</span></li>
<li id="n_802" class="hl"></li>
<li id="n_803" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;pricegroup&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_804" class="hl">        <span class="hl kwb">$report        </span><span class="hl opt">= </span><span class="hl sng">&quot;pricegroup_report&quot;</span><span class="hl opt">;</span></li>
<li id="n_805" class="hl">        <span class="hl kwb">$sort          </span><span class="hl opt">= </span><span class="hl sng">&#39;pricegroup&#39;</span><span class="hl opt">;</span></li>
<li id="n_806" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} = </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Pricegroups&#39;</span><span class="hl opt">);</span></li>
<li id="n_807" class="hl"></li>
<li id="n_808" class="hl">        <span class="hl kwb">$fromto       </span><span class="hl opt">= </span><span class="hl sng">&quot;&quot;</span><span class="hl opt">;</span></li>
<li id="n_809" class="hl">        <span class="hl kwb">$selectperiod </span><span class="hl opt">= </span><span class="hl sng">&quot;&quot;</span><span class="hl opt">;</span></li>
<li id="n_810" class="hl">        <span class="hl kwb">$number       </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_811" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_812" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right width<span class="hl opt">=</span><span class="hl num">1</span><span class="hl opt">%&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Pricegroup&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_813" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>pricegroup size<span class="hl opt">=</span><span class="hl num">20</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_814" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_815" class="hl"><span class="hl opt">|;</span></li>
<li id="n_816" class="hl">    <span class="hl opt">}</span></li>
<li id="n_817" class="hl"></li>
<li id="n_818" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">header</span><span class="hl opt">;</span></li>
<li id="n_819" class="hl"></li>
<li id="n_820" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_821" class="hl"><span class="hl opt">&lt;</span>body<span class="hl opt">&gt;</span></li>
<li id="n_822" class="hl"></li>
<li id="n_823" class="hl"><span class="hl opt">&lt;</span>form <span class="hl kwa">method</span><span class="hl opt">=</span>post action<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>script<span class="hl opt">}&gt;</span></li>
<li id="n_824" class="hl"></li>
<li id="n_825" class="hl"><span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span><span class="hl kwc">sort </span>value<span class="hl opt">=</span><span class="hl kwb">$sort</span><span class="hl opt">&gt;</span></li>
<li id="n_826" class="hl"><span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span>type value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">}&gt;</span></li>
<li id="n_827" class="hl"></li>
<li id="n_828" class="hl"><span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_829" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_830" class="hl">    <span class="hl opt">&lt;</span>th <span class="hl kwa">class</span><span class="hl opt">=</span>listtop<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">}&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_831" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_832" class="hl">  <span class="hl opt">&lt;</span>tr height<span class="hl opt">=</span><span class="hl sng">&quot;5&quot;</span><span class="hl opt">&gt;&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_833" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_834" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_835" class="hl">      <span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_836" class="hl">        <span class="hl kwb">$number</span></li>
<li id="n_837" class="hl">    <span class="hl kwb">$fromto</span></li>
<li id="n_838" class="hl">    <span class="hl kwb">$selectperiod</span></li>
<li id="n_839" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_840" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_841" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>status <span class="hl kwa">class</span><span class="hl opt">=</span>radio type<span class="hl opt">=</span>radio value<span class="hl opt">=</span>all checked<span class="hl opt">&gt;&amp;</span>nbsp<span class="hl opt">;|</span></li>
<li id="n_842" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;All&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|</span></li>
<li id="n_843" class="hl">      <span class="hl opt">&lt;</span>input name<span class="hl opt">=</span>status <span class="hl kwa">class</span><span class="hl opt">=</span>radio type<span class="hl opt">=</span>radio value<span class="hl opt">=</span>active<span class="hl opt">&gt;&amp;</span>nbsp<span class="hl opt">;|</span></li>
<li id="n_844" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Active&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|</span></li>
<li id="n_845" class="hl">      <span class="hl opt">&lt;</span>input name<span class="hl opt">=</span>status <span class="hl kwa">class</span><span class="hl opt">=</span>radio type<span class="hl opt">=</span>radio value<span class="hl opt">=</span>inactive<span class="hl opt">&gt;&amp;</span>nbsp<span class="hl opt">;|</span></li>
<li id="n_846" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Inactive&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|</span></li>
<li id="n_847" class="hl">      <span class="hl kwb">$orphaned</span><span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_848" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_849" class="hl">      <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_850" class="hl">    <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_851" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_852" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_853" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>hr size<span class="hl opt">=</span><span class="hl num">3 </span>noshade<span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_854" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_855" class="hl"><span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_856" class="hl"></li>
<li id="n_857" class="hl"><span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span>nextsub value<span class="hl opt">=</span><span class="hl kwb">$report</span><span class="hl opt">&gt;</span></li>
<li id="n_858" class="hl"><span class="hl opt">|;</span></li>
<li id="n_859" class="hl"></li>
<li id="n_860" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">hide_form</span><span class="hl opt">(</span><span class="hl sng">qw(path login sessionid title)</span><span class="hl opt">);</span></li>
<li id="n_861" class="hl"></li>
<li id="n_862" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_863" class="hl"><span class="hl opt">&lt;</span>button <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;submit&quot;</span> type<span class="hl opt">=</span><span class="hl sng">&quot;submit&quot;</span> name<span class="hl opt">=</span><span class="hl sng">&quot;action&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;continue&quot;</span><span class="hl opt">&gt;|</span></li>
<li id="n_864" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Continue&#39;</span><span class="hl opt">)</span></li>
<li id="n_865" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;/</span>button<span class="hl opt">&gt;</span></li>
<li id="n_866" class="hl"><span class="hl opt">&lt;/</span>form<span class="hl opt">&gt;</span></li>
<li id="n_867" class="hl"><span class="hl opt">|;</span></li>
<li id="n_868" class="hl"></li>
<li id="n_869" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>lynx<span class="hl opt">} ) {</span></li>
<li id="n_870" class="hl">        <span class="hl kwa">require </span><span class="hl sng">&quot;bin/menu.pl&quot;</span><span class="hl opt">;</span></li>
<li id="n_871" class="hl">        <span class="hl opt">&amp;</span>menubar<span class="hl opt">;</span></li>
<li id="n_872" class="hl">    <span class="hl opt">}</span></li>
<li id="n_873" class="hl"></li>
<li id="n_874" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_875" class="hl"> </li>
<li id="n_876" class="hl"><span class="hl opt">&lt;/</span>body<span class="hl opt">&gt;</span></li>
<li id="n_877" class="hl"><span class="hl opt">&lt;/</span>html<span class="hl opt">&gt;</span></li>
<li id="n_878" class="hl"><span class="hl opt">|;</span></li>
<li id="n_879" class="hl"></li>
<li id="n_880" class="hl"><span class="hl opt">}</span></li>
<li id="n_881" class="hl"></li>
<li id="n_882" class="hl"><span class="hl kwa">sub </span>job_report <span class="hl opt">{</span></li>
<li id="n_883" class="hl"></li>
<li id="n_884" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(projectnumber description)</span><span class="hl opt">) {</span></li>
<li id="n_885" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">unescape</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} );</span></li>
<li id="n_886" class="hl">    <span class="hl opt">}</span></li>
<li id="n_887" class="hl">    PE-<span class="hl opt">&gt;</span><span class="hl kwd">jobs</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_888" class="hl"></li>
<li id="n_889" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>action<span class="hl opt">} = </span><span class="hl sng">&quot;job_report&quot;</span><span class="hl opt">;</span></li>
<li id="n_890" class="hl">    <span class="hl opt">&amp;</span>list_projects<span class="hl opt">;</span></li>
<li id="n_891" class="hl"></li>
<li id="n_892" class="hl"><span class="hl opt">}</span></li>
<li id="n_893" class="hl"></li>
<li id="n_894" class="hl"><span class="hl kwa">sub </span>project_report <span class="hl opt">{</span></li>
<li id="n_895" class="hl"></li>
<li id="n_896" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(projectnumber description)</span><span class="hl opt">) {</span></li>
<li id="n_897" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">unescape</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} );</span></li>
<li id="n_898" class="hl">    <span class="hl opt">}</span></li>
<li id="n_899" class="hl">    PE-<span class="hl opt">&gt;</span><span class="hl kwd">projects</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_900" class="hl"></li>
<li id="n_901" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>action<span class="hl opt">} = </span><span class="hl sng">&quot;project_report&quot;</span><span class="hl opt">;</span></li>
<li id="n_902" class="hl">    <span class="hl opt">&amp;</span>list_projects<span class="hl opt">;</span></li>
<li id="n_903" class="hl"></li>
<li id="n_904" class="hl"><span class="hl opt">}</span></li>
<li id="n_905" class="hl"></li>
<li id="n_906" class="hl"><span class="hl kwa">sub </span>list_projects <span class="hl opt">{</span></li>
<li id="n_907" class="hl"></li>
<li id="n_908" class="hl">    <span class="hl kwb">$href </span><span class="hl opt">= </span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{script}?&quot;</span><span class="hl opt">;</span></li>
<li id="n_909" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span></li>
<li id="n_910" class="hl">        <span class="hl sng">qw(action direction oldsort type path login sessionid status startdatefrom startdateto)</span></li>
<li id="n_911" class="hl">      <span class="hl opt">)</span></li>
<li id="n_912" class="hl">    <span class="hl opt">{</span></li>
<li id="n_913" class="hl">        <span class="hl kwb">$href </span><span class="hl opt">.= </span><span class="hl sng">&quot;</span><span class="hl ipl">$_</span><span class="hl sng">=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{</span><span class="hl ipl">$_</span><span class="hl sng">}&amp;&quot;</span><span class="hl opt">;</span></li>
<li id="n_914" class="hl">    <span class="hl opt">}</span></li>
<li id="n_915" class="hl"></li>
<li id="n_916" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">sort_order</span><span class="hl opt">();</span></li>
<li id="n_917" class="hl"></li>
<li id="n_918" class="hl">    <span class="hl kwb">$callback </span><span class="hl opt">= </span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{script}?&quot;</span><span class="hl opt">;</span></li>
<li id="n_919" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span></li>
<li id="n_920" class="hl">        <span class="hl sng">qw(action direction oldsort type path login sessionid status startdatefrom startdateto)</span></li>
<li id="n_921" class="hl">      <span class="hl opt">)</span></li>
<li id="n_922" class="hl">    <span class="hl opt">{</span></li>
<li id="n_923" class="hl">        <span class="hl kwb">$callback </span><span class="hl opt">.= </span><span class="hl sng">&quot;</span><span class="hl ipl">$_</span><span class="hl sng">=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{</span><span class="hl ipl">$_</span><span class="hl sng">}&amp;&quot;</span><span class="hl opt">;</span></li>
<li id="n_924" class="hl">    <span class="hl opt">}</span></li>
<li id="n_925" class="hl"></li>
<li id="n_926" class="hl">    <span class="hl kwb">&#64;column_index </span><span class="hl opt">=</span></li>
<li id="n_927" class="hl">      <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">sort_columns</span><span class="hl opt">(</span><span class="hl sng">qw(projectnumber description name startdate enddate)</span><span class="hl opt">);</span></li>
<li id="n_928" class="hl"></li>
<li id="n_929" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>status<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;all&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_930" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">= </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;All&#39;</span><span class="hl opt">);</span></li>
<li id="n_931" class="hl">    <span class="hl opt">}</span></li>
<li id="n_932" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>status<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;orphaned&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_933" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">.= </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Orphaned&#39;</span><span class="hl opt">);</span></li>
<li id="n_934" class="hl">    <span class="hl opt">}</span></li>
<li id="n_935" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>status<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;active&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_936" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">= </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Active&#39;</span><span class="hl opt">);</span></li>
<li id="n_937" class="hl">        <span class="hl kwb">&#64;column_index </span><span class="hl opt">=</span></li>
<li id="n_938" class="hl">          <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">sort_columns</span><span class="hl opt">(</span><span class="hl sng">qw(projectnumber description name startdate)</span><span class="hl opt">);</span></li>
<li id="n_939" class="hl">    <span class="hl opt">}</span></li>
<li id="n_940" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>status<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;inactive&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_941" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">= </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Inactive&#39;</span><span class="hl opt">);</span></li>
<li id="n_942" class="hl">    <span class="hl opt">}</span></li>
<li id="n_943" class="hl"></li>
<li id="n_944" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;project&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_945" class="hl">        <span class="hl kwb">$label </span><span class="hl opt">= </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Project&#39;</span><span class="hl opt">);</span></li>
<li id="n_946" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} = </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Projects&#39;</span><span class="hl opt">);</span></li>
<li id="n_947" class="hl">    <span class="hl opt">}</span></li>
<li id="n_948" class="hl">    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_949" class="hl">        <span class="hl kwb">$label </span><span class="hl opt">= </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Job&#39;</span><span class="hl opt">);</span></li>
<li id="n_950" class="hl">        <span class="hl kwc">push </span><span class="hl kwb">&#64;column_index</span><span class="hl opt">, </span><span class="hl sng">qw(partnumber production completed)</span><span class="hl opt">;</span></li>
<li id="n_951" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} = </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Jobs&#39;</span><span class="hl opt">);</span></li>
<li id="n_952" class="hl">    <span class="hl opt">}</span></li>
<li id="n_953" class="hl"></li>
<li id="n_954" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>projectnumber<span class="hl opt">} ) {</span></li>
<li id="n_955" class="hl">        <span class="hl kwb">$href </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;projectnumber=&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">escape</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>projectnumber<span class="hl opt">} );</span></li>
<li id="n_956" class="hl">        <span class="hl kwb">$callback </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;projectnumber=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{projectnumber}&quot;</span><span class="hl opt">;</span></li>
<li id="n_957" class="hl">        <span class="hl kwb">$option   </span><span class="hl opt">.= </span><span class="hl sng">&quot;</span><span class="hl esc">\n</span><span class="hl sng">&lt;br&gt;</span><span class="hl ipl">$label </span><span class="hl sng">: </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{projectnumber}&quot;</span><span class="hl opt">;</span></li>
<li id="n_958" class="hl">    <span class="hl opt">}</span></li>
<li id="n_959" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>description<span class="hl opt">} ) {</span></li>
<li id="n_960" class="hl">        <span class="hl kwb">$href     </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;description=&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">escape</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>description<span class="hl opt">} );</span></li>
<li id="n_961" class="hl">        <span class="hl kwb">$callback </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;description=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{description}&quot;</span><span class="hl opt">;</span></li>
<li id="n_962" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">.=</span></li>
<li id="n_963" class="hl">          <span class="hl sng">&quot;</span><span class="hl esc">\n</span><span class="hl sng">&lt;br&gt;&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Description&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot; : </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{description}&quot;</span><span class="hl opt">;</span></li>
<li id="n_964" class="hl">    <span class="hl opt">}</span></li>
<li id="n_965" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>startdatefrom<span class="hl opt">} ) {</span></li>
<li id="n_966" class="hl">        <span class="hl kwb">$href   </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;startdatefrom=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{startdatefrom}&quot;</span><span class="hl opt">;</span></li>
<li id="n_967" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">.= </span><span class="hl sng">&quot;</span><span class="hl esc">\n</span><span class="hl sng">&lt;br&gt;&quot;</span></li>
<li id="n_968" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;From&#39;</span><span class="hl opt">)</span></li>
<li id="n_969" class="hl">          <span class="hl opt">. </span><span class="hl sng">&quot;&amp;nbsp;&quot;</span></li>
<li id="n_970" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">date</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>startdatefrom<span class="hl opt">}, </span><span class="hl num">1 </span><span class="hl opt">);</span></li>
<li id="n_971" class="hl">    <span class="hl opt">}</span></li>
<li id="n_972" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>startdateto<span class="hl opt">} ) {</span></li>
<li id="n_973" class="hl">        <span class="hl kwb">$href </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;startdateto=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{startdateto}&quot;</span><span class="hl opt">;</span></li>
<li id="n_974" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>startdatefrom<span class="hl opt">} ) {</span></li>
<li id="n_975" class="hl">            <span class="hl kwb">$option </span><span class="hl opt">.= </span><span class="hl sng">&quot; &quot;</span><span class="hl opt">;</span></li>
<li id="n_976" class="hl">        <span class="hl opt">}</span></li>
<li id="n_977" class="hl">        <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_978" class="hl">            <span class="hl kwb">$option </span><span class="hl opt">.= </span><span class="hl sng">&quot;</span><span class="hl esc">\n</span><span class="hl sng">&lt;br&gt;&quot;</span> <span class="hl kwa">if </span><span class="hl opt">(</span><span class="hl kwb">$option</span><span class="hl opt">);</span></li>
<li id="n_979" class="hl">        <span class="hl opt">}</span></li>
<li id="n_980" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">.=</span></li>
<li id="n_981" class="hl">            <span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;To&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot;&amp;nbsp;&quot;</span></li>
<li id="n_982" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">date</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>startdateto<span class="hl opt">}, </span><span class="hl num">1 </span><span class="hl opt">);</span></li>
<li id="n_983" class="hl">    <span class="hl opt">}</span></li>
<li id="n_984" class="hl"></li>
<li id="n_985" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>projectnumber<span class="hl opt">} =</span></li>
<li id="n_986" class="hl">        qq<span class="hl opt">|&lt;</span>th<span class="hl opt">&gt;&lt;</span>a <span class="hl kwa">class</span><span class="hl opt">=</span>listheading href<span class="hl opt">=</span><span class="hl kwb">$href&amp;sort</span><span class="hl opt">=</span>projectnumber<span class="hl opt">&gt;|</span></li>
<li id="n_987" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Number&#39;</span><span class="hl opt">)</span></li>
<li id="n_988" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;</span><span class="hl kwd">/a&gt;&lt;/</span>th<span class="hl opt">&gt;|;</span></li>
<li id="n_989" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>description<span class="hl opt">} =</span></li>
<li id="n_990" class="hl">        qq<span class="hl opt">|&lt;</span>th<span class="hl opt">&gt;&lt;</span>a <span class="hl kwa">class</span><span class="hl opt">=</span>listheading href<span class="hl opt">=</span><span class="hl kwb">$href&amp;sort</span><span class="hl opt">=</span>description<span class="hl opt">&gt;|</span></li>
<li id="n_991" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Description&#39;</span><span class="hl opt">)</span></li>
<li id="n_992" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;</span><span class="hl kwd">/a&gt;&lt;/</span>th<span class="hl opt">&gt;|;</span></li>
<li id="n_993" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>startdate<span class="hl opt">} =</span></li>
<li id="n_994" class="hl">        qq<span class="hl opt">|&lt;</span>th width<span class="hl opt">=</span><span class="hl num">10</span><span class="hl opt">&gt;&lt;</span>a <span class="hl kwa">class</span><span class="hl opt">=</span>listheading href<span class="hl opt">=</span><span class="hl kwb">$href&amp;sort</span><span class="hl opt">=</span>startdate<span class="hl opt">&gt;|</span></li>
<li id="n_995" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Startdate&#39;</span><span class="hl opt">)</span></li>
<li id="n_996" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;</span><span class="hl kwd">/a&gt;&lt;/</span>th<span class="hl opt">&gt;|;</span></li>
<li id="n_997" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>enddate<span class="hl opt">} =</span></li>
<li id="n_998" class="hl">        qq<span class="hl opt">|&lt;</span>th width<span class="hl opt">=</span><span class="hl num">10</span><span class="hl opt">&gt;&lt;</span>a <span class="hl kwa">class</span><span class="hl opt">=</span>listheading href<span class="hl opt">=</span><span class="hl kwb">$href&amp;sort</span><span class="hl opt">=</span>enddate<span class="hl opt">&gt;|</span></li>
<li id="n_999" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Enddate&#39;</span><span class="hl opt">)</span></li>
<li id="n_1000" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;</span><span class="hl kwd">/a&gt;&lt;/</span>th<span class="hl opt">&gt;|;</span></li>
<li id="n_1001" class="hl"></li>
<li id="n_1002" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>partnumber<span class="hl opt">} =</span></li>
<li id="n_1003" class="hl">        <span class="hl sng">&quot;&lt;th&gt;&lt;a class=listheading href=</span><span class="hl ipl">$href&amp;sort</span><span class="hl sng">=partnumber&gt;&quot;</span></li>
<li id="n_1004" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Assembly&#39;</span><span class="hl opt">)</span></li>
<li id="n_1005" class="hl">      <span class="hl opt">. </span><span class="hl sng">&quot;&lt;/a&gt;&lt;/th&gt;&quot;</span><span class="hl opt">;</span></li>
<li id="n_1006" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>production<span class="hl opt">} =</span></li>
<li id="n_1007" class="hl">      <span class="hl sng">&quot;&lt;th width=10 class=listheading&gt;&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Production&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot;&lt;/th&gt;&quot;</span><span class="hl opt">;</span></li>
<li id="n_1008" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>completed<span class="hl opt">} =</span></li>
<li id="n_1009" class="hl">      <span class="hl sng">&quot;&lt;th width=10 class=listheading&gt;&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Completed&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot;&lt;/th&gt;&quot;</span><span class="hl opt">;</span></li>
<li id="n_1010" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>name<span class="hl opt">} =</span></li>
<li id="n_1011" class="hl">      <span class="hl sng">&quot;&lt;th class=listheading&gt;&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Customer&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot;&lt;/th&gt;&quot;</span><span class="hl opt">;</span></li>
<li id="n_1012" class="hl"></li>
<li id="n_1013" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">header</span><span class="hl opt">;</span></li>
<li id="n_1014" class="hl"></li>
<li id="n_1015" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_project<span class="hl opt">} } ) {</span></li>
<li id="n_1016" class="hl">        <span class="hl kwb">$sameitem </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_project<span class="hl opt">}-&gt;[</span><span class="hl num">0</span><span class="hl opt">]-&gt;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl kwc">sort</span><span class="hl opt">} };</span></li>
<li id="n_1017" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1018" class="hl"></li>
<li id="n_1019" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1020" class="hl"><span class="hl opt">&lt;</span>body<span class="hl opt">&gt;</span></li>
<li id="n_1021" class="hl"></li>
<li id="n_1022" class="hl"><span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_1023" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1024" class="hl">    <span class="hl opt">&lt;</span>th <span class="hl kwa">class</span><span class="hl opt">=</span>listtop<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">}&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1025" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1026" class="hl">  <span class="hl opt">&lt;</span>tr height<span class="hl opt">=</span><span class="hl sng">&quot;5&quot;</span><span class="hl opt">&gt;&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1027" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1028" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$option</span><span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1029" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1030" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1031" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1032" class="hl">      <span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_1033" class="hl">    <span class="hl opt">&lt;</span>tr <span class="hl kwa">class</span><span class="hl opt">=</span>listheading<span class="hl opt">&gt;</span></li>
<li id="n_1034" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1035" class="hl"></li>
<li id="n_1036" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl kwb">&#64;column_index</span><span class="hl opt">) { </span><span class="hl kwc">print </span><span class="hl sng">&quot;</span><span class="hl ipl">$column_header</span><span class="hl sng">{</span><span class="hl ipl">$_</span><span class="hl sng">}</span><span class="hl esc">\n</span><span class="hl sng">&quot;</span> <span class="hl opt">}</span></li>
<li id="n_1037" class="hl"></li>
<li id="n_1038" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1039" class="hl">        <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1040" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1041" class="hl"></li>
<li id="n_1042" class="hl">    <span class="hl slc"># escape callback</span></li>
<li id="n_1043" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>callback<span class="hl opt">} = </span><span class="hl kwb">$callback </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;sort=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{sort}&quot;</span><span class="hl opt">;</span></li>
<li id="n_1044" class="hl"></li>
<li id="n_1045" class="hl">    <span class="hl slc"># escape callback for href</span></li>
<li id="n_1046" class="hl">    <span class="hl kwb">$callback </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">escape</span><span class="hl opt">(</span><span class="hl kwb">$callback</span><span class="hl opt">);</span></li>
<li id="n_1047" class="hl"></li>
<li id="n_1048" class="hl">    <span class="hl slc"># flip direction</span></li>
<li id="n_1049" class="hl">    <span class="hl kwb">$direction </span><span class="hl opt">= ( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>direction<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;ASC&#39;</span> <span class="hl opt">) ? </span><span class="hl sng">&quot;ASC&quot;</span> <span class="hl opt">: </span><span class="hl sng">&quot;DESC&quot;</span><span class="hl opt">;</span></li>
<li id="n_1050" class="hl">    <span class="hl kwb">$href </span><span class="hl opt">=~ </span><span class="hl kwd">s/&amp;direction=(\w+)&amp;/&amp;direction=$direction&amp;/</span><span class="hl opt">;</span></li>
<li id="n_1051" class="hl"></li>
<li id="n_1052" class="hl">    <span class="hl kwa">foreach </span><span class="hl kwb">$ref </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>all_project<span class="hl opt">} } ) {</span></li>
<li id="n_1053" class="hl"></li>
<li id="n_1054" class="hl">        <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(description startdate enddate name)</span><span class="hl opt">) {</span></li>
<li id="n_1055" class="hl">            <span class="hl kwb">$column_data</span><span class="hl opt">{</span><span class="hl kwb">$_</span><span class="hl opt">} = </span>qq<span class="hl opt">|&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">}&amp;</span>nbsp<span class="hl opt">;&lt;/</span>td<span class="hl opt">&gt;|;</span></li>
<li id="n_1056" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1057" class="hl"></li>
<li id="n_1058" class="hl">        <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl sng">qw(production completed)</span><span class="hl opt">) {</span></li>
<li id="n_1059" class="hl">            <span class="hl kwb">$column_data</span><span class="hl opt">{</span><span class="hl kwb">$_</span><span class="hl opt">} =</span></li>
<li id="n_1060" class="hl">              qq<span class="hl opt">|&lt;</span>td align<span class="hl opt">=</span>right<span class="hl opt">&gt;|</span></li>
<li id="n_1061" class="hl">              <span class="hl opt">. </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">format_amount</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span><span class="hl kwb">$_</span><span class="hl opt">} );</span></li>
<li id="n_1062" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1063" class="hl"></li>
<li id="n_1064" class="hl">        <span class="hl kwb">$column_data</span><span class="hl opt">{</span>projectnumber<span class="hl opt">} =</span></li>
<li id="n_1065" class="hl">qq<span class="hl opt">|&lt;</span>td<span class="hl opt">&gt;&lt;</span>a href<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>script<span class="hl opt">}?</span>action<span class="hl opt">=</span>edit<span class="hl opt">&amp;</span>type<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">}&amp;</span>status<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>status<span class="hl opt">}&amp;</span>id<span class="hl opt">=</span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">}&amp;</span>path<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>path<span class="hl opt">}&amp;</span>login<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>login<span class="hl opt">}&amp;</span>sessionid<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>sessionid<span class="hl opt">}&amp;</span>project<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>project<span class="hl opt">}&amp;</span>callback<span class="hl opt">=</span><span class="hl kwb">$callback</span><span class="hl opt">&gt;</span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span>projectnumber<span class="hl opt">}&lt;/</span>td<span class="hl opt">&gt;|;</span></li>
<li id="n_1066" class="hl">        <span class="hl kwb">$column_data</span><span class="hl opt">{</span>partnumber<span class="hl opt">} =</span></li>
<li id="n_1067" class="hl">qq<span class="hl opt">|&lt;</span>td<span class="hl opt">&gt;&lt;</span>a href<span class="hl opt">=</span>ic<span class="hl opt">.</span>pl<span class="hl opt">?</span>action<span class="hl opt">=</span>edit<span class="hl opt">&amp;</span>id<span class="hl opt">=</span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">}&amp;</span>path<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>path<span class="hl opt">}&amp;</span>login<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>login<span class="hl opt">}&amp;</span>sessionid<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>sessionid<span class="hl opt">}&amp;</span>callback<span class="hl opt">=</span><span class="hl kwb">$callback</span><span class="hl opt">&gt;</span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span>partnumber<span class="hl opt">}&lt;/</span>td<span class="hl opt">&gt;|;</span></li>
<li id="n_1068" class="hl"></li>
<li id="n_1069" class="hl">        <span class="hl kwb">$j++</span><span class="hl opt">;</span></li>
<li id="n_1070" class="hl">        <span class="hl kwb">$j </span><span class="hl opt">%= </span><span class="hl num">2</span><span class="hl opt">;</span></li>
<li id="n_1071" class="hl"></li>
<li id="n_1072" class="hl">        <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1073" class="hl">        <span class="hl opt">&lt;</span>tr valign<span class="hl opt">=</span>top <span class="hl kwa">class</span><span class="hl opt">=</span>listrow<span class="hl kwb">$j</span><span class="hl opt">&gt;</span></li>
<li id="n_1074" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1075" class="hl"></li>
<li id="n_1076" class="hl">        <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl kwb">&#64;column_index</span><span class="hl opt">) { </span><span class="hl kwc">print </span><span class="hl sng">&quot;</span><span class="hl ipl">$column_data</span><span class="hl sng">{</span><span class="hl ipl">$_</span><span class="hl sng">}</span><span class="hl esc">\n</span><span class="hl sng">&quot;</span> <span class="hl opt">}</span></li>
<li id="n_1077" class="hl"></li>
<li id="n_1078" class="hl">        <span class="hl kwc">print </span><span class="hl sng">&quot;</span></li>
<li id="n_1079" class="hl"><span class="hl sng">        &lt;/tr&gt;</span></li>
<li id="n_1080" class="hl"><span class="hl sng">&quot;</span><span class="hl opt">;</span></li>
<li id="n_1081" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1082" class="hl"></li>
<li id="n_1083" class="hl">    <span class="hl kwb">$i </span><span class="hl opt">= </span><span class="hl num">1</span><span class="hl opt">;</span></li>
<li id="n_1084" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;project&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1085" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$myconfig</span><span class="hl opt">{</span>acs<span class="hl opt">} !~ </span><span class="hl kwd">/Projects--Projects/ </span><span class="hl opt">) {</span></li>
<li id="n_1086" class="hl">            <span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl sng">&#39;Projects--Add Project&#39;</span><span class="hl opt">}{</span>code<span class="hl opt">} =</span></li>
<li id="n_1087" class="hl">qq<span class="hl opt">|&lt;</span>button <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;submit&quot;</span> type<span class="hl opt">=</span><span class="hl sng">&quot;submit&quot;</span> name<span class="hl opt">=</span><span class="hl sng">&quot;action&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;add_project&quot;</span><span class="hl opt">&gt;|</span></li>
<li id="n_1088" class="hl">              <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Add Project&#39;</span><span class="hl opt">)</span></li>
<li id="n_1089" class="hl">              <span class="hl opt">. </span>qq<span class="hl opt">|&lt;/</span>button<span class="hl opt">&gt; |;</span></li>
<li id="n_1090" class="hl">            <span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl sng">&#39;Projects--Add Project&#39;</span><span class="hl opt">}{</span>order<span class="hl opt">} = </span><span class="hl kwb">$i++</span><span class="hl opt">;</span></li>
<li id="n_1091" class="hl"></li>
<li id="n_1092" class="hl">            <span class="hl kwa">for </span><span class="hl opt">( </span><span class="hl kwc">split </span><span class="hl kwd">/;/</span><span class="hl opt">, </span><span class="hl kwb">$myconfig</span><span class="hl opt">{</span>acs<span class="hl opt">} ) {</span></li>
<li id="n_1093" class="hl">                <span class="hl kwc">delete </span><span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl kwb">$_</span><span class="hl opt">};</span></li>
<li id="n_1094" class="hl">            <span class="hl opt">}</span></li>
<li id="n_1095" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1096" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1097" class="hl">    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_1098" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$myconfig</span><span class="hl opt">{</span>acs<span class="hl opt">} !~ </span><span class="hl kwd">/Job Costing--Job Costing/ </span><span class="hl opt">) {</span></li>
<li id="n_1099" class="hl">            <span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl sng">&#39;Job Costing--Add Job&#39;</span><span class="hl opt">}{</span>code<span class="hl opt">} =</span></li>
<li id="n_1100" class="hl">qq<span class="hl opt">|&lt;</span>button <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;submit&quot;</span> type<span class="hl opt">=</span><span class="hl sng">&quot;submit&quot;</span> name<span class="hl opt">=</span><span class="hl sng">&quot;action&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;add_job&quot;</span><span class="hl opt">&gt;|</span></li>
<li id="n_1101" class="hl">              <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Add Job&#39;</span><span class="hl opt">)</span></li>
<li id="n_1102" class="hl">              <span class="hl opt">. </span>qq<span class="hl opt">|&lt;/</span>button<span class="hl opt">&gt; |;</span></li>
<li id="n_1103" class="hl">            <span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl sng">&#39;Job Costing--Add Job&#39;</span><span class="hl opt">}{</span>order<span class="hl opt">} = </span><span class="hl kwb">$i++</span><span class="hl opt">;</span></li>
<li id="n_1104" class="hl"></li>
<li id="n_1105" class="hl">            <span class="hl kwa">for </span><span class="hl opt">( </span><span class="hl kwc">split </span><span class="hl kwd">/;/</span><span class="hl opt">, </span><span class="hl kwb">$myconfig</span><span class="hl opt">{</span>acs<span class="hl opt">} ) {</span></li>
<li id="n_1106" class="hl">                <span class="hl kwc">delete </span><span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl kwb">$_</span><span class="hl opt">};</span></li>
<li id="n_1107" class="hl">            <span class="hl opt">}</span></li>
<li id="n_1108" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1109" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1110" class="hl"></li>
<li id="n_1111" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1112" class="hl">      <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_1113" class="hl">    <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1114" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1115" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1116" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>hr size<span class="hl opt">=</span><span class="hl num">3 </span>noshade<span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1117" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1118" class="hl"><span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_1119" class="hl"></li>
<li id="n_1120" class="hl"><span class="hl opt">&lt;</span>br<span class="hl opt">&gt;</span></li>
<li id="n_1121" class="hl"><span class="hl opt">&lt;</span>form <span class="hl kwa">method</span><span class="hl opt">=</span>post action<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>script<span class="hl opt">}&gt;</span></li>
<li id="n_1122" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1123" class="hl"></li>
<li id="n_1124" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">hide_form</span><span class="hl opt">(</span><span class="hl sng">qw(callback type path login sessionid)</span><span class="hl opt">);</span></li>
<li id="n_1125" class="hl"></li>
<li id="n_1126" class="hl">    <span class="hl kwa">foreach </span><span class="hl kwb">$item </span><span class="hl opt">( </span><span class="hl kwc">sort </span><span class="hl opt">{ </span><span class="hl kwb">$a</span><span class="hl opt">-&gt;{</span>order<span class="hl opt">} &lt;=&gt; </span><span class="hl kwb">$b</span><span class="hl opt">-&gt;{</span>order<span class="hl opt">} } </span><span class="hl kwb">%button </span><span class="hl opt">) {</span></li>
<li id="n_1127" class="hl">        <span class="hl kwc">print </span><span class="hl kwb">$item</span><span class="hl opt">-&gt;{</span>code<span class="hl opt">};</span></li>
<li id="n_1128" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1129" class="hl"></li>
<li id="n_1130" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>lynx<span class="hl opt">} ) {</span></li>
<li id="n_1131" class="hl">        <span class="hl kwa">require </span><span class="hl sng">&quot;bin/menu.pl&quot;</span><span class="hl opt">;</span></li>
<li id="n_1132" class="hl">        <span class="hl opt">&amp;</span>menubar<span class="hl opt">;</span></li>
<li id="n_1133" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1134" class="hl"></li>
<li id="n_1135" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1136" class="hl">  <span class="hl opt">&lt;/</span>form<span class="hl opt">&gt;</span></li>
<li id="n_1137" class="hl">  </li>
<li id="n_1138" class="hl"><span class="hl opt">&lt;/</span>body<span class="hl opt">&gt;</span></li>
<li id="n_1139" class="hl"><span class="hl opt">&lt;/</span>html<span class="hl opt">&gt;</span></li>
<li id="n_1140" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1141" class="hl"></li>
<li id="n_1142" class="hl"><span class="hl opt">}</span></li>
<li id="n_1143" class="hl"></li>
<li id="n_1144" class="hl"><span class="hl kwa">sub </span>project_header <span class="hl opt">{</span></li>
<li id="n_1145" class="hl"></li>
<li id="n_1146" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>description<span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">quote</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>description<span class="hl opt">} );</span></li>
<li id="n_1147" class="hl"></li>
<li id="n_1148" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( ( </span><span class="hl kwb">$rows </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">numtextrows</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>description<span class="hl opt">}, </span><span class="hl num">60 </span><span class="hl opt">) ) &gt; </span><span class="hl num">1 </span><span class="hl opt">) {</span></li>
<li id="n_1149" class="hl">        <span class="hl kwb">$description </span><span class="hl opt">=</span></li>
<li id="n_1150" class="hl">qq<span class="hl opt">|&lt;</span>textarea name<span class="hl opt">=</span><span class="hl sng">&quot;description&quot;</span> rows<span class="hl opt">=</span><span class="hl kwb">$rows </span>cols<span class="hl opt">=</span><span class="hl num">60 </span>style<span class="hl opt">=</span><span class="hl sng">&quot;width: 100%&quot;</span> wrap<span class="hl opt">=</span>soft<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>description<span class="hl opt">}&lt;/</span>textarea<span class="hl opt">&gt;|;</span></li>
<li id="n_1151" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1152" class="hl">    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_1153" class="hl">        <span class="hl kwb">$description </span><span class="hl opt">=</span></li>
<li id="n_1154" class="hl">          qq<span class="hl opt">|&lt;</span>input name<span class="hl opt">=</span>description size<span class="hl opt">=</span><span class="hl num">60 </span>value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{description}&quot;</span><span class="hl opt">&gt;|;</span></li>
<li id="n_1155" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1156" class="hl"></li>
<li id="n_1157" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =</span></li>
<li id="n_1158" class="hl">      <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">unescape</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} );</span></li>
<li id="n_1159" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =~ </span><span class="hl kwd">s/ selected//</span><span class="hl opt">;</span></li>
<li id="n_1160" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =~</span></li>
<li id="n_1161" class="hl">      <span class="hl kwd">s/(&lt;option value=&quot;\Q$form-&gt;{&quot;$form-&gt;{vc}&quot;}\E&quot;)/$1 selected/</span><span class="hl opt">;</span></li>
<li id="n_1162" class="hl"></li>
<li id="n_1163" class="hl">    <span class="hl kwb">$label </span><span class="hl opt">= </span><span class="hl kwc">ucfirst </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">};</span></li>
<li id="n_1164" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} ) {</span></li>
<li id="n_1165" class="hl">        <span class="hl kwb">$name </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_1166" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1167" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right nowrap<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl kwb">$label</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1168" class="hl">      <span class="hl opt">&lt;</span>td colspan<span class="hl opt">=</span><span class="hl num">3</span><span class="hl opt">&gt;&lt;</span><span class="hl kwc">select </span>name<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}&lt;</span><span class="hl kwd">/select&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1169" class="hl">      <span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;|</span></li>
<li id="n_1170" class="hl"><span class="hl sng">          . </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;escape( </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{&quot;</span><span class="hl kwc">select</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">}</span><span class="hl sng">&quot;}, 1 ) . qq|&quot;</span><span class="hl opt">&gt;</span></li>
<li id="n_1171" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1172" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1173" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1174" class="hl">    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_1175" class="hl">        <span class="hl kwb">$name </span><span class="hl opt">= </span>qq<span class="hl opt">|</span></li>
<li id="n_1176" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1177" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right nowrap<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl kwb">$label</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1178" class="hl">      <span class="hl opt">&lt;</span>td colspan<span class="hl opt">=</span><span class="hl num">3</span><span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{&quot;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">}</span><span class="hl sng">&quot;}&quot;</span> size<span class="hl opt">=</span><span class="hl num">35</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1179" class="hl">      <span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;|</span></li>
<li id="n_1180" class="hl"><span class="hl sng">          . </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;escape( </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{&quot;</span><span class="hl kwc">select</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">}</span><span class="hl sng">&quot;}, 1 ) . qq|&quot;</span><span class="hl opt">&gt;</span></li>
<li id="n_1181" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1182" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1183" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1184" class="hl"></li>
<li id="n_1185" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">header</span><span class="hl opt">;</span></li>
<li id="n_1186" class="hl"></li>
<li id="n_1187" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1188" class="hl"><span class="hl opt">&lt;</span>body<span class="hl opt">&gt;</span></li>
<li id="n_1189" class="hl"></li>
<li id="n_1190" class="hl"><span class="hl opt">&lt;</span>form <span class="hl kwa">method</span><span class="hl opt">=</span>post action<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>script<span class="hl opt">}&gt;</span></li>
<li id="n_1191" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1192" class="hl"></li>
<li id="n_1193" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">hide_form</span><span class="hl opt">(</span></li>
<li id="n_1194" class="hl">        <span class="hl sng">&quot;id&quot;</span><span class="hl opt">,             </span><span class="hl sng">&quot;type&quot;</span><span class="hl opt">,</span></li>
<li id="n_1195" class="hl">        <span class="hl sng">&quot;old</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">, </span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">,</span></li>
<li id="n_1196" class="hl">        <span class="hl sng">&quot;orphaned&quot;</span><span class="hl opt">,       </span><span class="hl sng">&quot;vc&quot;</span><span class="hl opt">,</span></li>
<li id="n_1197" class="hl">        <span class="hl sng">&quot;title&quot;</span></li>
<li id="n_1198" class="hl">    <span class="hl opt">);</span></li>
<li id="n_1199" class="hl"></li>
<li id="n_1200" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1201" class="hl"><span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_1202" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1203" class="hl">    <span class="hl opt">&lt;</span>th <span class="hl kwa">class</span><span class="hl opt">=</span>listtop<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">}&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1204" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1205" class="hl">  <span class="hl opt">&lt;</span>tr height<span class="hl opt">=</span><span class="hl sng">&quot;5&quot;</span><span class="hl opt">&gt;&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1206" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1207" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1208" class="hl">      <span class="hl opt">&lt;</span>table<span class="hl opt">&gt;</span></li>
<li id="n_1209" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1210" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Number&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1211" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>projectnumber size<span class="hl opt">=</span><span class="hl num">20 </span>value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{projectnumber}&quot;</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1212" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Description&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1213" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$description</span><span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1214" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1215" class="hl">    <span class="hl kwb">$name</span></li>
<li id="n_1216" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1217" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Startdate&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1218" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;date&quot;</span> name<span class="hl opt">=</span>startdate size<span class="hl opt">=</span><span class="hl num">11 </span>title<span class="hl opt">=</span><span class="hl sng">&quot;(</span><span class="hl ipl">$myconfig</span><span class="hl sng">{dateformat})&quot;</span> value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>startdate<span class="hl opt">}&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1219" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Enddate&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1220" class="hl">      <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;date&quot;</span> name<span class="hl opt">=</span>enddate size<span class="hl opt">=</span><span class="hl num">11 </span>title<span class="hl opt">=</span><span class="hl sng">&quot;(</span><span class="hl ipl">$myconfig</span><span class="hl sng">{dateformat})&quot;</span> value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>enddate<span class="hl opt">}&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1221" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1222" class="hl">      <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_1223" class="hl">    <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1224" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1225" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1226" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>hr size<span class="hl opt">=</span><span class="hl num">3 </span>noshade<span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1227" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1228" class="hl"><span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_1229" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1230" class="hl"></li>
<li id="n_1231" class="hl"><span class="hl opt">}</span></li>
<li id="n_1232" class="hl"></li>
<li id="n_1233" class="hl"><span class="hl kwa">sub </span>project_footer <span class="hl opt">{</span></li>
<li id="n_1234" class="hl"></li>
<li id="n_1235" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">hide_form</span><span class="hl opt">(</span><span class="hl sng">qw(callback path login sessionid)</span><span class="hl opt">);</span></li>
<li id="n_1236" class="hl"></li>
<li id="n_1237" class="hl">    <span class="hl kwb">%button </span><span class="hl opt">=</span></li>
<li id="n_1238" class="hl">      <span class="hl opt">( </span><span class="hl sng">&#39;update&#39;</span> <span class="hl opt">=&gt; { </span>ndx <span class="hl opt">=&gt; </span><span class="hl num">1</span><span class="hl opt">, </span>key <span class="hl opt">=&gt; </span><span class="hl sng">&#39;U&#39;</span><span class="hl opt">, </span>value <span class="hl opt">=&gt; </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Update&#39;</span><span class="hl opt">) },</span></li>
<li id="n_1239" class="hl">      <span class="hl opt">);</span></li>
<li id="n_1240" class="hl"></li>
<li id="n_1241" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$myconfig</span><span class="hl opt">{</span>acs<span class="hl opt">} !~ </span><span class="hl kwd">/Projects--Add Project/ </span><span class="hl opt">) {</span></li>
<li id="n_1242" class="hl">        <span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl sng">&#39;save&#39;</span><span class="hl opt">} =</span></li>
<li id="n_1243" class="hl">          <span class="hl opt">{ </span>ndx <span class="hl opt">=&gt; </span><span class="hl num">3</span><span class="hl opt">, </span>key <span class="hl opt">=&gt; </span><span class="hl sng">&#39;S&#39;</span><span class="hl opt">, </span>value <span class="hl opt">=&gt; </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Save&#39;</span><span class="hl opt">) };</span></li>
<li id="n_1244" class="hl"></li>
<li id="n_1245" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">} &amp;&amp; </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>orphaned<span class="hl opt">} ) {</span></li>
<li id="n_1246" class="hl">            <span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl sng">&#39;delete&#39;</span><span class="hl opt">} =</span></li>
<li id="n_1247" class="hl">              <span class="hl opt">{ </span>ndx <span class="hl opt">=&gt; </span><span class="hl num">16</span><span class="hl opt">, </span>key <span class="hl opt">=&gt; </span><span class="hl sng">&#39;D&#39;</span><span class="hl opt">, </span>value <span class="hl opt">=&gt; </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Delete&#39;</span><span class="hl opt">) };</span></li>
<li id="n_1248" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1249" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1250" class="hl"></li>
<li id="n_1251" class="hl">    <span class="hl kwa">for </span><span class="hl opt">( </span><span class="hl kwc">sort </span><span class="hl opt">{ </span><span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl kwb">$a</span><span class="hl opt">}-&gt;{</span>ndx<span class="hl opt">} &lt;=&gt; </span><span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl kwb">$b</span><span class="hl opt">}-&gt;{</span>ndx<span class="hl opt">} } </span><span class="hl kwc">keys </span><span class="hl kwb">%button </span><span class="hl opt">) {</span></li>
<li id="n_1252" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">print_button</span><span class="hl opt">( </span>\<span class="hl kwb">%button</span><span class="hl opt">, </span><span class="hl kwb">$_ </span><span class="hl opt">);</span></li>
<li id="n_1253" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1254" class="hl"></li>
<li id="n_1255" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>lynx<span class="hl opt">} ) {</span></li>
<li id="n_1256" class="hl">        <span class="hl kwa">require </span><span class="hl sng">&quot;bin/menu.pl&quot;</span><span class="hl opt">;</span></li>
<li id="n_1257" class="hl">        <span class="hl opt">&amp;</span>menubar<span class="hl opt">;</span></li>
<li id="n_1258" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1259" class="hl"></li>
<li id="n_1260" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1261" class="hl"><span class="hl opt">&lt;/</span>form<span class="hl opt">&gt;</span></li>
<li id="n_1262" class="hl"></li>
<li id="n_1263" class="hl"><span class="hl opt">&lt;/</span>body<span class="hl opt">&gt;</span></li>
<li id="n_1264" class="hl"><span class="hl opt">&lt;/</span>html<span class="hl opt">&gt;</span></li>
<li id="n_1265" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1266" class="hl"></li>
<li id="n_1267" class="hl"><span class="hl opt">}</span></li>
<li id="n_1268" class="hl"></li>
<li id="n_1269" class="hl"><span class="hl kwa">sub </span>save <span class="hl opt">{</span></li>
<li id="n_1270" class="hl"></li>
<li id="n_1271" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>translation<span class="hl opt">} ) {</span></li>
<li id="n_1272" class="hl">        PE-<span class="hl opt">&gt;</span><span class="hl kwd">save_translation</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1273" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Translations saved!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1274" class="hl">        <span class="hl kwa">exit</span><span class="hl opt">;</span></li>
<li id="n_1275" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1276" class="hl"></li>
<li id="n_1277" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;project&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1278" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} ) {</span></li>
<li id="n_1279" class="hl">            <span class="hl opt">( </span><span class="hl kwb">$null</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">} ) = </span><span class="hl kwc">split </span><span class="hl kwd">/--/</span><span class="hl opt">,</span></li>
<li id="n_1280" class="hl">              <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">};</span></li>
<li id="n_1281" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1282" class="hl">        <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_1283" class="hl">            <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;old</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} </span><span class="hl kwc">ne</span></li>
<li id="n_1284" class="hl">                qq<span class="hl opt">|</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}--</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">}| )</span></li>
<li id="n_1285" class="hl">            <span class="hl opt">{</span></li>
<li id="n_1286" class="hl"></li>
<li id="n_1287" class="hl">                <span class="hl kwa">if </span><span class="hl opt">(</span></li>
<li id="n_1288" class="hl">                    <span class="hl opt">(</span></li>
<li id="n_1289" class="hl">                        <span class="hl kwb">$rv </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">get_name</span><span class="hl opt">(</span></li>
<li id="n_1290" class="hl">                            \<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">}, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>startdate<span class="hl opt">}</span></li>
<li id="n_1291" class="hl">                        <span class="hl opt">)</span></li>
<li id="n_1292" class="hl">                    <span class="hl opt">) &gt; </span><span class="hl num">1</span></li>
<li id="n_1293" class="hl">                  <span class="hl opt">)</span></li>
<li id="n_1294" class="hl">                <span class="hl opt">{</span></li>
<li id="n_1295" class="hl">                    <span class="hl opt">&amp;</span>select_name<span class="hl opt">;</span></li>
<li id="n_1296" class="hl">                    <span class="hl kwa">exit</span><span class="hl opt">;</span></li>
<li id="n_1297" class="hl">                <span class="hl opt">}</span></li>
<li id="n_1298" class="hl"></li>
<li id="n_1299" class="hl">                <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$rv </span><span class="hl opt">== </span><span class="hl num">1 </span><span class="hl opt">) {</span></li>
<li id="n_1300" class="hl">                    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>name_list<span class="hl opt">}[</span><span class="hl num">0</span><span class="hl opt">]-&gt;{</span>id<span class="hl opt">};</span></li>
<li id="n_1301" class="hl">                    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}    = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>name_list<span class="hl opt">}[</span><span class="hl num">0</span><span class="hl opt">]-&gt;{</span>name<span class="hl opt">};</span></li>
<li id="n_1302" class="hl">                    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;old</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =</span></li>
<li id="n_1303" class="hl">                      qq<span class="hl opt">|</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}--</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">}|;</span></li>
<li id="n_1304" class="hl">                <span class="hl opt">}</span></li>
<li id="n_1305" class="hl">            <span class="hl opt">}</span></li>
<li id="n_1306" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1307" class="hl"></li>
<li id="n_1308" class="hl">        PE-<span class="hl opt">&gt;</span><span class="hl kwd">save_project</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1309" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Project saved!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1310" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1311" class="hl"></li>
<li id="n_1312" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;partsgroup&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1313" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">isblank</span><span class="hl opt">( </span><span class="hl sng">&quot;partsgroup&quot;</span><span class="hl opt">, </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Group missing!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1314" class="hl">        PE-<span class="hl opt">&gt;</span><span class="hl kwd">save_partsgroup</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1315" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Group saved!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1316" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1317" class="hl"></li>
<li id="n_1318" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;pricegroup&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1319" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">isblank</span><span class="hl opt">( </span><span class="hl sng">&quot;pricegroup&quot;</span><span class="hl opt">, </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Pricegroup missing!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1320" class="hl">        PE-<span class="hl opt">&gt;</span><span class="hl kwd">save_pricegroup</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1321" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Pricegroup saved!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1322" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1323" class="hl"></li>
<li id="n_1324" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;job&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1325" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;select</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} ) {</span></li>
<li id="n_1326" class="hl">            <span class="hl opt">( </span><span class="hl kwb">$null</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">} ) = </span><span class="hl kwc">split </span><span class="hl kwd">/--/</span><span class="hl opt">,</span></li>
<li id="n_1327" class="hl">              <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">};</span></li>
<li id="n_1328" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1329" class="hl">        <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_1330" class="hl">            <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;old</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} </span><span class="hl kwc">ne</span></li>
<li id="n_1331" class="hl">                qq<span class="hl opt">|</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}--</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">}| )</span></li>
<li id="n_1332" class="hl">            <span class="hl opt">{</span></li>
<li id="n_1333" class="hl"></li>
<li id="n_1334" class="hl">                <span class="hl kwa">if </span><span class="hl opt">(</span></li>
<li id="n_1335" class="hl">                    <span class="hl opt">(</span></li>
<li id="n_1336" class="hl">                        <span class="hl kwb">$rv </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">get_name</span><span class="hl opt">(</span></li>
<li id="n_1337" class="hl">                            \<span class="hl kwb">%myconfig</span><span class="hl opt">, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>vc<span class="hl opt">}, </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>startdate<span class="hl opt">}</span></li>
<li id="n_1338" class="hl">                        <span class="hl opt">)</span></li>
<li id="n_1339" class="hl">                    <span class="hl opt">) &gt; </span><span class="hl num">1</span></li>
<li id="n_1340" class="hl">                  <span class="hl opt">)</span></li>
<li id="n_1341" class="hl">                <span class="hl opt">{</span></li>
<li id="n_1342" class="hl">                    <span class="hl opt">&amp;</span>select_name<span class="hl opt">;</span></li>
<li id="n_1343" class="hl">                    <span class="hl kwa">exit</span><span class="hl opt">;</span></li>
<li id="n_1344" class="hl">                <span class="hl opt">}</span></li>
<li id="n_1345" class="hl"></li>
<li id="n_1346" class="hl">                <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$rv </span><span class="hl opt">== </span><span class="hl num">1 </span><span class="hl opt">) {</span></li>
<li id="n_1347" class="hl">                    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>name_list<span class="hl opt">}[</span><span class="hl num">0</span><span class="hl opt">]-&gt;{</span>id<span class="hl opt">};</span></li>
<li id="n_1348" class="hl">                    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}    = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>name_list<span class="hl opt">}[</span><span class="hl num">0</span><span class="hl opt">]-&gt;{</span>name<span class="hl opt">};</span></li>
<li id="n_1349" class="hl">                    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;old</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">} =</span></li>
<li id="n_1350" class="hl">                      qq<span class="hl opt">|</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}&quot;</span><span class="hl opt">}--</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{vc}_id&quot;</span><span class="hl opt">}|;</span></li>
<li id="n_1351" class="hl">                <span class="hl opt">}</span></li>
<li id="n_1352" class="hl">            <span class="hl opt">}</span></li>
<li id="n_1353" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1354" class="hl"></li>
<li id="n_1355" class="hl">        PE-<span class="hl opt">&gt;</span><span class="hl kwd">save_job</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1356" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Job saved!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1357" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1358" class="hl"></li>
<li id="n_1359" class="hl"><span class="hl opt">}</span></li>
<li id="n_1360" class="hl"></li>
<li id="n_1361" class="hl"><span class="hl kwa">sub </span><span class="hl kwc">delete </span><span class="hl opt">{</span></li>
<li id="n_1362" class="hl"></li>
<li id="n_1363" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>translation<span class="hl opt">} ) {</span></li>
<li id="n_1364" class="hl">        PE-<span class="hl opt">&gt;</span><span class="hl kwd">delete_translation</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1365" class="hl">        <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Translation deleted!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1366" class="hl"></li>
<li id="n_1367" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1368" class="hl">    <span class="hl kwa">else </span><span class="hl opt">{</span></li>
<li id="n_1369" class="hl"></li>
<li id="n_1370" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;project&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1371" class="hl">            PE-<span class="hl opt">&gt;</span><span class="hl kwd">delete_project</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1372" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Project deleted!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1373" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1374" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;job&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1375" class="hl">            PE-<span class="hl opt">&gt;</span><span class="hl kwd">delete_job</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1376" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Job deleted!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1377" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1378" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;partsgroup&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1379" class="hl">            PE-<span class="hl opt">&gt;</span><span class="hl kwd">delete_partsgroup</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1380" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Group deleted!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1381" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1382" class="hl">        <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;pricegroup&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1383" class="hl">            PE-<span class="hl opt">&gt;</span><span class="hl kwd">delete_pricegroup</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1384" class="hl">            <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">redirect</span><span class="hl opt">( </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Pricegroup deleted!&#39;</span><span class="hl opt">) );</span></li>
<li id="n_1385" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1386" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1387" class="hl"></li>
<li id="n_1388" class="hl"><span class="hl opt">}</span></li>
<li id="n_1389" class="hl"></li>
<li id="n_1390" class="hl"><span class="hl kwa">sub </span>partsgroup_report <span class="hl opt">{</span></li>
<li id="n_1391" class="hl"></li>
<li id="n_1392" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">unescape</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">} );</span></li>
<li id="n_1393" class="hl">    PE-<span class="hl opt">&gt;</span><span class="hl kwd">partsgroups</span><span class="hl opt">( </span>\<span class="hl kwb">%myconfig</span><span class="hl opt">, </span>\<span class="hl kwb">%$form </span><span class="hl opt">);</span></li>
<li id="n_1394" class="hl"></li>
<li id="n_1395" class="hl">    <span class="hl kwb">$href </span><span class="hl opt">=</span></li>
<li id="n_1396" class="hl"><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{script}?action=partsgroup_report&amp;direction=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{direction}&amp;oldsort=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{oldsort}&amp;type=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{type}&amp;path=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{path}&amp;login=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{login}&amp;sessionid=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{sessionid}&amp;status=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{status}&quot;</span><span class="hl opt">;</span></li>
<li id="n_1397" class="hl"></li>
<li id="n_1398" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">sort_order</span><span class="hl opt">();</span></li>
<li id="n_1399" class="hl"></li>
<li id="n_1400" class="hl">    <span class="hl kwb">$callback </span><span class="hl opt">=</span></li>
<li id="n_1401" class="hl"><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{script}?action=partsgroup_report&amp;direction=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{direction}&amp;oldsort=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{oldsort}&amp;type=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{type}&amp;path=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{path}&amp;login=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{login}&amp;sessionid=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{sessionid}&amp;status=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{status}&quot;</span><span class="hl opt">;</span></li>
<li id="n_1402" class="hl"></li>
<li id="n_1403" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>status<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;all&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1404" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">= </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;All&#39;</span><span class="hl opt">);</span></li>
<li id="n_1405" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1406" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>status<span class="hl opt">} </span><span class="hl kwc">eq </span><span class="hl sng">&#39;orphaned&#39;</span> <span class="hl opt">) {</span></li>
<li id="n_1407" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">.= </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Orphaned&#39;</span><span class="hl opt">);</span></li>
<li id="n_1408" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1409" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">} ) {</span></li>
<li id="n_1410" class="hl">        <span class="hl kwb">$callback </span><span class="hl opt">.= </span><span class="hl sng">&quot;&amp;partsgroup=</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{partsgroup}&quot;</span><span class="hl opt">;</span></li>
<li id="n_1411" class="hl">        <span class="hl kwb">$option </span><span class="hl opt">.= </span><span class="hl sng">&quot;</span><span class="hl esc">\n</span><span class="hl sng">&lt;br&gt;&quot;</span> <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Group&#39;</span><span class="hl opt">) . </span><span class="hl sng">&quot; : </span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{partsgroup}&quot;</span><span class="hl opt">;</span></li>
<li id="n_1412" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1413" class="hl"></li>
<li id="n_1414" class="hl">    <span class="hl kwb">&#64;column_index </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">sort_columns</span><span class="hl opt">(</span><span class="hl sng">qw(partsgroup)</span><span class="hl opt">);</span></li>
<li id="n_1415" class="hl"></li>
<li id="n_1416" class="hl">    <span class="hl kwb">$column_header</span><span class="hl opt">{</span>partsgroup<span class="hl opt">} =</span></li>
<li id="n_1417" class="hl">        qq<span class="hl opt">|&lt;</span>th<span class="hl opt">&gt;&lt;</span>a <span class="hl kwa">class</span><span class="hl opt">=</span>listheading href<span class="hl opt">=</span><span class="hl kwb">$href&amp;sort</span><span class="hl opt">=</span>partsgroup width<span class="hl opt">=</span><span class="hl num">90</span><span class="hl opt">%&gt;|</span></li>
<li id="n_1418" class="hl">      <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Group&#39;</span><span class="hl opt">)</span></li>
<li id="n_1419" class="hl">      <span class="hl opt">. </span>qq<span class="hl opt">|&lt;</span><span class="hl kwd">/a&gt;&lt;/</span>th<span class="hl opt">&gt;|;</span></li>
<li id="n_1420" class="hl"></li>
<li id="n_1421" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} = </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Groups&#39;</span><span class="hl opt">);</span></li>
<li id="n_1422" class="hl"></li>
<li id="n_1423" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">header</span><span class="hl opt">;</span></li>
<li id="n_1424" class="hl"></li>
<li id="n_1425" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1426" class="hl"><span class="hl opt">&lt;</span>body<span class="hl opt">&gt;</span></li>
<li id="n_1427" class="hl"></li>
<li id="n_1428" class="hl"><span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_1429" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1430" class="hl">    <span class="hl opt">&lt;</span>th <span class="hl kwa">class</span><span class="hl opt">=</span>listtop<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">}&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1431" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1432" class="hl">  <span class="hl opt">&lt;</span>tr height<span class="hl opt">=</span><span class="hl sng">&quot;5&quot;</span><span class="hl opt">&gt;&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1433" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1434" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span><span class="hl kwb">$option</span><span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1435" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1436" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1437" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1438" class="hl">      <span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_1439" class="hl">    <span class="hl opt">&lt;</span>tr <span class="hl kwa">class</span><span class="hl opt">=</span>listheading<span class="hl opt">&gt;</span></li>
<li id="n_1440" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1441" class="hl"></li>
<li id="n_1442" class="hl">    <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl kwb">&#64;column_index</span><span class="hl opt">) { </span><span class="hl kwc">print </span><span class="hl sng">&quot;</span><span class="hl ipl">$column_header</span><span class="hl sng">{</span><span class="hl ipl">$_</span><span class="hl sng">}</span><span class="hl esc">\n</span><span class="hl sng">&quot;</span> <span class="hl opt">}</span></li>
<li id="n_1443" class="hl"></li>
<li id="n_1444" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1445" class="hl">        <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1446" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1447" class="hl"></li>
<li id="n_1448" class="hl">    <span class="hl slc"># escape callback</span></li>
<li id="n_1449" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>callback<span class="hl opt">} = </span><span class="hl kwb">$callback</span><span class="hl opt">;</span></li>
<li id="n_1450" class="hl"></li>
<li id="n_1451" class="hl">    <span class="hl slc"># escape callback for href</span></li>
<li id="n_1452" class="hl">    <span class="hl kwb">$callback </span><span class="hl opt">= </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">escape</span><span class="hl opt">(</span><span class="hl kwb">$callback</span><span class="hl opt">);</span></li>
<li id="n_1453" class="hl"></li>
<li id="n_1454" class="hl">    <span class="hl kwa">foreach </span><span class="hl kwb">$ref </span><span class="hl opt">( &#64;{ </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>item_list<span class="hl opt">} } ) {</span></li>
<li id="n_1455" class="hl"></li>
<li id="n_1456" class="hl">        <span class="hl kwb">$i++</span><span class="hl opt">;</span></li>
<li id="n_1457" class="hl">        <span class="hl kwb">$i </span><span class="hl opt">%= </span><span class="hl num">2</span><span class="hl opt">;</span></li>
<li id="n_1458" class="hl"></li>
<li id="n_1459" class="hl">        <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1460" class="hl">        <span class="hl opt">&lt;</span>tr valign<span class="hl opt">=</span>top <span class="hl kwa">class</span><span class="hl opt">=</span>listrow<span class="hl kwb">$i</span><span class="hl opt">&gt;</span></li>
<li id="n_1461" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1462" class="hl"></li>
<li id="n_1463" class="hl">        <span class="hl kwb">$column_data</span><span class="hl opt">{</span>partsgroup<span class="hl opt">} =</span></li>
<li id="n_1464" class="hl">qq<span class="hl opt">|&lt;</span>td<span class="hl opt">&gt;&lt;</span>a href<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>script<span class="hl opt">}?</span>action<span class="hl opt">=</span>edit<span class="hl opt">&amp;</span>type<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">}&amp;</span>status<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>status<span class="hl opt">}&amp;</span>id<span class="hl opt">=</span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">}&amp;</span>path<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>path<span class="hl opt">}&amp;</span>login<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>login<span class="hl opt">}&amp;</span>sessionid<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>sessionid<span class="hl opt">}&amp;</span>callback<span class="hl opt">=</span><span class="hl kwb">$callback</span><span class="hl opt">&gt;</span><span class="hl kwb">$ref</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">}&lt;/</span>td<span class="hl opt">&gt;|;</span></li>
<li id="n_1465" class="hl">        <span class="hl kwa">for </span><span class="hl opt">(</span><span class="hl kwb">&#64;column_index</span><span class="hl opt">) { </span><span class="hl kwc">print </span><span class="hl sng">&quot;</span><span class="hl ipl">$column_data</span><span class="hl sng">{</span><span class="hl ipl">$_</span><span class="hl sng">}</span><span class="hl esc">\n</span><span class="hl sng">&quot;</span> <span class="hl opt">}</span></li>
<li id="n_1466" class="hl"></li>
<li id="n_1467" class="hl">        <span class="hl kwc">print </span><span class="hl sng">&quot;</span></li>
<li id="n_1468" class="hl"><span class="hl sng">        &lt;/tr&gt;</span></li>
<li id="n_1469" class="hl"><span class="hl sng">&quot;</span><span class="hl opt">;</span></li>
<li id="n_1470" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1471" class="hl"></li>
<li id="n_1472" class="hl">    <span class="hl kwb">$i </span><span class="hl opt">= </span><span class="hl num">1</span><span class="hl opt">;</span></li>
<li id="n_1473" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$myconfig</span><span class="hl opt">{</span>acs<span class="hl opt">} !~ </span><span class="hl kwd">/Goods \&amp; Services--Goods \&amp; Services/ </span><span class="hl opt">) {</span></li>
<li id="n_1474" class="hl">        <span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl sng">&#39;Goods &amp; Services--Add Group&#39;</span><span class="hl opt">}{</span>code<span class="hl opt">} =</span></li>
<li id="n_1475" class="hl">qq<span class="hl opt">|&lt;</span>button <span class="hl kwa">class</span><span class="hl opt">=</span><span class="hl sng">&quot;submit&quot;</span> type<span class="hl opt">=</span><span class="hl sng">&quot;submit&quot;</span> name<span class="hl opt">=</span><span class="hl sng">&quot;action&quot;</span> value<span class="hl opt">=</span><span class="hl sng">&quot;add_group&quot;</span><span class="hl opt">&gt;|</span></li>
<li id="n_1476" class="hl">          <span class="hl opt">. </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Add Group&#39;</span><span class="hl opt">)</span></li>
<li id="n_1477" class="hl">          <span class="hl opt">. </span>qq<span class="hl opt">|&lt;/</span>button<span class="hl opt">&gt; |;</span></li>
<li id="n_1478" class="hl">        <span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl sng">&#39;Goods &amp; Services--Add Group&#39;</span><span class="hl opt">}{</span>order<span class="hl opt">} = </span><span class="hl kwb">$i++</span><span class="hl opt">;</span></li>
<li id="n_1479" class="hl"></li>
<li id="n_1480" class="hl">        <span class="hl kwa">foreach </span><span class="hl kwb">$item </span><span class="hl opt">( </span><span class="hl kwc">split </span><span class="hl kwd">/;/</span><span class="hl opt">, </span><span class="hl kwb">$myconfig</span><span class="hl opt">{</span>acs<span class="hl opt">} ) {</span></li>
<li id="n_1481" class="hl">            <span class="hl kwc">delete </span><span class="hl kwb">$button</span><span class="hl opt">{</span><span class="hl kwb">$item</span><span class="hl opt">};</span></li>
<li id="n_1482" class="hl">        <span class="hl opt">}</span></li>
<li id="n_1483" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1484" class="hl"></li>
<li id="n_1485" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1486" class="hl">      <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_1487" class="hl">    <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1488" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1489" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1490" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>hr size<span class="hl opt">=</span><span class="hl num">3 </span>noshade<span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1491" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1492" class="hl"><span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_1493" class="hl"></li>
<li id="n_1494" class="hl"><span class="hl opt">&lt;</span>br<span class="hl opt">&gt;</span></li>
<li id="n_1495" class="hl"><span class="hl opt">&lt;</span>form <span class="hl kwa">method</span><span class="hl opt">=</span>post action<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>script<span class="hl opt">}&gt;</span></li>
<li id="n_1496" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1497" class="hl"></li>
<li id="n_1498" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">hide_form</span><span class="hl opt">(</span><span class="hl sng">qw(callback type path login sessionid)</span><span class="hl opt">);</span></li>
<li id="n_1499" class="hl"></li>
<li id="n_1500" class="hl">    <span class="hl kwa">foreach </span><span class="hl kwb">$item </span><span class="hl opt">( </span><span class="hl kwc">sort </span><span class="hl opt">{ </span><span class="hl kwb">$a</span><span class="hl opt">-&gt;{</span>order<span class="hl opt">} &lt;=&gt; </span><span class="hl kwb">$b</span><span class="hl opt">-&gt;{</span>order<span class="hl opt">} } </span><span class="hl kwb">%button </span><span class="hl opt">) {</span></li>
<li id="n_1501" class="hl">        <span class="hl kwc">print </span><span class="hl kwb">$item</span><span class="hl opt">-&gt;{</span>code<span class="hl opt">};</span></li>
<li id="n_1502" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1503" class="hl"></li>
<li id="n_1504" class="hl">    <span class="hl kwa">if </span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>lynx<span class="hl opt">} ) {</span></li>
<li id="n_1505" class="hl">        <span class="hl kwa">require </span><span class="hl sng">&quot;bin/menu.pl&quot;</span><span class="hl opt">;</span></li>
<li id="n_1506" class="hl">        <span class="hl opt">&amp;</span>menubar<span class="hl opt">;</span></li>
<li id="n_1507" class="hl">    <span class="hl opt">}</span></li>
<li id="n_1508" class="hl"></li>
<li id="n_1509" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1510" class="hl">  <span class="hl opt">&lt;/</span>form<span class="hl opt">&gt;</span></li>
<li id="n_1511" class="hl"></li>
<li id="n_1512" class="hl"><span class="hl opt">&lt;/</span>body<span class="hl opt">&gt;</span></li>
<li id="n_1513" class="hl"><span class="hl opt">&lt;/</span>html<span class="hl opt">&gt;</span></li>
<li id="n_1514" class="hl"><span class="hl opt">|;</span></li>
<li id="n_1515" class="hl"></li>
<li id="n_1516" class="hl"><span class="hl opt">}</span></li>
<li id="n_1517" class="hl"></li>
<li id="n_1518" class="hl"><span class="hl kwa">sub </span>partsgroup_header <span class="hl opt">{</span></li>
<li id="n_1519" class="hl"></li>
<li id="n_1520" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>action<span class="hl opt">} =~ </span><span class="hl kwd">s/_.*//</span><span class="hl opt">;</span></li>
<li id="n_1521" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">} = </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">( </span><span class="hl kwc">ucfirst </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>action<span class="hl opt">} . </span><span class="hl sng">&quot; Group&quot;</span> <span class="hl opt">);</span></li>
<li id="n_1522" class="hl"></li>
<li id="n_1523" class="hl">    <span class="hl slc"># $locale-&gt;text(&#39;Add Group&#39;)</span></li>
<li id="n_1524" class="hl">    <span class="hl slc"># $locale-&gt;text(&#39;Edit Group&#39;)</span></li>
<li id="n_1525" class="hl"></li>
<li id="n_1526" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">} = </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">quote</span><span class="hl opt">( </span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>partsgroup<span class="hl opt">} );</span></li>
<li id="n_1527" class="hl"></li>
<li id="n_1528" class="hl">    <span class="hl kwb">$form</span><span class="hl opt">-&gt;</span><span class="hl kwd">header</span><span class="hl opt">;</span></li>
<li id="n_1529" class="hl"></li>
<li id="n_1530" class="hl">    <span class="hl kwc">print </span>qq<span class="hl opt">|</span></li>
<li id="n_1531" class="hl"><span class="hl opt">&lt;</span>body<span class="hl opt">&gt;</span></li>
<li id="n_1532" class="hl"></li>
<li id="n_1533" class="hl"><span class="hl opt">&lt;</span>form <span class="hl kwa">method</span><span class="hl opt">=</span>post action<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>script<span class="hl opt">}&gt;</span></li>
<li id="n_1534" class="hl"></li>
<li id="n_1535" class="hl"><span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span>id value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>id<span class="hl opt">}&gt;</span></li>
<li id="n_1536" class="hl"><span class="hl opt">&lt;</span>input type<span class="hl opt">=</span>hidden name<span class="hl opt">=</span>type value<span class="hl opt">=</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>type<span class="hl opt">}&gt;</span></li>
<li id="n_1537" class="hl"></li>
<li id="n_1538" class="hl"><span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_1539" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1540" class="hl">    <span class="hl opt">&lt;</span>th <span class="hl kwa">class</span><span class="hl opt">=</span>listtop<span class="hl opt">&gt;</span><span class="hl kwb">$form</span><span class="hl opt">-&gt;{</span>title<span class="hl opt">}&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1541" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1542" class="hl">  <span class="hl opt">&lt;</span>tr height<span class="hl opt">=</span><span class="hl sng">&quot;5&quot;</span><span class="hl opt">&gt;&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1543" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1544" class="hl">    <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1545" class="hl">      <span class="hl opt">&lt;</span>table width<span class="hl opt">=</span><span class="hl num">100</span><span class="hl opt">%&gt;</span></li>
<li id="n_1546" class="hl">    <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1547" class="hl">      <span class="hl opt">&lt;</span>th align<span class="hl opt">=</span>right<span class="hl opt">&gt;| . </span><span class="hl kwb">$locale</span><span class="hl opt">-&gt;</span><span class="hl kwd">text</span><span class="hl opt">(</span><span class="hl sng">&#39;Group&#39;</span><span class="hl opt">) . </span>qq<span class="hl opt">|&lt;/</span>th<span class="hl opt">&gt;</span></li>
<li id="n_1548" class="hl"></li>
<li id="n_1549" class="hl">          <span class="hl opt">&lt;</span>td<span class="hl opt">&gt;&lt;</span>input name<span class="hl opt">=</span>partsgroup size<span class="hl opt">=</span><span class="hl num">30 </span>value<span class="hl opt">=</span><span class="hl sng">&quot;</span><span class="hl ipl">$form</span><span class="hl sng">-&gt;{partsgroup}&quot;</span><span class="hl opt">&gt;&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1550" class="hl">    <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1551" class="hl">      <span class="hl opt">&lt;/</span>table<span class="hl opt">&gt;</span></li>
<li id="n_1552" class="hl">    <span class="hl opt">&lt;/</span>td<span class="hl opt">&gt;</span></li>
<li id="n_1553" class="hl">  <span class="hl opt">&lt;/</span>tr<span class="hl opt">&gt;</span></li>
<li id="n_1554" class="hl">  <span class="hl opt">&lt;</span>tr<span class="hl opt">&gt;