Index: HADWIZ.mac.rou =================================================================== diff -u -r71072 -r74755 --- HADWIZ.mac.rou (.../HADWIZ.mac.rou) (revision 71072) +++ HADWIZ.mac.rou (.../HADWIZ.mac.rou) (revision 74755) @@ -165,7 +165,7 @@ Quit:'##class(Res.ImageLink).HasImage("PR",PRNr)&&'(IsOrgal&&$L(##class(cspBasis.ProductList).DataDefValueURL("N",$$$OLGroep,KenmID,"InfoSleutel","LB"))) New R,K,FP,FilePath,ID - Set FilePath = ##class(BL.Legacy.HADWIZ).GeefProductInfoUrlVhisie4(PRNr,"N") + Set FilePath = ##class(BL.Legacy.HADWIZ).%New().GeefProductInfoUrlVhisie4(PRNr,"N") Set Url=FilePath Do:$L(FilePath) . Do STORE^vhTERMINA()