Index: HADOPV.mac.rou =================================================================== diff -u -r49930 -r53490 --- HADOPV.mac.rou (.../HADOPV.mac.rou) (revision 49930) +++ HADOPV.mac.rou (.../HADOPV.mac.rou) (revision 53490) @@ -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)_" .")_"Rec:"_$G(Rec)) + 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 {