<>‚Ç 93JBBVALIDATE - VALIDATE ROUTINES FOR VARIOUS RECORD TYPESdÅòÅòÄòÅòÄòÅn$ÄðÆòÄðÆòÅðÑòÅðÑÈ ÅáÑ JBDEALERSýêöèÒ ÅáÑJBITEMýêöÐÞö#(è,3------------------ check the JBDEALERS recsòV$Äð¨$òÄðÄòÅ ðÑ JBDEALERSó,ÓÄûÅ ÛÑ.tpló1ÓÄûÅóÓÄûó,ÓÄûÅ ó Å ÷Åü$Å ðÅL Å@ âÑDýêö°`ö'lÓÄûÆö#(Ð#3----------------- CHECK THE JBITEMÚi3F CVS(REC.RICPROGRAM$,3)="" THEN LET VFLAG=1,VREASON$="INVALID PROGRAM. YOU MUST SELECT A VALID PROGRAM" ºö#(#( 3OUTTAHERE&¬'*3----SCAN PLANS FOR PENDING DEALERS ORDERS'S$Äð¨$òÄ ðÄòÅ ðÑJBPLANó,ÓÄûÅ ÛÑ.tpló1ÓÄûÅóÓÄûó,ÓÄûÅ ó Å ÷Å'$$ÄðÆòÅðÅ@òÅðÅ'j1ÓÄ µÅ¼Ä¯ö'kû't$Åð©ÓÄ °ö(<ûó1úÓÄ ûÅ '~ ÅÓÆò¨ÓÅûûäÅýêö(<'ˆ ¨ÓÅ@ûáÆýêö't'’c ¨ÓÅ@áÑ AIûýêP$ÄðÆòÅðÑPENDING/INPROCESS ORDER(S) EXIST!óö(<'Îö't(<ÓÄ û(–8ÿÿWFRECVFLAGVREASONVWARNVWARNTPL JBDEALERSFF JBDEALERS JBDEALERS.STATUSJBPLANJBPLANUSEKNUMSTARTATENDAT JBDEALERS.DEALERKJBPLAN JBPLAN.QTY JBPLAN.STATUSP