Index: vhDeploy/D20180327xGLSsplitsen.cls.xml
===================================================================
diff -u
--- vhDeploy/D20180327xGLSsplitsen.cls.xml	(revision 0)
+++ vhDeploy/D20180327xGLSsplitsen.cls.xml	(revision 50597)
@@ -0,0 +1,41 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20180327xGLSsplitsen">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>GLS opsplitsen in freight en parcel, allerlei configuratiesettings</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	//Leverancier 6612 als transporteur registreren
+	Set $Piece(^DLE("K","LE.A",6612,2),"\",18)=$$$True
+	Set $Piece(^KLE("GLSBELGIUM 6612",2),"\",18)=$$$True
+	
+	//Naam Leverancier wijzigen
+	// zullen we na release via de Admin-UI doen, dan vergeten we geen globals
+	
+	//Post 1116 defaulten naar Leverancier 6612
+	Set ^TRANSP("U",1116,"T") = "6612\1"
+	Set ^TRANSP("U",1116,"N") = "\1"
+	
+	//Posten voor freight defaulten naar Leverancier 5036
+	// staan al goed op cache01
+	
+	//Namen voor in Toerlijst aanpassen naar GLSP en GLSF
+	Set ^TRANSP("T",6612) =  "GLSP\\\O#L#T\"
+	Set $Piece(^TRANSP("T",5036),"\",1) = "GLSF"
+	
+	#dim VolgendTransportNummer = ^TRANSP("N")+1
+	Set ^TRANSP("D",VolgendTransportNummer)	= "6612\\\\\\\64733,57600\1261\64733,43420\\\\\\\\"
+	Set ^TRANSP("IO",VolgendTransportNummer) = ""
+	Set ^TRANSP("N") = VolgendTransportNummer
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>