#include vhLib.Macro
// CSP-HTML-URL (macro's uit %VHMacro.inc)
#define HTML(%v) $$ConvertToHTML^vhRtn1(%v)
#define HTML2(%v) $ZCVT(%v,"O","HTML")
#define QuoteJS(%v) ##class(%CSP.Page).QuoteJS(%v)
#define URL(%v) $ZCVT(%v,"O","URL")
#define XML(%v) $ZCVT(%v,"O","UTF8")
; +-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-+
; | Constanten voor het algemene GAData.Product: |
; +-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-+
; Package: Prod.GAMeta.* + Prod.GAData.*
; Consistency Check (cc): mogelijke onderdelen van GA.Product die kunnen gecontroleerd worden op inconsistente data
#define ccChildExpr 1
#define ccVolgNrDItem 2
#define ccVolgNrKost 3
#define ccItemLabel 4
#define ccProgLabel 5
#define ccKolomNrParam 6
#define ccParamMode 7
#define ccExecutes 8
; ImageDir constanten
#define SharedCommonDir "\\Notes01\Shared\Common\"
#define ImageDirGA(%v) "\\Notes01\Shared\Common\Images\GAProd\"_%v_"\"
; +-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-+
; | Constanten voor specifieke toepassingen van GA.Product: |
; +-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-+
; Package: BL.PR.GA.* + UI.PR.GA.*
; + + + + + + + +
; + TandemBOX +
; + + + + + + + +
; Losse constanten
#define tbxCodeStdLade "Std"
; PropagatieType (pt)
#define ptNone 0
#define ptEmpty 1
#define ptAll 2
; Of: hoe waarden van andere kenmerken gewijzigd (gepropageerd) worden wanneer de keuzelijst ervan groter of kleiner wordt,
; t.g.v beperkingen opgelegd door bovenliggende kenmerkwaarden
; ptNone 0 ; Waarden worden niet aangepast aan de mogelijke waarden
; ptEmpty 1 ; Als waarde niet in lijst, waarde wordt gewist
; ptAll 2 ; ptEmpty + als slechts één item in lijst, dan wordt deze geselecteerd
; RunMode (rm): Opstart-setting voor de applicatie UI.PR.GA.TandemBox
#define rmNewTemplate 1
#define rmViewTemplate 2
#define rmEditTemplate 3
#define rmNewFromTemplate 4
#define rmNewFromProduct 5
#define rmViewProduct 6
#define rmEditProduct 7
; Constanten voor WebApp
#define mmToggleHistOrd 0
#define mmAllowTogether 1
#define QSREFReplace "$$HashedREF$$"
#define KLNrListAll "#ALL#"
; + + + + + + + + +
; + Verlichting +
; + + + + + + + + +
#define MaxTLPos 100
; +-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-+
; | Constanten voor TandemBox WEB-applicaties: |
; +-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-+
; Package: csp.TBX.* + WS.TBX.*
; Storage Global for Klant Data
#define GlobalKLData ^WS.TBX.KlantData
; Delimiters voor JS-communicatie via HyperEvents
// OPGELET 1 : !!! moeten dus in sync zijn met de javascript-files op de webserver dir /VHISIE/TBX/
// OPGELET 2 : !!! deze macro's worden ZEKER nog niet op alle plaatsen gebruikt. Alle code extra controleren op hard-coded delimiters !!!
#define DelimWSOrderHfd "`"
#define DelimWSOrderLijn "\"
; UserType (ut): Uit de URL wordt het type gebruiker (UserType) bepaald die de web-applicatie opent/bekijkt/wijzigt.
#define utKlantAnon 1
#define utKlantAnonWP 2
#define utKlantKnown 3
#define utVerwSub 5
#define utVerwDomain 8
#define utVerwAdmin 9
; Status Hist (sh): Show In Historiek : Numerieke waarde die aangeeft of een order al dan niet moet getoond worden.
#define shHiddenForAll 0
#define shHiddenByDynaPlug 5
#define shShownForVHEPN 10
#define shShownForVERW 30
#define shShownForKlant 80
; #define shShownForAll 99 ; Niet gebruiken, want orders zijn klantgebonden
#define shShownForAll 99
; Encryptie-sleutel voor de DATAOPT parameter (QueryString in URL) for Klant Data
#define HeinKey "WN-uQ4n6tS61dHJ1"
#define OptimaKey "vanhoeckeOPTIMAL"
#define SfsOptKey "SFS.unimarket2VH"
#define MBHollandOptKey "NL_MeuHo.VH!lAdE"
#define HafeleBEOptKey "BE-tbx.H@fele&VH"
#define HafeleNLOptKey "CtHFLdaT:U-NL2vH"
#define KischOptKey "tBx&_KiSCH-nl2VH"
#define VanRaemdonckOptKey "beShop-V.RaEM!VH"
#define DaroOptKey "u7D@r0;CJm2Wx5KM"
#define GalimbertiOptKey "5Y.OOD@z7&TveHs7"
#define PavanelloOptKey "~6/2#Y8_tXLbrC+m"
#define FerexpertOptKey "TdXA{Du(Xqy7L`J\"
#define BeslagteknikkOptKey "F8zan2R/MXQ#Ts7L"
#define JBarthKey "m57!p#}a)t6gbTHJ"
#define BiemarBoisKey "PAh*Zu~naLnv#7#.qdus?dG7_2*"
#define FurnifitKey "GHN)Cf2RD3[b_?M9"
#define YachtSupplierKey "J5DY*g,Lf){$Y}pwYN"
#define HafeleFIKey "Qv/Tz-(]u$k6!u@$"
#define HafeleITKey "