Hieronder de bestandsbeschrijving van de 3 bestanden die vanuit Bake-it worden geëxporteerd.
*.CUS
// Voor alle afleveradressen
sOut:=Space(223)
// * Vul CustID *
sOut := MC_StringInsert(sOut, 1, 8, AllTrim(oKopF:NR))
// * Vul Custname *
sOut := MC_StringInsert(sOut, 13, 30, Left(oAFL:GetNaamVolledig, 30))
// * Vul Street *
sOut := MC_StringInsert(sOut, 43, 25, Left(oAfl:ADRES, 25))
// * Vul Zip *
sOut := MC_StringInsert(sOut, 68, 8, Left(oAfl:POST, 8))
// * Vul City *
sOut := MC_StringInsert(sOut, 76, 22, Left(oAfl:PLAATS, 22))
// * Vul Telephone *
sOut := MC_StringInsert(sOut, 98, 15, Left(oAfl:TEL1, 15))
// * Vul PrijsType *
sOut := MC_StringInsert(sOut, 114, 1, STD_KLA_PRIJS_TYPE)
// * Vul User1 *
sOut := MC_StringInsert(sOut, 115, 8, STD_KLA_USER1)
// * Vul CustGrp *
sOut := MC_StringInsert(sOut, 131, 5, STD_KLA_CUST_GRP)
// * Vul NietVerdelen *
sOut := MC_StringInsert(sOut, 136, 1, STD_KLA_NIET_VERDELEN)
// * Vul Priority 3 *
sOut := MC_StringInsert(sOut, 168, 2, STD_KLA_PRIORITY3)
// * Vul Priority 2 *
sOut := MC_StringInsert(sOut, 171, 2, STD_KLA_PRIORITY2)
// * Vul Priority 1 *
sOut := MC_StringInsert(sOut, 174, 2, STD_KLA_PRIORITY1)
//RouteNumber, FollowUpNumber
sOut := MC_StringInsert(sOut, 181, 4, Right(Al(routeArray[1]),4))
// * Vul DispName *
sOut := MC_StringInsert(sOut, 185, 30, oAfl:ZOEKCODE)
// * Vul MagMeer *
sOut := MC_StringInsert(sOut, 215, 1, STD_KLA_MAG_MEER)
*.PRD
// Voor alle combinaties tussen artikelen en subcodes
sOut:=Space(171)
// Kijk of combinatie Artikelcode + Subcode voorkomt in externe artikelcodes
sOut:=MC_StringInsert(sOut,1,9,PadL(Al(oArt:NR)+Al(oSub:NR), 9, "0"))
// * Vul Prodname *
sOut := MC_StringInsert(sOut, 13, 32, Left(AllTrim(oArt:NAAM) + " " + AllTrim(oSub:NAAM), 32))
// * Vul Barcode *
sOut := MC_StringInsert(sOut, 46, 16, Left(oArt:BARCODE, 16))
// * Vul Prodkrat *
sOut := MC_StringInsert(sOut, 80, 4, STD_ART_PRODKRAT)
// * Vul Magcode *
sOut := MC_StringInsert(sOut, 85, 1, STD_ART_MAGCODE)
// * Vul Deelbaar *
sOut := MC_StringInsert(sOut, 86, 1, STD_ART_DEELBAAR)
// * Vul Product_grp *
sOut := MC_StringInsert(sOut, 87, 3, Left(Al(oAGR:NR), 3))
// * Vul Samenv_grp *
sOut := MC_StringInsert(sOut, 90, 3, STD_ART_SAMENV_GRP)
// * Vul Snij_grp *
sOut := MC_StringInsert(sOut, 93, 3, IIF(oSub:METSNIJ,"1","0"))
// * Vul Reserve_grp *
sOut := MC_StringInsert(sOut, 96, 3, STD_ART_RESERVE_GRP)
// * Vul IsHalve *
sOut := MC_StringInsert(sOut, 111, 1, IIF(oSub:METHALF,"1","0"))
// * Vul PriorityNum *
sOut := MC_StringInsert(sOut, 112, 1, STD_ART_PRIORITY_NUM)
// * Vul NietVerdelen *
sOut := MC_StringInsert(sOut, 113, 1, STD_ART_NIET_VERDELEN)
// * Vul ProductInfo *
sOut := MC_StringInsert(sOut, 114, 20, STD_ART_PRODUCT_INFO)
// * Vul Etiketcode *
sOut := MC_StringInsert(sOut, 134, 20, STD_ART_ETIKETCODE)
// * Vul Prod_rename *
sOut := MC_StringInsert(sOut, 166, 1, STD_ART_PROD_RENAME)
// * Vul Floating *
sOut := MC_StringInsert(sOut, 167, 1, STD_ART_FLOATING)
// * Vul AutoReady *
sOut := MC_StringInsert(sOut, 168, 1, STD_ART_AUTO_READY)
// * Vul DispatchUnit *
sOut := MC_StringInsert(sOut, 169, 3, Str(oSub:FACTAAN, 3, 0))
*.OD0
//Creer String
sOut:=Space(146)
// Artikelnaam + subcode naam uit koppeltabel als het gekoppeld is, anders direct uit tabel art en sub
sOut := MC_StringInsert(sOut, 1, 9, PadL(Al(oArt:NR)+Al(oSub:NR),9,"0"))
// * Vul DriveNum *
sOut := MC_StringInsert(sOut, 13, 1, Right(oLev:NR, 1))
// * Vul CustID *
sOut := MC_StringInsert(sOut, 14, 8, AllTrim(sAfl))
// * Vul Quote *
sOut := MC_StringInsert(sOut, 22, 5, Str(oOrdr:ANT*nFactor, 5, 0))
// * Vul Done *
sOut := MC_StringInsert(sOut, 28, 5, STD_ORD_DONE)
// * Vul A_quote *
sOut := MC_StringInsert(sOut, 33, 6, STD_ORD_A_QUOTE)
// * Vul A_code *
sOut := MC_StringInsert(sOut, 39, 1, STD_ORD_A_CODE)
// * Vul Ordrid *
sOut := MC_StringInsert(sOut, 40, 6, STD_ORD_ORDRID)
// * Vul Vv_done *
sOut := MC_StringInsert(sOut, 59, 5, STD_ORD_VV_DONE)
// * Vul VDriveNum *
sOut := MC_StringInsert(sOut, 66, 1, STD_ORD_VDRIVENUM)
// * Vul Quote0 *
sOut := MC_StringInsert(sOut, 67, 5, STD_ORD_QUOTE0)
// * Vul Q_change *
sOut := MC_StringInsert(sOut, 72, 5, STD_ORD_Q_CHANGE)
// * Vul Edit_flg *
sOut := MC_StringInsert(sOut, 77, 1, STD_ORD_EDIT_FLG)
// * Vul Dlv_note *
sOut := MC_StringInsert(sOut, 78, 9, STD_ORD_DLV_NOTE)
// * Vul Ordr_nr *
sOut := MC_StringInsert(sOut, 87, 9, Al(oOrd:NR))
// * Vul Price *
sOut := MC_StringInsert(sOut, 96, 6, STD_ORD_PRICE)
// * Vul Done0 *
sOut := MC_StringInsert(sOut, 102, 5, STD_ORD_DONE0)
// * Vul Vwk_status *
sOut := MC_StringInsert(sOut, 107, 1, STD_ORD_VWK_STATUS)
// * Vul User1 *
sOut := MC_StringInsert(sOut, 108, 8, STD_ORD_USER1)
// * Vul User2 *
sOut := MC_StringInsert(sOut, 116, 8, STD_ORD_USER1)
// * Vul ActionCode *
sOut := MC_StringInsert(sOut, 124, 1, STD_ORD_ACTIONCODE)
// Doe de route
sRouteNr :=""
nVolgNr :=0
DO CASE
CASE Empty(oAfl:ID_DBROUTE)
// Leeg
OTHERWISE
nVolgNr :=oAfl:ROUTENR
sRouteNr :=Al(oAfl:GetRelateToServerField(#ID_DBRoute,#NR))
END
sOut := MC_StringInsert(sOut, 125, 3, Str(nVolgNr,3,0))
sOut := MC_StringInsert(sOut, 137, 9, sRouteNr)