/// Routine : BL.Sys.FOP.Common.INC
	/// 
	/// Author  : Wim Vermeulen
	/// Created : 12/12/2006
	/// 
 
	#include %occInclude
	#include vhLib.Macro
	#include DocBaseCNTs
	#include VHSys.Scheduler
 
 	// ResourceName for the DocBaseWS Lock (prevent simultaneous async WS-calls) 
 	#define ResDocBaseWS          SysFOPDocBaseWSProcess
 	// ResourceName for the FaxWS Lock (prevent simultaneous async WS-calls) 
 	#define ResFaxWS              SysFOPFaxWSProcess
 
	// Error messages etc. 
	#define msgSOAPTRAP           "SOAP TRAP"
	#define StringEmpty           $C(0)
	#define ErrorNextOnQueue      $$$ERROR($$$GeneralError,"Cannot find/open next task on Queue.")
	#define ErrorProxyEmpty(%v)   $$$ERROR($$$GeneralError,%v_" is empty.")
	#define ErrorProxyPLEmpty     $$$ErrorProxyEmpty("List pxDoc.PrijsLijsten")
 
 
 
	; === Path to disk locations ===
 
 	// Suffixes are FOP (accessible from FOP-server), Ntw (Network), User (User-share), URL (converted web-dir) 
	#define ArchiveDirFOP         "\\Notes01\e$\archive\"
	#define ArchiveDirUser        "\\Notes01\archive\"
 
	#define CvtFop2Ntw(%v)        $$$CvtFopC2Ntw($$$CvtFopE2Ntw(%v))
	#define CvtFopC2Ntw(%v)       $$$Replace(%v,"C:\","\\192.168.1.7\c$\")
	#define CvtFopE2Ntw(%v)       $$$Replace(%v,"E:\","\\192.168.1.7\e$\")
 
	#define OMRSourceDir          "E:\FOP\PPOD_Out\"
	#define OMRSourceDirNtw       $$$CvtFopE2Ntw($$$OMRSourceDir)
	#define OMRPrintDir           "E:\FOP\OMR_Print\"
	#define OMRPrintDirNtw        $$$CvtFopE2Ntw($$$OMRPrintDir)
 
	#define PPODSourceDir         "E:\FOP\PPOD_Out\"
	#define PPODSourceDirNtw      $$$CvtFopE2Ntw($$$PPODSourceDir)
	#define PPODFaxDir            "E:\FOP\PPOD_Fax\"
	#define PPODFaxDirNtw         $$$CvtFopE2Ntw($$$PPODFaxDir)
 
	#define PDFMailDir            "E:\FOP\PDF_Mail\"
	#define PDFMailDirNtw         $$$CvtFopE2Ntw($$$PDFMailDir)
 
	#define FOPInetPubURL         "http://fop/pdfs/"
	#define FOPInetPubDir         "E:\InetpubFOP\pdfs\"
	#define FOPInetPubDirNtw      $$$CvtFopE2Ntw($$$FOPInetPubDir)
 
 
 
	// === PPOD fields : Type === 
 
	;Factuur
	#define ppodtFactuur          "FACTUUR"
	;PrijstLijst
	#define ppodtPrijsLijst       "PRIJSLIJST"
	;Rappel
	#define ppodtRappel           "RAPPEL"
	// Gebruikt, maar niet in PPOD :
	;Order
	#define ppodtOrder            "ORDER"
	;Offerte
	#define ppodtOfferte          "OFFERTE"
	;Levering
	#define ppodtLevBon           "LEVBON"
	;Toelevering
	#define ppodtToelev           "TOELEV"
	
	;TransportLijst
	#define ppodtTransportLijst   "TRANSPORTLIJST"
	;Pakbon
	#define ppodtPakbon           "PAKBON"
	
	// !!! BIJ WIJZIGING volgende routine uitvoeren !!!, boven elke macro de stringversie in commentaar
	// d GenerateRes^vhTools("FOP.DocRepo.PPOD","BL.Sys.FOP.Common","Type","PPOD fields Type","ppodt",1)
 
 
	; === PPOD fields : Regio ===
 
	;Boekhouding
	#define ppodrIntern           "BKH"
	;België
	#define ppodrBelgie           "BE"
	;Europa
	#define ppodrEurRegio         "EUR"
	;Andere
	#define ppodrAndere           "XX"
	;Kopie
	#define ppodrKopieAan         "KOPIE"
 
	// !!! BIJ WIJZIGING volgende routine uitvoeren !!!, boven elke macro de stringversie in commentaar
	// d GenerateRes^vhTools("FOP.DocRepo.PPOD","BL.Sys.FOP.Common","Regio","PPOD fields Regio","ppodr",1)
 
 
 
	// === Miscellaneous === 
 
	// BL-class for the CHUI.Print interface 
	#define cmPrint	              ##class(BL.FOP.Print)
 
	// Reprint suffix added to Printgroup 
	#define ResetSuffix           "-RE"
 
	// Printlog types 
	#define pltPrint              1
 
 	// PPOD Statuses 
 	#define psCompleted           "C"
 	#define psWaiting             "W"
 
	// Delimiter for Task.KeyWords 
	#define TaskKeyWordDelim      ";"
 
	// Delimiter voor Xslt-Parameter configs (i.e. samengestelde parameters zoals  pStaplingConfig = Stapling_StapleOption_OutputTray 
	#define xslpDelim             "_|_"
 
	// LevDocType (ldt) : Type bepaalt de parameters/combinatie voor het afdrukken van doc/papier/logo/... 
	#define ldtBonWit             "BonWit"
	#define ldtBonWitBewijs       "BonWit_Bewijs"
	#define ldtBewijsBonWit       "Bewijs_BonWit"
	#define ldtBonWitBonGeel      "BonWit\BonGeel"
	#define ldtBonWitBewijsLos    "BonWit\Bewijs"
	#define ldtBonGeel            "BonGeel"
	#define ldtBonBlanco          "BonBlanco"
	#define ldtBonBlancoBewijs    "BonBlanco_Bewijs"
	#define ldtBewijsBonBlanco    "Bewijs_BonBlanco"
	#define ldtBonBlancoBonGeel   "BonBlanco\BonGeel"
 
	#define ldtPakbon             "Pakbon"
	#define ldtAddPakbonLos       "\"_$$$ldtPakbon
	#define ldtBeginPakbonLos     $$$ldtPakbon_"\"

	#define ldtPickingDocLadenPerPallet "LadenPerPallet"
	#define ldtAddPickingDocLadenPerPallet "\"_$$$ldtPickingDocLadenPerPallet
	
 
	// Mail From adres voor FOP-server (DocBase) 
	#define FopMailFromKort       "<AdminFOP@vanhoecke.be>"
	#define FopMailFrom           """PDF-service VH"" <AdminFOP@vanhoecke.be>"