Index: vhLABEL.mac.rou =================================================================== diff -u -r59280 -r74138 --- vhLABEL.mac.rou (.../vhLABEL.mac.rou) (revision 59280) +++ vhLABEL.mac.rou (.../vhLABEL.mac.rou) (revision 74138) @@ -1,7 +1,7 @@ vhLabel ;Afdrukken etiketten via Bartender [ 11/13/2003 2:38 PM ] - #define BartenderPath "\\FOP\DROPFOLDER\HALPROD01\" - #define BartenderDebugPath "\\FOP\c$\BARTENDER\TestBestanden\" + #define BartenderPath "\\FOP_disabled\DROPFOLDER\HALPROD01\" + #define BartenderDebugPath "\\FOP_disabled\c$\BARTENDER\TestBestanden\" ; format CMulti : Local(VolgKey,ProgLabel)=Data PrintMulti(CMulti,Debug) @@ -14,7 +14,7 @@ . Set ResID=$G(CMulti(VolgKey,"RESID")) . Quit:(ResGroep="")||(ResID="") . Set BartLayout=$G(CMulti(VolgKey,"BARTLAYOUT")) ; bv : "OLProduct6x10" - . Set BartDevice=$G(CMulti(VolgKey,"BARTDEVICE")) ; bv : "\\FOP\OL VERPAK1 6X10" + . Set BartDevice=$G(CMulti(VolgKey,"BARTDEVICE")) ; bv : "\\FOP_disabled\OL VERPAK1 6X10" . Quit:(BartLayout="")||(BartDevice="") . Merge CGroeped(BartDevice,BartLayout,$I(CGroeped(BartDevice,BartLayout)))=CMulti(VolgKey) @@ -32,7 +32,7 @@ Set ResID=$G(C("RESID")) Quit:(ResGroep="")||(ResID="") Set BartLayout=$G(C("BARTLAYOUT")) ; bv : "OLProduct6x10" - Set BartDevice=$G(C("BARTDEVICE")) ; bv : "\\FOP\OL VERPAK1 6X10" + Set BartDevice=$G(C("BARTDEVICE")) ; bv : "\\FOP_disabled\OL VERPAK1 6X10" Quit:(BartLayout="")||(BartDevice="") "" Set File=$$CreateFile(BartDevice, BartLayout,.Debug) Quit:File="" @@ -96,8 +96,8 @@ Set File=$$OPEN^vhDEV($$$BartenderPath,"Lbl"_$TR($ZH,".","_")_".TXT","W","M") Use File Set BartenderPrinter="EasyCoderPD41" - Set BartenderPrinter="//FOP/HALUX 10x10" - Set:LabelSize="5x10" BartenderPrinter="//FOP/PD41 HALUX 5x10" + Set BartenderPrinter="//FOP_disabled/HALUX 10x10" + Set:LabelSize="5x10" BartenderPrinter="//FOP_disabled/PD41 HALUX 5x10" Set BartenderPrinter=$TR(BartenderPrinter,"/","\") Set BartenderLabelType=LabelType