Index: csp/vhisie/TBX/Main/tmpDev.mac.rou =================================================================== diff -u -r696 -r697 --- csp/vhisie/TBX/Main/tmpDev.mac.rou (.../tmpDev.mac.rou) (revision 696) +++ csp/vhisie/TBX/Main/tmpDev.mac.rou (.../tmpDev.mac.rou) (revision 697) @@ -294,16 +294,16 @@ . . Set blnOK=$S(MatchKLNr>0:(OrdKLNr=MatchKLNr),1:(sMode="PROCESS")&&(VERW="VHEPN")) . Else Do ; OrdKLNr="" . . Set blnOK=$S(MatchKLNr>0:((sMode="PROCESS")&&(VERW="VHEPN")), 1:1) - . Set arValues(0,"ERROR")="KlantNummers komen niet overeen." + . Set arValues(0,"ERROR")="KlantNummers komen niet overeen (VH)." Else If TBXContext.IsDomeinHEIN() Do Quit blnOK . Set blnOK=(OrdKLNr=MatchKLNr) - . Set arValues(0,"ERROR")="KlantNummers komen niet overeen." + . Set arValues(0,"ERROR")="KlantNummers komen niet overeen (HEIN)." Else If TBXContext.KlantGegevensViaDataOpt() Do Quit blnOK . Set blnOK = (OrdKLNr=MatchKLNr) || (MatchKLNr="") || ((sMode="PROCESS")&&(VERW="VHEPN")&&(TBXContext.GeefDomeinKlantNummer()=MatchKLNr)) - . Set arValues(0,"ERROR")="KlantNummers komen niet overeen." + . Set arValues(0,"ERROR")="KlantNummers komen niet overeen (DataOpt)." Else If TBXContext.AlleenToegangZonderLogin() Do Quit blnOK . Set blnOK=(OrdKLNr=MatchKLNr) - . Set arValues(0,"ERROR")="KlantNummers komen niet overeen." + . Set arValues(0,"ERROR")="KlantNummers komen niet overeen (Anon)." ; Else Set arValues(0,"ERROR")="Onbekende controle!." Quit 0