Index: AX/Uitgaand/PM/BehoeftePlanning/impl/JaarAfnameGenerator.cls.xml =================================================================== diff -u -r48233 -r50301 --- AX/Uitgaand/PM/BehoeftePlanning/impl/JaarAfnameGenerator.cls.xml (.../JaarAfnameGenerator.cls.xml) (revision 48233) +++ AX/Uitgaand/PM/BehoeftePlanning/impl/JaarAfnameGenerator.cls.xml (.../JaarAfnameGenerator.cls.xml) (revision 50301) @@ -91,6 +91,8 @@ Write *9,VoorraadInstelling.VeiligheidsVoorraad,*9,..VoorraadCalculator.GGWeekVerkoop Write *9,$$$ExcelNum(..VoorraadCalculator.StandaardAfwijking) Write *9,VoorraadInstelling.ExtraLeveringsDagen+VoorraadInstelling.LeveringsDagen + Write *9,Product.Klassificatie.Groep + Write *9,Product.Klassificatie.SubGroep Write ! ]]> Index: BLPROD.mac.rou =================================================================== diff -u -r49113 -r50301 --- BLPROD.mac.rou (.../BLPROD.mac.rou) (revision 49113) +++ BLPROD.mac.rou (.../BLPROD.mac.rou) (revision 50301) @@ -258,7 +258,7 @@ CopyBlumProd(PRNr,Opties,Value) New IdentNr, BLID, BLRec,Verpak Set Opties=$G(Opties,"BG;PQ;EAN;LT") - Set Opties="" ; 09/01/18 PV - geen updates meer in Admin + Quit ; 09/01/18 PV - geen updates meer in Admin Quit:'$$$PRExist Set IdentNr=$$$PRGet($$$IdentNummer) Set BLID="0"_$TR($E(IdentNr,2,99),".","") @@ -368,6 +368,7 @@ If (Opties["BG") Do . Quit:'$P(BLRec,D,9) . Quit:+$J($P(BLRec,D,9),0,2)=+$J($$$PRGet($$$Gewicht),0,2) + . Set ^PVDiffBlum($H,PRNr)=$P(BLRec,D,9)_"/"_$$$PRGet($$$Gewicht)_"/"_Verschil . Set Diff=Diff_$LB("BG",$LB(+$J($P(BLRec,D,9),0,2),$$$PRGet($$$Gewicht))) ; PalletQty Index: AX/Uitgaand/PM/SOPRContract/impl/SOPRExport.cls.xml =================================================================== diff -u --- AX/Uitgaand/PM/SOPRContract/impl/SOPRExport.cls.xml (revision 0) +++ AX/Uitgaand/PM/SOPRContract/impl/SOPRExport.cls.xml (revision 50301) @@ -0,0 +1,69 @@ + + + +Prod.Product,BL.Derde.LevSpecifiek +TECH.RegisteredObject,TECH.Filter + + +AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor +1 + + + +AXimpl.InterneFirmaInitialen +1 + + + + +Do ##class(AX.Uitgaand.PM.SOPRContract.impl.SOPRExport).%New().Export() +1 +1 +%Status +1 + + + + + + + + + + Index: vhCARETAKER.mac.rou =================================================================== diff -u -r49663 -r50301 --- vhCARETAKER.mac.rou (.../vhCARETAKER.mac.rou) (revision 49663) +++ vhCARETAKER.mac.rou (.../vhCARETAKER.mac.rou) (revision 50301) @@ -976,11 +976,11 @@ } Quit -ExportToEC ; Export van klanten, assortiment, prijzen naar E-commerce (duurt +/-2 uur) +ExportToEC ; Import van klanten en assortiment en daarna export van Historiek en klantproductreferenties (duurt +/-30 min) Try { Do InitRuntimeContext - Do ##class(AX.Uitgaand.EC.Service).%New().GenerateAndExportAll() - } + Do ##class(AX.Uitgaand.EC.ServiceAX).%New().VerwerkAlles() + } Catch (Exceptie) { Do OnError @@ -989,7 +989,7 @@ ExportProductieDag ; Export van de productie DAG+X voor TBX, LBX en TAX Try { Do InitRuntimeContext - Do ##class(AX.Uitgaand.EC.Service).%New().ExportVeranderdeVoorraad() + ;Do ##class(AX.Uitgaand.EC.Service).%New().ExportVeranderdeVoorraad() } Catch (Exceptie) {