Index: zbcheck.mac.rou =================================================================== diff -u -r29059 -r32939 --- zbcheck.mac.rou (.../zbcheck.mac.rou) (revision 29059) +++ zbcheck.mac.rou (.../zbcheck.mac.rou) (revision 32939) @@ -9,18 +9,18 @@ CHECK() New New AlleControlesGeslaagd - Set CheckWn=$$CHECK^ZBCHKWN() - Set CheckFlo=$$CHECK^ZBCHKFLO() - Set CheckOrd=$$CHECK^FLOWORD3() - Set CheckBon=$$CHECK^FLOWBON3("B") - Set CheckToe=$$CHECK^FLOWTOE3() - Set CheckKup=$$CHECK^FLOWBON3("P") - Set CheckRcp=$$CHECK^ZBCHKRCP() - Set CheckDUO=$$CHECK^ZBCHKFLO("O") - Set CheckDUB=$$CHECK^ZBCHKFLO("B") - Set CheckFAKT=$$CHECK^ZBCHKFLO("F") - Set CheckPROF=$$CHECK^ZBCHKFLO("V") - Set CheckPR=$$CHECK^ZBCHKPR() + Set CheckWn=$$CHECK^ZBCHKWN() ; *** W-Node - Produkten *** / *** W-Node - Orders *** / *** W-Node - Toeleveringen *** + Set CheckFlo=$$CHECK^ZBCHKFLO() ; *** Flow - Orders *** / *** Flow - Toeleveringen *** / *** Flow - Uitleveringen *** / *** Flow - Offertes *** + Set CheckOrd=$$CHECK^FLOWORD3() ; *** WMS ord *** + Set CheckBon=$$CHECK^FLOWBON3("B") ; *** WMS ord *** (deel 2) ??? + Set CheckToe=$$CHECK^FLOWTOE3() ; *** WMS toe *** + Set CheckKup=$$CHECK^FLOWBON3("P") ; *** ^KUP *** + Set CheckRcp=$$CHECK^ZBCHKRCP() ; *** WMS rcp *** + Set CheckDUO=$$CHECK^ZBCHKFLO("O") ; *** Dubbels orders *** + Set CheckDUB=$$CHECK^ZBCHKFLO("B") ; *** Dubbels leveringsbons *** + Set CheckFAKT=$$CHECK^ZBCHKFLO("F") ; *** Facturen *** + Set CheckPROF=$$CHECK^ZBCHKFLO("V") ; *** Proformas *** + Set CheckPR=$$CHECK^ZBCHKPR() ; *** Productbestanden *** #dim AlleControlesGeslaagd As %Boolean = (CheckWn && CheckFlo && CheckOrd && CheckBon && CheckToe && CheckKup && CheckRcp && CheckDUO && CheckDUB && CheckFAKT && CheckPROF && CheckPR) Quit AlleControlesGeslaagd ;