Index: HADOPV.mac.rou =================================================================== diff -u -r49057 -r49095 --- HADOPV.mac.rou (.../HADOPV.mac.rou) (revision 49057) +++ HADOPV.mac.rou (.../HADOPV.mac.rou) (revision 49095) @@ -271,7 +271,7 @@ Set Hoogte=$P(sFL("G"),D,8) Set Breedte=$P(sFL("G"),D,9) If $L(Prof) { - If ('$Data(^RES("HAD","PI","PROFIEL","D",Prof))) Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Geen data voor "_$Name(^RES("HAD","PI","PROFIEL","D",Prof))_" - PRNr:"_$G(PRNr)_" - KLNr:"_$G(KLNr)_" .")) + If ('$Data(^RES("HAD","PI","PROFIEL","D",Prof))) Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Geen data voor "_$Name(^RES("HAD","PI","PROFIEL","D",Prof))_" - PRNr:"_$G(PRNr)_" - KLNr:"_$G(KLNr)_" .")_"Rec:"_$G(Rec)) Set MinVrGl=$P(^RES("HAD","PI","PROFIEL","D",Prof),"`",3)*2 } Else {