Index: BL/PPS/OL/Inpak.cls.xml =================================================================== diff -u -r54341 -r63231 --- BL/PPS/OL/Inpak.cls.xml (.../Inpak.cls.xml) (revision 54341) +++ BL/PPS/OL/Inpak.cls.xml (.../Inpak.cls.xml) (revision 63231) @@ -1218,7 +1218,7 @@ . . Set BONNr="" . . For Set BONNr=$O(^KUL(KLNr,FaktSoort,BONNr)) Quit:BONNr="" Do . . . Quit:((pBONNr'="")&&(BONNr'=pBONNr)) - . . . Quit:( $$INTDATE^vhLib.DataTypes( $P(^KUL(KLNr,FaktSoort,BONNr,1), ..#Delim, 2 ), "DKP") < ($H-10) ) + . . . Quit:( (pBONNr="") && ( $$INTDATE^vhLib.DataTypes( $P(^KUL(KLNr,FaktSoort,BONNr,1), ..#Delim, 2 ), "DKP") < ($H-10) ) ) . . . // nog een extra selectie via CallBackMethod, in dit geval moet het order een Orgalux bon zijn . . . Quit:'$zobjclassmethod(CBClass,CBMethod,BONNr) . . . // todo : verder opvullen van de velden "Klaar op" en Status