<>D=^ (3WEBLAC - EDIT AC CHARGES ON BOL ONLINE 3NEW PROGRAM FROM 6/29/2012 ;3mkeyed "/u/webmhu/wf/JEMPL",[0:1:8],[0:9:20]+[0:1:8],0,2563@ R$$JCUSTO,.tpl1, P!&$$JCBILX,"R$$JIOCTQ,.tpl1, R$d$$JEMPL,.tpl1, $$,&R$$JEMPE,.tpl1, 1R$$JITEM7,.tpl1, 84R$$JBLHD[,.tpl1, \6R$$JBLHH],.tpl1, ^7R$$JBLACg,.tpl1, 8R$$JBLAX,.tpl1, 9$$,JBLCF<$!' $otherhead>Fw$65 P@R"$400 8003for popupsZ$SUBFUNC[\5$-]A$'9_`3set formstart and formenda!$ &PGMFUNC=CALL۩#i:$ -###,###,##0 -$#####0.00$ #######0.00j+$( $###,###.00004###,###,##0.00k%$<###,###,###.00=######0A$td class="td" <>< nowrap>$ 'TRHILITE   )5 G$??V$"*/D$#<"$  #EEEEEEyellow $
  LISTJIOCTU  EDITCHARGEDOU3^1000 "------------ main logic$@'2$ chargeedit EDITCHARGEDOLUB3CTEXT$=""+FORMSTART$+TEXT$+" "3TEXT$=CTEXT$+FORMEND$!$ө' WEBLACCOM1!$ө' WEBLACCOM2!$ө' WEBLACCOM3=$|||3USED TO REMOEV ORIG COMMENTD6$d
Carrier Info
Carrier:   
Tracking: 
examples: (CHAMP 10002222 or FEDEX 167777)
Comment:
Comment:

 B$dd' $:$KdC$Update  ccalamari$@3for fix 8/15/2019]$?Confirm:     @Y$F$

N #(@3T=$+ERROR ۩(Ө AT LINE ۩(Ө" IN ۩#^E23-------- EMAIL ERROR MESSAGE+$,'WFDIRtmp/000_last_error.txt,O_CREATE,O_TRUNC,=$+ERROR ۩(Ө AT LINE ۩(Ө" IN ۩# L+E$-,$.' error_email/+(JBMAILTO.0/12-3@ }$q
Order is not valid. Click and fix the problem(s).#(U39000 OUTTA HERE#<'3----- FORMAT THE SCREEN't:'.$*8*311000*&$/usr/local/bin/whp/tss.wblcf3w+1$,/u/tmp/wblcf3w_۩(Өө.log+ $+ $ > , 2>&1+ $$,,+*!1+4$ \ +.+*+4+:$ Executed:  ۫\
 ,8.3DISPLAY THE LABOR TRACKING.$
Labor Tracking
Start At
End At
Minutes

.GJBSELECTOPTIONSJEMPEEMPEMPEMPNAME*NOALL*.JJBSELECTOPTIONSJEMPWWORKWORKWORKDESC*NOALL*/0$A\ /D /X 23pull the values from JEMPL/bG @4$@04  $@12 $@/j$% @N$%value="۩@">value="۩@ " SELECTED>//$%% name="EMP NAME="EMP۩(/ $%/j$% @N$%value="۩@">value="۩@ " SELECTED>/1$%% name="WORK NAME="WORK۩(/ $%/'$ @$@/d$* /h$* 0 $,   0\$
0f*1$$
1.823--- scan JEMPL2$2 12212P @2P2$ 2Z2(22P 2Z32_86 3CHECK JBLAX FOR EXISTING CHARGE61\ 66$7/$7  \ 771 @77($@78:)U3^1000 "------------ MAIN REPORT LOGIC:$$3"11/53/19/43/A9/42/B1/AA/":5$_@b _ $_J1۩ ݨ__:1[_:\::1]_:\::$ INVALID BOL#:1O\@`P:$ZPO@a:R$

B/L#: _ Customer: @c

Charge Table: Z:)PRASN1_BOL%: SAM1@`::f$Below only displays $ UNAUTHORIZED$:,$Ө Calculated:H @F1:C(1*=124),F2:C(1*=124),F3:C(1*=124),F4:C(1*=124),F5:C(1*=124):3LET TEXT$=TEXT$+TCHG$:3RETURN ::$f\@`\ 1gf:$@p:V$J;/ $ Invoiced: ;$>&
Table9Charge
Code9 Description9G/L Code9Charge
Type9Rate9Auto9 Apply/Qty9 Charge Amt;$$> ;`315200;jR3LET TTEXT$="PRE80"; CALL "WASSCW",JBLHD$(1,2),JBLHD.CUST$,JBLHD$(3,9),TCHG,TTEXT$;~(3LET TEXT$=TEXT$+"
"+TTEXT$+"
";1QZ;;3LOOP THRU CHARGES;1Q>R; RZ>; @V;;; $@WN; R<2; $@WY;!$Ө|R<b$YD@< 3REPORT COMPLETE@t$
@8BhUBj 3----------- BUILDS JBLAC RECORDBm/$_@b$_  $J1_Br1[Bw\B|Bw1]By\B|1O\@`PB$ZPO@aB_$

