Index: vhPRINTER.mac.rou =================================================================== diff -u -r31553 -r33640 --- vhPRINTER.mac.rou (.../vhPRINTER.mac.rou) (revision 31553) +++ vhPRINTER.mac.rou (.../vhPRINTER.mac.rou) (revision 33640) @@ -84,7 +84,7 @@ "LijstBr : "_$get(LijstBr)_$char(13,10)_ "Device : "_$get(Device)_$char(13,10)_ "Optie : "_$$ArrayToText^vhLib("Optie") - do ##class(vhLib.Logger).%New("vhPRINTER").Info("INIT",Info) + do ##class(vhLib.Logger).%New().Info("INIT",Info) quit BepaalBestandNaam() @@ -396,7 +396,7 @@ .Set Print("LMARG")=$P(PapBr,D,6) Else Do .Set LaatsteGlobalRef = $ZR - .Do ##class(vhLib.Logger).%New("vhPRINTER").Warning("SETPRINT","Niet gedefini�erd papier : "_LaatsteGlobalRef) + .Do ##class(vhLib.Logger).%New().Warning("SETPRINT","Niet gedefini�erd papier : "_LaatsteGlobalRef) .I PapTyp?2.N Set:'LijstBr LijstBr=PapTyp Set PapTyp=$S(PapTyp<96:PapTyp="S",1:"B") .Set PapBr=$S(PapTyp="B":132,1:80) .Set:'LijstBr LijstBr=$S(PapTyp="B":132,1:80) @@ -405,7 +405,7 @@ .Set Print("KOL")=PapBr .Set Print("LEN")=99999 .Set Print("LMARG")=0 - .Do ##class(vhLib.Logger).%New("vhPRINTER").Warning("SETPRINT","Niet gedefini�erd papier : Set "_LaatsteGlobalRef_" = ""\"_Print("LEN")_"\"_Print("KOL")_"\"_Print("TOP")_"\"_Print("BOT")_"\"_Print("LMARG")_"""") + .Do ##class(vhLib.Logger).%New().Warning("SETPRINT","Niet gedefini�erd papier : Set "_LaatsteGlobalRef_" = ""\"_Print("LEN")_"\"_Print("KOL")_"\"_Print("TOP")_"\"_Print("BOT")_"\"_Print("LMARG")_"""") Set Print("NAAM")=$G(DevOms) Set Print("MAXLIJN")=Print("LEN")-Print("TOP")-Print("BOT") Set Print("FONTSIZE")=10