<>   &3JBBLPLIT0 - PARTIAL BOL SPLIT HANDLER IO@U3^1000$BL #$$DEALERD$
 L3^100V+JBASN1SPLIT`%$

$
U"3^1000 " find BOL# from a DROP_PROE$$, JBPLAN.tpl1,JBPLAN 1 @$1  @A@4'$@  RL3^100 " invalid search M$ f$ ^ $ *$ 
Select Inquiry Parameters
\3^100fL$ JIT BOL#:'zP$:
$' - I$1!$
3^100U344000 "input form$ comments$ N[$O
Add Comments:
bP$:l1$' - v$
$
8BLTEXTTRACKINGNUMBERCARR TRACKINGURLRESULT1CGIDUMMY TRACEHEAD FORMNAMEWFCGI DFORM1LOOKUPTRWFWFPGMTROTDDJBPLANTPLJBPLAN CGI.DROP_PROK JBPLAN.DROP_PRO JBPLAN.BOLKEY RETURNLINKCFORM CGI.BLERRTRAPL9000href=""#"">Return this BOL to inventory"8BLTEXTTRACKINGNUMBERCARR TRACKINGURLRESULT1CGIDUMMY TRACEHEAD FORMNAMEWFCGI DFORM1LOOKUPTRWFWFPGMTROTDDJBPLANTPLJBPLAN CGI.DROP_PROK JBPLAN.DROP_PRO JBPLAN.BOLKEY RETURNLINKCFORM CGI.BLERRTRAPL9000