B/L#: _ Customer: @c

Charge Table: Z

 B7GETBOL1_uvwxyz{|}~B1BB3$B  4BB$B:$f\@`\ 1gfB$@pB/ $ Invoiced: B$@hf@iZB $@j@@@kAR2B$@l@mB $@n@o@p@qz@r{B$@s|@t}C$@p3SAVED IF EXISTSC&$Lg@hC0$C1QZCC3LOOP THRU CHARGESC1QERC RZECG$e$eICHGRC eeNoCD{3IF JIOCT.BILLIND$="7" THEN LET MANCHG$=MANCHG$+JIOCT$(7,2),MANQTY$=MANQTY$+STR(NUM(QTY$,ERR=17595):"####.###"); GOTO 17500D /3IF QTY$="Yes" THEN LET FLAT$=FLAT$+JIOCT$(7,2)D2$@\ @(0000@RD  eYes $e1D*#$@eL$D4CD\~  o$HYou may only enter up to 5 different manual charges (quantities). Click ' and fix the problem.DCDB$INVALID QTY ENTERED. Click ' and fix the problem.E3write updatesE'$@j@kR۩A ۩A(ELg@hE @YE3ALREADY CONFE  DOCONFIRMonEE$@Y@ %Mz%Dz%Yz@(Ө#00.00L[\L\ $B/L has been confirmed.
K*E:3ALL "EDDES2","GETBOL",JBLHD$(1,11),""; REM WAS IN PRASNRPE*$
Charges updated...
F<$FP#3update the employee labor trackingFZ$Fd!$A1FnFn*1Fx @4@FnF $F$EMP۩(HDF:$WORK۩(ӫDURATION۩(F) TIMES۩(GFw ӫTIMEE۩(JBӫTIMES۩(JB7VTIMEE۩((ܨӫTIMEE۩(F4$TIMES۩(TIMEE۩(F FF" ϱJBJBF" бJBJBFN$<ިܨ<ިܨF $G FG PRNEXTSEQ PRNEXTWIDG@% $@(00000000GJ $@@@@@`GT<$@ @ $@20@@Gh LGFHD3-------- UPDATE THE COMMENTSHNN$@*** $@|۩@|۩@|HP IpHS$@HX# @BOTCOMW@H]$Hb# @BOTCOMW@Hl# @BOTCOMW@ImPRASN1_BOL%$Below only displays for users $J.#(J83------- VALIDATION ERRORJLE$8START/END TIME MUST BE ENTERED AS hhmm (1:40pm = '0140')JJ3display errorJo$VValidation Error:



J0$$CLICK 'BACK' AND FIX THE PROBLEM
J $'JN 93^1000 "------ handle the subtotals and grandtotals linesR#3^1000 --- javascript date handlingRV$@ # R$@@ R&$B' $otherheadR0R0$C' $otherheadB@R:8 !$  $+$< width="۩(">8"], 6! $ @8J]T ^,$ $
h8r]| Ć ĚĐ/$//Ě8Ĥ]Į ĸ$"",8]( $, ۩5$۩ ۩ 8] $ ($ܨ8] $$$ө8&]D  N# $DŞX( E M:N(1*=47),D:N(1*=47),Y:N(1*=47)b($E/// @F $@F@Fg$G@F@H@IŔl$D G%Y%Mz%DzŔŀŞŔ $DŞ8Dţ]Ũ< // ? # ^$a$($ align=RIGHT NOSAVE$$$$|
 $|$ $8.]8  B3$?L3$?V$ ǜ^$ǜǰn$
SHOWING  B$Excelǰ`$f$ONCLICK ?$)"@$ө'thcolor $#FFFFFFc$