Index: PV2.mac.rou =================================================================== diff -u -r1134 -r1272 --- PV2.mac.rou (.../PV2.mac.rou) (revision 1134) +++ PV2.mac.rou (.../PV2.mac.rou) (revision 1272) @@ -25,7 +25,6 @@ f s PRNr=$O(^KPR(PRNr)) Q:'PRNr K ^KPR(PRNr) Write "Copy PROD",! - s ^KPR(0,1)=^|NameSpace|KPR(0,1) s PRNr=1000 f s PRNr=$O(^|NameSpace|KPR(PRNr)) Q:'PRNr Do BuildKPR @@ -35,6 +34,14 @@ Merge ^ProdSpecificI=^|NameSpace|ProdSpecificI Merge ^ProdSpecificD=^|NameSpace|ProdSpecificD + Write "Copy maatwerk framework stuff",! + Kill ^DOM.PM.Maat94D.ProductSpeci7AAD + Merge ^DOM.PM.Maat94D.ProductSpeci7AAD=^|NameSpace|DOM.PM.Maat94D.ProductSpeci7AAD + Kill ^DOM.PM.Maat94D.BerekeningsS936D + Merge ^DOM.PM.Maat94D.BerekeningsS936D=^|NameSpace|DOM.PM.Maat94D.BerekeningsS936D + Kill ^DOM.PM.Maat94D.IngegevenKen738D + Merge ^DOM.PM.Maat94D.IngegevenKen738D=^|NameSpace|DOM.PM.Maat94D.IngegevenKen738D + Write "Copy HADPR(""P"")",! Kill ^HADPR("P") Merge ^HADPR("P")=^|NameSpace|HADPR("P") @@ -66,6 +73,10 @@ Write "Copy KostPlaats",! Kill ^Res.PI.Items("PR;GA;KP") Merge ^Res.PI.Items("PR;GA;KP")=^|NameSpace|Res.PI.Items("PR;GA;KP") + + // Op het einde uitvoeren om nieuwe producten tijdens het kopi�ren ook op te vangen + s ^KPR(0,1)=^|NameSpace|KPR(0,1) + Q BuildKPR @@ -85,7 +96,7 @@ D ^cA604 S NameSpace="JRNL-ADMIN1" - Set GlobList="KOD;ORD;KO1;KO2;ORDW;KTO;TO;KTO1;KTO2;KTO3;KTO4;PPS.BatchD;^APPS.Halux.common.BatchD;PPS.QueueD;PPS.QueueI" + Set GlobList="KOD;ORD;KO1;KO2;ORDW;KTO;TO;KTO1;KTO2;KTO3;KTO4;APPS.Halux.common.BatchD;PPS.QueueD;PPS.QueueI" ; Kill All Write !,"Kill: "