Index: vhDeploy/D20181011xSchermDefinitiesTRANSPXUpdate2.cls.xml
===================================================================
diff -u
--- vhDeploy/D20181011xSchermDefinitiesTRANSPXUpdate2.cls.xml	(revision 0)
+++ vhDeploy/D20181011xSchermDefinitiesTRANSPXUpdate2.cls.xml	(revision 53349)
@@ -0,0 +1,45 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20181011xSchermDefinitiesTRANSPXUpdate2">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Toevoegen buitenmaatse pallet aan schermdefinities TRANSPX</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	kill ^SD("D","TRANSPX","E")
+
+	Set ^SD("D","TRANSPX","E",2,"E") = "S sEr=-1,X=$$OphVoorz^TRANSPX(.sFL) S:X'=$P(sFL(""V""),D,8) $P(sFL(""V""),D,8)=X,%SC=1"
+	Set ^SD("D","TRANSPX","E",3,"E") = "S sEr=-1 I '$D(sDir),'$D(^TRANSP(""D"",VervRef,""D"")) S X=$$POP^vhScherm(,,""-1O"","""",""TRANSPORT"",""GROEPEREN"",$S(X="""":""G"",1:X)) S:X=""G"" X="""" S:X'=$P(sFL(""V""),D,15) $P(sFL(""V""),D,15)=X,%SC=1 I X="""" D PUT^vhScherm(""UITLEVDAT"","""")"
+	Set ^SD("D","TRANSPX","E",4,"E") = "S sEr=-1 I $P(sFL(""V""),D,15)=""S"" S X=$$UitLevDat^TRANSPX(.sFL) S:X'=$P(sFL(""V""),D,18) $P(sFL(""V""),D,18)=X,%SC=1"
+	Set ^SD("D","TRANSPX","E",6,"E") = "S:$D(sDir) sEr=-1"
+	Set ^SD("D","TRANSPX","E",7,"E") = "S:$D(sDir) sEr=-1"
+	Set ^SD("D","TRANSPX","E",18,"P") = "D PUT^vhScherm(""LANGGOED"",X) N X D FIELDI^vhScherm(""LANGLENG"")"
+	Set ^SD("D","TRANSPX","E",18,"V") = "S:X'?.N sEr=""Foutieve numerieke ingave"""
+	Set ^SD("D","TRANSPX","E",19,"E") = "S:'$P(sFL(""Q"",""L""),D) sEr=-1,$P(sFL(""Q"",""L""),D,2)="""""
+	Set ^SD("D","TRANSPX","E",19,"T") = "in meter`x[] of x+x[] of x+x+x[]"
+	Set ^SD("D","TRANSPX","E",19,"V") = "S sEr=$$LENLANGG^TRANSP(X)"
+
+	Set ^SD("D","TRANSPX","E",21,"E") = "S:'$$IsTTC^TRANSPX() sEr=""Mag niet gewijzigd worden"" S:X=""*"" X="""""
+
+	Set ^SD("D","TRANSPX","E",22,"P") = "S $P(sFL(""V""),D,3)=$P(sFL(""V""),D,3)-$P(sFL(1),D,3)+X D DISPVAL^vhScherm(""TOTGEW"")"
+	Set ^SD("D","TRANSPX","E",22,"V") = "S:X<0 sEr=""Moet groter zijn dan nul"""
+
+	Set ^SD("D","TRANSPX","E",23,"E") = "S:$D(sDir) sEr=-1 I sEr'=-1 S FP=2201 W @F,@F1 S:'$$ASK^vhWACHTW(""MANAGER"",FP,"""",0) sEr=-1"
+	Set ^SD("D","TRANSPX","E",23,"V") = "S:X<0 sEr=""Moet groter zijn dan nul"" I X,'##Class(CHUI.Flow.Cons.Transport).CheckMaximumRembours(Transport,GroepNr,X,1) S sEr=-1"
+
+	Set ^SD("D","TRANSPX","E",24,"E") = "S sEr=-1,X=$$POP^vhScherm(,,""-1Op"",""Type"",""TRANSPORT"",""VRACHTKOST"",$S(X="""":""NV"",1:X)) S:X=""NV"" X="""""
+
+	Set ^SD("D","TRANSPX","E",29,"E") = "S:$D(sDir) sEr=-1"
+
+	Set ^SD("D","TRANSPX","E",32,"E") = "s sEr=-1,FP=2204 W @F,@F1,""[] = ok"",@FCH R *X W @FCS"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: zTryout/KCA/TestTTC.cls.xml
===================================================================
diff -u
--- zTryout/KCA/TestTTC.cls.xml	(revision 0)
+++ zTryout/KCA/TestTTC.cls.xml	(revision 53349)
@@ -0,0 +1,81 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="zTryout.KCA.TestTTC">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="DoIt">
+<Implementation><![CDATA[
+	/*
+	kill ^SD("D","TRANSPX")
+	
+	Set ^SD("D","TRANSPX","E",2,"E") = "S sEr=-1,X=$$OphVoorz^TRANSPX(.sFL) S:X'=$P(sFL(""V""),D,8) $P(sFL(""V""),D,8)=X,%SC=1"
+	Set ^SD("D","TRANSPX","E",3,"E") = "S sEr=-1 I '$D(sDir),'$D(^TRANSP(""D"",VervRef,""D"")) S X=$$POP^vhScherm(,,""-1O"","""",""TRANSPORT"",""GROEPEREN"",$S(X="""":""G"",1:X)) S:X=""G"" X="""" S:X'=$P(sFL(""V""),D,15) $P(sFL(""V""),D,15)=X,%SC=1 I X="""" D PUT^vhScherm(""UITLEVDAT"","""")"
+	Set ^SD("D","TRANSPX","E",4,"E") = "S sEr=-1 I $P(sFL(""V""),D,15)=""S"" S X=$$UitLevDat^TRANSPX(.sFL) S:X'=$P(sFL(""V""),D,18) $P(sFL(""V""),D,18)=X,%SC=1"
+	Set ^SD("D","TRANSPX","E",6,"E") = "S:$D(sDir) sEr=-1"
+	Set ^SD("D","TRANSPX","E",7,"E") = "S:$D(sDir) sEr=-1"
+	Set ^SD("D","TRANSPX","E",18,"P") = "D PUT^vhScherm(""LANGGOED"",X) N X D FIELDI^vhScherm(""LANGLENG"")"
+	Set ^SD("D","TRANSPX","E",18,"V") = "S:X'?.N sEr=""Foutieve numerieke ingave"""
+	Set ^SD("D","TRANSPX","E",19,"E") = "S:'$P(sFL(""Q"",""L""),D) sEr=-1,$P(sFL(""Q"",""L""),D,2)="""""
+	Set ^SD("D","TRANSPX","E",19,"T") = "in meter`x[] of x+x[] of x+x+x[]"
+	Set ^SD("D","TRANSPX","E",19,"V") = "S sEr=$$LENLANGG^TRANSP(X)"
+	Set ^SD("D","TRANSPX","E",21,"P") = "S $P(sFL(""V""),D,3)=$P(sFL(""V""),D,3)-$P(sFL(1),D,3)+X D DISPVAL^vhScherm(""TOTGEW"")"
+	Set ^SD("D","TRANSPX","E",21,"V") = "S:X<0 sEr=""Moet groter zijn dan nul"""
+	Set ^SD("D","TRANSPX","E",22,"E") = "S:$D(sDir) sEr=-1 I sEr'=-1 S FP=2201 W @F,@F1 S:'$$ASK^vhWACHTW(""MANAGER"",FP,"""",0) sEr=-1"
+	Set ^SD("D","TRANSPX","E",22,"V") = "S:X<0 sEr=""Moet groter zijn dan nul"" I X,'##Class(CHUI.Flow.Cons.Transport).CheckMaximumRembours(Transport,GroepNr,X,1) S sEr=-1"
+	Set ^SD("D","TRANSPX","E",23,"E") = "S sEr=-1,X=$$POP^vhScherm(,,""-1Op"",""Type"",""TRANSPORT"",""VRACHTKOST"",$S(X="""":""NV"",1:X)) S:X=""NV"" X="""""
+	Set ^SD("D","TRANSPX","E",28,"E") = "S:$D(sDir) sEr=-1"
+	Set ^SD("D","TRANSPX","E",31,"E") = "s sEr=-1,FP=2204 W @F,@F1,""[] = ok"",@FCH R *X W @FCS"
+	*/
+	Set ^SD("D","TRANSPX","F",1) = "`0`Aanmaak`U`1`19`V.10`C`L`20``:D``0`AANMAAKV"
+	Set ^SD("D","TRANSPX","F",1,"F") = "$$FMTDT^vhLib.DataTypes(X)_""  ""_$$USERNAME^vhUSER($P(sFL(""V""),D,9),-1)"
+	Set ^SD("D","TRANSPX","F",2) = "`0`Oph. voorz.`U`2`19`V.8`C`L`20``:D``0`OPHVOORZ"
+	Set ^SD("D","TRANSPX","F",2,"F") = "$$FMTDT^vhLib.DataTypes(X)"
+	Set ^SD("D","TRANSPX","F",3) = "`0`Groepering`U`3`19`V.15`C`L`11``:D``0`GROEPEER"
+	Set ^SD("D","TRANSPX","F",3,"F") = "$$FETCHPOP^vhScherm(""TRANSPORT"",""GROEPEREN"",$S(X="""":""G"",1:X),""O"")"
+	Set ^SD("D","TRANSPX","F",4) = "`0`Uit. lev.dat`U`4`19`V.18`C`L`20``:D``0`UITLEVDAT"
+	Set ^SD("D","TRANSPX","F",4,"F") = "$$FMTDT^vhLib.DataTypes(X)"
+	Set ^SD("D","TRANSPX","F",5) = "`0`Tot. gewicht``1`65`V.3;""kg""`+NS`R`15`1`DP``0`TOTGEW"
+	Set ^SD("D","TRANSPX","F",6) = "1`45`Opmerking`DU`2`45`AT.1`B`L`160``D``240`ALGOPMERK"
+	Set ^SD("D","TRANSPX","F",6,"F") = "G`AXFL~`sFL(""AT"")"
+	Set ^SD("D","TRANSPX","F",7) = "`0`Verv. ref.`U``65`V.5`C`R`15``DP``0`VERVREF"
+	Set ^SD("D","TRANSPX","F",7,"F") = "$$FETCHPOP^vhScherm(""TRANSPORT"",""TYPE"",$S(X="""":""L"",1:X),""O"")_$J("""",1+(X'=""T""))_VervRef"
+	Set ^SD("D","TRANSPX","F",8) = "``F7 graf aan voor scheidingslijn`D```"""" W @F7`C`L```DP``0`SCHLIJNF7"
+	Set ^SD("D","TRANSPX","F",9) = "``Scheidingslijn`D`5`1`$TR($J("""",80),"" "",""q"")`C`L`80``DP``0`SCHLIJN"
+	Set ^SD("D","TRANSPX","F",10) = "``F8 graf uit voor scheidingslijn`D```"""" W @F8`C`L```DP``0`SCHLIJNF8"
+	Set ^SD("D","TRANSPX","F",11) = "`4`Klant`U`6`16`1`C`L`25``:D``0`KLANT"
+	Set ^SD("D","TRANSPX","F",11,"F") = "X_"" ""_$P(^KKL(^KK1(X),0),D,2)"
+	Set ^SD("D","TRANSPX","F",12) = "`4`Aanmaak`U`7`16`10`C`L`20``:D``0`AANMAAKG"
+	Set ^SD("D","TRANSPX","F",12,"F") = "$$FMTDT^vhLib.DataTypes(X)_""  ""_$$USERNAME^vhUSER($P(sFL(1),D,9),-1)"
+	Set ^SD("D","TRANSPX","F",13) = "`4`Lev. adr.`U`8`16`L.2`C`L`30``:D``0`LEVADR"
+	Set ^SD("D","TRANSPX","F",14) = "`0`La straat`U`9`16`L.5`C`L`30``DP``0`LASTRAAT"
+	Set ^SD("D","TRANSPX","F",15) = "`0`La woonpl`U`10`16`L.7`C`L`30``DP``0`LAWOONPL"
+	Set ^SD("D","TRANSPX","F",16) = "6`47`Europalet`U`6`60`Q.E.1`+N`L`2``:``0`PALET"
+	Set ^SD("D","TRANSPX","F",17) = "7`47`Collie`U`7`60`Q.C.1`+N`L`2``:``0`COLLIE"
+	Set ^SD("D","TRANSPX","F",18) = "8`47`Langgoed`U`8`60`Q.L.1`C`L`20``:``2`LANGGOED"
+	Set ^SD("D","TRANSPX","F",18,"F") = "X_$S($L($P($G(sFL(""Q"",""L"")),D,2)):"" lengte ""_$P(sFL(""Q"",""L""),D,2)_"" meter"",1:"""")"
+	Set ^SD("D","TRANSPX","F",19) = "``Lengte`H```Q.L.2`C`L`11``HD``0`LANGLENG"
+	Set ^SD("D","TRANSPX","F",20) = "9`47`Klein palet`U`9`60`Q.P.1`+N`L`2``:``0`KLEINPALET"
+	Set ^SD("D","TRANSPX","F",21) = "10`47`Net. Gew.`U`10`60`3;""kg""`+NS`L`15`1`:``0`NETGEW"
+	Set ^SD("D","TRANSPX","F",22) = "11`47`Rembours`U`11`60`2;$$MUNT^vhRtn1($$MUNT^TRANSPX($O(BONNrs(""""))),1)`NS`L`15`$$MUNT^vhRtn1($$MUNT^TRANSPX($O(BONNrs(""""))),4)`:``0`REMBOURS"
+	Set ^SD("D","TRANSPX","F",23) = "12`47`Vrachtkost`U`12`60`7`C`L`15``:``0`VRACHTKOST"
+	Set ^SD("D","TRANSPX","F",23,"F") = "$$FETCHPOP^vhScherm(""TRANSPORT"",""VRACHTKOST"",$S(X="""":""NV"",1:X),""O"")"
+	Set ^SD("D","TRANSPX","F",24) = "13`4`Orders`U`13`16`$$ORDLIST^TRANSPXO`C`L`64``:D``0`ORDERS"
+	Set ^SD("D","TRANSPX","F",25) = "14`4`Leveringen`U`14`16`$$BONLIST^TRANSPX`C`L`64``:D``0`LEVBONS"
+	Set ^SD("D","TRANSPX","F",26) = "15`4`Facturen`U`15`16`$$FAKTLIST^TRANSPXF`C`L`64``:D``0`FACTUREN"
+	Set ^SD("D","TRANSPX","F",27) = "16`4`Proforma's`U`16`16`$$PROFLIST^TRANSPXZ`C`L`64``:D``0`PROFORMAS"
+	Set ^SD("D","TRANSPX","F",28) = "17`4`Opmerking`U`18`4`T.1`B`L`240`````OPMERKING"
+	Set ^SD("D","TRANSPX","F",28,"F") = "G`AXFL~`sFL(""T"")"
+	Set ^SD("D","TRANSPX","F",29) = "`0`Opgehaald`HU`18`60`V.11`C`L`15``:DH``0`OPHALEN"
+	Set ^SD("D","TRANSPX","F",29,"F") = "$$FMTDT^vhLib.DataTypes(X)"
+	Set ^SD("D","TRANSPX","F",30) = "`0`Transfert`HU`19`60`V.12`C`L`15``:DH``0`TRANSFERT"
+	Set ^SD("D","TRANSPX","F",30,"F") = "$$FMTDT^vhLib.DataTypes(X)"
+	Set ^SD("D","TRANSPX","F",31) = "`0`Ok`H`16`16`X`C`L`1``HD``0`OK"
+	Set ^SD("D","TRANSPX","I") = "D INITEXEC^TRANSPX"
+	Set ^SD("D","TRANSPX","R") = "D RUBREXEC^TRANSPX"
+	Set ^SD("D","TRANSPX","RH") = """-[] om het scherm te verlaten""_$S('$G(ModBeheer):""   B[] = Beheer transport"",1:"""")"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
FishEye: Tag 53349 refers to a dead (removed) revision in file `vhDeploy/D20180910xSchermDefinitiesTRANSPXUpdate.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: ULTOER.mac.rou
===================================================================
diff -u -r53322 -r53349
--- ULTOER.mac.rou	(.../ULTOER.mac.rou)	(revision 53322)
+++ ULTOER.mac.rou	(.../ULTOER.mac.rou)	(revision 53349)
@@ -489,12 +489,8 @@
  
  ; Initialiseren van de verpakkingsgegevens TTC
 INITTTC(%J)
- New R
- Set R=$$OD4en5Data(%J),VervRef=$P(R,D) 
- If $Length(VervRef){
-	 Do HaalOpDataHeaderTTC(VervRef)
-	 Do RefreshHeader()
- }
+ Do HaalOpDataHeaderTTC($$OD4en5Data(%J))
+ Do RefreshHeader()
  Quit
 
  ;
Index: TRANSPX.mac.rou
===================================================================
diff -u -r52884 -r53349
--- TRANSPX.mac.rou	(.../TRANSPX.mac.rou)	(revision 52884)
+++ TRANSPX.mac.rou	(.../TRANSPX.mac.rou)	(revision 53349)
@@ -177,7 +177,7 @@
  .Do PUTATTR^vhScherm("LEVBONS","HD","HD"),PUTATTR^vhScherm("FACTUREN","HD","HD"),PUTATTR^vhScherm("PROFORMAS","HD","HD")
  .Do PUTATTR^vhScherm("ORDERS","HD","HD"),PUTATTR^vhScherm("OPMERKING","HD","HD")
  .Do PUTATTR^vhScherm("PALET","HD","HD"),PUTATTR^vhScherm("COLLIE","HD","HD"),PUTATTR^vhScherm("KLEINPALET","HD","HD")
- .Do PUTATTR^vhScherm("LANGGOED","HD","HD"),PUTATTR^vhScherm("VRACHTKOST","HD","HD")
+ .Do PUTATTR^vhScherm("BUITENMAATSE","HD","HD"),PUTATTR^vhScherm("LANGGOED","HD","HD"),PUTATTR^vhScherm("VRACHTKOST","HD","HD")
  .Do PUTATTR^vhScherm("NETGEW","HD","HD"),PUTATTR^vhScherm("REMBOURS","HD","HD")
  Else  Do
  .Do:$G(Ophalen)!$G(Transfer) REMATTR^vhScherm("OPHALEN","H","H"),REMATTR^vhScherm("TRANSFERT","H","H")
FishEye: Tag 53349 refers to a dead (removed) revision in file `vhDeploy/D20180906xSchermDefinitiesTRANSPX.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: vhDeploy/D20181011xSchermDefinitiesTRANSPX2.cls.xml
===================================================================
diff -u
--- vhDeploy/D20181011xSchermDefinitiesTRANSPX2.cls.xml	(revision 0)
+++ vhDeploy/D20181011xSchermDefinitiesTRANSPX2.cls.xml	(revision 53349)
@@ -0,0 +1,66 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20181011xSchermDefinitiesTRANSPX2">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Toevoegen buitenmaatse pallet aan schermdefinities TRANSPX</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Kill ^SD("D","TRANSPX","F")
+	
+	Set ^SD("D","TRANSPX","F",1) = "`0`Aanmaak`U`1`19`V.10`C`L`20``:D``0`AANMAAKV"
+	Set ^SD("D","TRANSPX","F",1,"F") = "$$FMTDT^vhLib.DataTypes(X)_""  ""_$$USERNAME^vhUSER($P(sFL(""V""),D,9),-1)"
+	Set ^SD("D","TRANSPX","F",2) = "`0`Oph. voorz.`U`2`19`V.8`C`L`20``:D``0`OPHVOORZ"
+	Set ^SD("D","TRANSPX","F",2,"F") = "$$FMTDT^vhLib.DataTypes(X)"
+	Set ^SD("D","TRANSPX","F",3) = "`0`Groepering`U`3`19`V.15`C`L`11``:D``0`GROEPEER"
+	Set ^SD("D","TRANSPX","F",3,"F") = "$$FETCHPOP^vhScherm(""TRANSPORT"",""GROEPEREN"",$S(X="""":""G"",1:X),""O"")"
+	Set ^SD("D","TRANSPX","F",4) = "`0`Uit. lev.dat`U`4`19`V.18`C`L`20``:D``0`UITLEVDAT"
+	Set ^SD("D","TRANSPX","F",4,"F") = "$$FMTDT^vhLib.DataTypes(X)"
+	Set ^SD("D","TRANSPX","F",5) = "`0`Tot. gewicht``1`65`V.3;""kg""`+NS`R`15`1`DP``0`TOTGEW"
+	Set ^SD("D","TRANSPX","F",6) = "1`45`Opmerking`DU`2`45`AT.1`B`L`160``D``240`ALGOPMERK"
+	Set ^SD("D","TRANSPX","F",6,"F") = "G`AXFL~`sFL(""AT"")"
+	Set ^SD("D","TRANSPX","F",7) = "`0`Verv. ref.`U``65`V.5`C`R`15``DP``0`VERVREF"
+	Set ^SD("D","TRANSPX","F",7,"F") = "$$FETCHPOP^vhScherm(""TRANSPORT"",""TYPE"",$S(X="""":""L"",1:X),""O"")_$J("""",1+(X'=""T""))_VervRef"
+	Set ^SD("D","TRANSPX","F",8) = "``F7 graf aan voor scheidingslijn`D```"""" W @F7`C`L```DP``0`SCHLIJNF7"
+	Set ^SD("D","TRANSPX","F",9) = "``Scheidingslijn`D`5`1`$TR($J("""",80),"" "",""q"")`C`L`80``DP``0`SCHLIJN"
+	Set ^SD("D","TRANSPX","F",10) = "``F8 graf uit voor scheidingslijn`D```"""" W @F8`C`L```DP``0`SCHLIJNF8"
+	Set ^SD("D","TRANSPX","F",11) = "`4`Klant`U`6`16`1`C`L`25``:D``0`KLANT"
+	Set ^SD("D","TRANSPX","F",11,"F") = "X_"" ""_$P(^KKL(^KK1(X),0),D,2)"
+	Set ^SD("D","TRANSPX","F",12) = "`4`Aanmaak`U`7`16`10`C`L`20``:D``0`AANMAAKG"
+	Set ^SD("D","TRANSPX","F",12,"F") = "$$FMTDT^vhLib.DataTypes(X)_""  ""_$$USERNAME^vhUSER($P(sFL(1),D,9),-1)"
+	Set ^SD("D","TRANSPX","F",13) = "`4`Lev. adr.`U`8`16`L.2`C`L`30``:D``0`LEVADR"
+	Set ^SD("D","TRANSPX","F",14) = "`0`La straat`U`9`16`L.5`C`L`30``DP``0`LASTRAAT"
+	Set ^SD("D","TRANSPX","F",15) = "`0`La woonpl`U`10`16`L.7`C`L`30``DP``0`LAWOONPL"
+	Set ^SD("D","TRANSPX","F",16) = "6`47`Europalet`U`6`60`Q.E.1`+N`L`2``:``0`PALET"
+	Set ^SD("D","TRANSPX","F",17) = "7`47`Collie`U`7`60`Q.C.1`+N`L`2``:``0`COLLIE"
+	Set ^SD("D","TRANSPX","F",18) = "8`47`Langgoed`U`8`60`Q.L.1`C`L`20``:``2`LANGGOED"
+	Set ^SD("D","TRANSPX","F",18,"F") = "X_$S($L($P($G(sFL(""Q"",""L"")),D,2)):"" lengte ""_$P(sFL(""Q"",""L""),D,2)_"" meter"",1:"""")"
+	Set ^SD("D","TRANSPX","F",19) = "``Lengte`H```Q.L.2`C`L`11``HD``0`LANGLENG"
+	Set ^SD("D","TRANSPX","F",20) = "9`47`Klein palet`U`9`60`Q.P.1`+N`L`2``:``0`KLEINPALET"
+	Set ^SD("D","TRANSPX","F",21) = "10`47`Buitenmaatse`U`10`60`Q.B.1`+N`L`2``:``0`BUITENMAATSE"
+	Set ^SD("D","TRANSPX","F",22) = "11`47`Net. Gew.`U`11`60`3;""kg""`+NS`L`15`1`:``0`NETGEW"
+	Set ^SD("D","TRANSPX","F",23) = "12`47`Rembours`U`12`60`2;$$MUNT^vhRtn1($$MUNT^TRANSPX($O(BONNrs(""""))),1)`NS`L`15`$$MUNT^vhRtn1($$MUNT^TRANSPX($O(BONNrs(""""))),4)`:``0`REMBOURS"
+	Set ^SD("D","TRANSPX","F",24) = "13`47`Vrachtkost`U`13`60`7`C`L`15``:``0`VRACHTKOST"
+	Set ^SD("D","TRANSPX","F",24,"F") = "$$FETCHPOP^vhScherm(""TRANSPORT"",""VRACHTKOST"",$S(X="""":""NV"",1:X),""O"")"
+	Set ^SD("D","TRANSPX","F",25) = "14`4`Orders`U`14`16`$$ORDLIST^TRANSPXO`C`L`64``:D``0`ORDERS"
+	Set ^SD("D","TRANSPX","F",26) = "15`4`Leveringen`U`15`16`$$BONLIST^TRANSPX`C`L`64``:D``0`LEVBONS"
+	Set ^SD("D","TRANSPX","F",27) = "16`4`Facturen`U`16`16`$$FAKTLIST^TRANSPXF`C`L`64``:D``0`FACTUREN"
+	Set ^SD("D","TRANSPX","F",28) = "17`4`Proforma's`U`17`16`$$PROFLIST^TRANSPXZ`C`L`64``:D``0`PROFORMAS"
+	Set ^SD("D","TRANSPX","F",29) = "18`4`Opmerking`U`18`4`T.1`B`L`240`````OPMERKING"
+	Set ^SD("D","TRANSPX","F",29,"F") = "G`AXFL~`sFL(""T"")"
+	Set ^SD("D","TRANSPX","F",30) = "`0`Opgehaald`HU`18`60`V.11`C`L`15``:DH``0`OPHALEN"
+	Set ^SD("D","TRANSPX","F",30,"F") = "$$FMTDT^vhLib.DataTypes(X)"
+	Set ^SD("D","TRANSPX","F",31) = "`0`Transfert`HU`19`60`V.12`C`L`15``:DH``0`TRANSFERT"
+	Set ^SD("D","TRANSPX","F",31,"F") = "$$FMTDT^vhLib.DataTypes(X)"
+	Set ^SD("D","TRANSPX","F",32) = "`0`Ok`H`16`16`X`C`L`1``HD``0`OK"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>