public override void Reset()
{
base.Reset();
TIA.Reset();
PIA.Reset();
CPU.Reset();
}
public void PIATestInterval_8()
{
byte result;
PIA pia = new PIA();
pia.Boot();
pia.Write(TIM8T, 100);
for (int ii = 1; ii <= 7; ii++)
{
pia.Tick();
}
result = pia.Read(INTIM);
Assert.AreEqual(99, result);
for (int ii = 99; ii >= 1; ii--)
{
for (int jj = 1; jj <= 8; jj++)
{
pia.Tick();
}
result = pia.Read(INTIM);
Assert.AreEqual(ii - 1, result);
}
pia.Tick();
result = pia.Read(INTIM);
Assert.AreEqual(255, result);
pia.Tick();
result = pia.Read(INTIM);
Assert.AreEqual(254, result);
}
public void PIAWriteInterval_8()
{
PIA pia = new PIA();
pia.Boot();
pia.Write(TIM8T, 100);
byte result = pia.Read(INTIM);
Assert.AreEqual(99, result);
}
public override void Reset()
{
base.Reset();
SwapInBIOS();
if (HSC != null)
{
HSC.Reset();
}
Cart.Reset();
Maria.Reset();
PIA.Reset();
CPU.Reset();
}
public SystemBus()
{
// create the bus devices
cartridge = new Cartridge();
pia = new PIA();
ram = new RAM();
cpu = new CPU(this);
tia = new TIA(cpu);
// create the chain of command for Read and Write
DeviceInterface = new BusDeviceInterface(cartridge, CARTRIDGE_SELECT_MASK, CARTRIDGE_CHIP_SELECT);
BusDeviceInterface PIAInterface = new BusDeviceInterface(pia, PIA_SELECT_MASK, PIA_CHIP_SELECT);
BusDeviceInterface RAMInterface = new BusDeviceInterface(ram, RAM_SELECT_MASK, RAM_CHIP_SELECT);
BusDeviceInterface TIAInterface = new BusDeviceInterface(tia, TIA_SELECT_MASK, TIA_CHIP_SELECT);
DeviceInterface.SetNext(PIAInterface);
PIAInterface.SetNext(RAMInterface);
RAMInterface.SetNext(TIAInterface);
}
public Machine7800(Cart cart, Bios7800 bios, HSC7800 hsc, ILogger logger, int scanlines, int startl, int fHZ, int sRate, int[] p)
: base(logger, scanlines, startl, fHZ, sRate, p, 320)
{
Mem = new AddressSpace(this, 16, 6); // 7800: 16bit, 64byte pages
CPU = new M6502(this, 4);
Maria = new Maria(this, scanlines);
Mem.Map(0x0000, 0x0040, Maria);
Mem.Map(0x0100, 0x0040, Maria);
Mem.Map(0x0200, 0x0040, Maria);
Mem.Map(0x0300, 0x0040, Maria);
PIA = new PIA(this);
Mem.Map(0x0280, 0x0080, PIA);
Mem.Map(0x0480, 0x0080, PIA);
Mem.Map(0x0580, 0x0080, PIA);
RAM1 = new RAM6116();
RAM2 = new RAM6116();
Mem.Map(0x1800, 0x0800, RAM1);
Mem.Map(0x2000, 0x0800, RAM2);
Mem.Map(0x0040, 0x00c0, RAM2); // page 0 shadow
Mem.Map(0x0140, 0x00c0, RAM2); // page 1 shadow
Mem.Map(0x2800, 0x0800, RAM2); // shadow1
Mem.Map(0x3000, 0x0800, RAM2); // shadow2
Mem.Map(0x3800, 0x0800, RAM2); // shadow3
BIOS = bios;
HSC = hsc;
if (HSC != null)
{
Mem.Map(0x1000, 0x800, HSC.SRAM);
Mem.Map(0x3000, 0x1000, HSC);
Logger.WriteLine("7800 Highscore Cartridge Installed");
}
Cart = cart;
Mem.Map(0x4000, 0xc000, Cart);
}
public Machine2600(Cart c, InputAdapter ia, int slines, int startl, int fHZ, int sRate, int[] p)
: base(ia, slines, startl, fHZ, sRate, p, 160)
{
mem = new AddressSpace(this, 13, 6); // 2600: 13bit, 64byte pages
cpu = new M6502(mem);
cpu.RunClocksMultiple = 1;
tia = new TIA(this);
for (ushort i = 0; i < 0x1000; i += 0x100) {
mem.Map(i, 0x0080, tia);
}
pia = new PIA(this);
for (ushort i = 0x0080; i < 0x1000; i += 0x100) {
mem.Map(i, 0x0080, pia);
}
mem.Map(0x1000, 0x1000, c);
}
public Machine7800(Cart c, InputAdapter ia, int slines, int startl, int fHZ, int sRate, int[] p)
: base(ia, slines, startl, fHZ, sRate, p, 320)
{
mem = new AddressSpace(this, 16, 6); // 7800: 16bit, 64byte pages
cpu = new M6502(mem);
cpu.RunClocksMultiple = 4;
Maria = new Maria(this);
mem.Map(0x0000, 0x0040, Maria);
mem.Map(0x0100, 0x0040, Maria);
mem.Map(0x0200, 0x0040, Maria);
mem.Map(0x0300, 0x0040, Maria);
pia = new PIA(this);
mem.Map(0x0280, 0x0080, pia);
mem.Map(0x0480, 0x0080, pia);
mem.Map(0x0580, 0x0080, pia); // TODO : unsure about this one
RAM1 = new RAM6116();
mem.Map(0x1800, 0x0800, RAM1);
RAM2 = new RAM6116();
mem.Map(0x2000, 0x0800, RAM2);
mem.Map(0x0040, 0x00c0, RAM2); // page 0 shadow
mem.Map(0x0140, 0x00c0, RAM2); // page 1 shadow
mem.Map(0x2800, 0x0800, RAM2); // shadow1
mem.Map(0x3000, 0x0800, RAM2); // shadow2
mem.Map(0x3800, 0x0800, RAM2); // shadow3
// Insert the 7800 Highscore cartridge if requested
if (EMU7800App.Instance.Settings.Use7800HSC) {
HSC = new HSC7800();
mem.Map(0x1000, 0x800, HSC.SRAM);
mem.Map(0x3000, 0x1000, HSC);
Trace.WriteLine("7800 Highscore Cartridge Installed");
}
Cart = c;
mem.Map(0x4000, 0xc000, Cart);
}
public Machine2600(Cart cart, ILogger logger, int slines, int startl, int fHZ, int sRate, int[] p)
: base(logger, slines, startl, fHZ, sRate, p, 160)
{
Mem = new AddressSpace(this, 13, 6); // 2600: 13bit, 64byte pages
CPU = new M6502(this, 1);
TIA = new TIA(this);
for (ushort i = 0; i < 0x1000; i += 0x100)
{
Mem.Map(i, 0x0080, TIA);
}
PIA = new PIA(this);
for (ushort i = 0x0080; i < 0x1000; i += 0x100)
{
Mem.Map(i, 0x0080, PIA);
}
Cart = cart;
Mem.Map(0x1000, 0x1000, Cart);
}
public Machine2600(Cart cart, ILogger logger, int slines, int startl, int fHZ, int sRate, int[] p)
: base(logger, slines, startl, fHZ, sRate, p, 160)
{
Mem = new AddressSpace(this, 13, 6); // 2600: 13bit, 64byte pages
CPU = new M6502(this, 1);
TIA = new TIA(this);
for (ushort i = 0; i < 0x1000; i += 0x100)
{
Mem.Map(i, 0x0080, TIA);
}
PIA = new PIA(this);
for (ushort i = 0x0080; i < 0x1000; i += 0x100)
{
Mem.Map(i, 0x0080, PIA);
}
Cart = cart;
Mem.Map(0x1000, 0x1000, Cart);
}
public Machine7800(Cart cart, Bios7800 bios, HSC7800 hsc, ILogger logger, int scanlines, int startl, int fHZ, int sRate, int[] p)
: base(logger, scanlines, startl, fHZ, sRate, p, 320)
{
Mem = new AddressSpace(this, 16, 6); // 7800: 16bit, 64byte pages
CPU = new M6502(this, 4);
Maria = new Maria(this, scanlines);
Mem.Map(0x0000, 0x0040, Maria);
Mem.Map(0x0100, 0x0040, Maria);
Mem.Map(0x0200, 0x0040, Maria);
Mem.Map(0x0300, 0x0040, Maria);
PIA = new PIA(this);
Mem.Map(0x0280, 0x0080, PIA);
Mem.Map(0x0480, 0x0080, PIA);
Mem.Map(0x0580, 0x0080, PIA);
RAM1 = new RAM6116();
RAM2 = new RAM6116();
Mem.Map(0x1800, 0x0800, RAM1);
Mem.Map(0x2000, 0x0800, RAM2);
Mem.Map(0x0040, 0x00c0, RAM2); // page 0 shadow
Mem.Map(0x0140, 0x00c0, RAM2); // page 1 shadow
Mem.Map(0x2800, 0x0800, RAM2); // shadow1
Mem.Map(0x3000, 0x0800, RAM2); // shadow2
Mem.Map(0x3800, 0x0800, RAM2); // shadow3
BIOS = bios;
HSC = hsc;
if (HSC != null)
{
Mem.Map(0x1000, 0x800, HSC.SRAM);
Mem.Map(0x3000, 0x1000, HSC);
Logger.WriteLine("7800 Highscore Cartridge Installed");
}
Cart = cart;
Mem.Map(0x4000, 0xc000, Cart);
}
/// <summary>
/// Build price catalogue.
/// Original from https://www.gs1.org/sites/default/files/docs/eancom/s4/pricat.pdf
/// </summary>
static TSPRICAT BuildPriceCatalogue(string controlNumber)
{
var result = new TSPRICAT();
// Message header
result.UNH = new UNH();
result.UNH.MessageReferenceNumber_01 = controlNumber.PadLeft(14, '0');
result.UNH.MessageIdentifier_02 = new S009();
result.UNH.MessageIdentifier_02.MessageType_01 = "PRICAT";
result.UNH.MessageIdentifier_02.MessageVersionNumber_02 = "D";
result.UNH.MessageIdentifier_02.MessageReleaseNumber_03 = "96A";
result.UNH.MessageIdentifier_02.ControllingAgencyCoded_04 = "UN";
// Price/sales catalogue number PC32458
result.BGM = new BGM();
result.BGM.DOCUMENTMESSAGENAME_01 = new C002();
result.BGM.DOCUMENTMESSAGENAME_01.Documentmessagenamecoded_01 = "9";
result.BGM.Documentmessagenumber_02 = "PC32458";
result.BGM.Messagefunctioncoded_03 = "9";
// Repeating DTM
result.DTM = new List <DTM>();
// Message date 1st October 2002
var dtm1 = new DTM();
dtm1.DATETIMEPERIOD_01 = new C507();
dtm1.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "137";
dtm1.DATETIMEPERIOD_01.Datetimeperiod_02 = "20021001";
dtm1.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
result.DTM.Add(dtm1);
// Repeating RFF Groups
result.RFFLoop = new List <Loop_RFF_PRICAT>();
// Begin RFF Group
var rffLoop1 = new Loop_RFF_PRICAT();
// Price list is related to contract number 5622ABE
rffLoop1.RFF = new RFF();
rffLoop1.RFF.REFERENCE_01 = new C506();
rffLoop1.RFF.REFERENCE_01.Referencequalifier_01 = "CT";
rffLoop1.RFF.REFERENCE_01.Referencenumber_02 = "5622ABE";
// Repeating DTM
rffLoop1.DTM = new List <DTM>();
// Contract date 10th of August 2002
var dtmRff1 = new DTM();
dtmRff1.DATETIMEPERIOD_01 = new C507();
dtmRff1.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "171";
dtmRff1.DATETIMEPERIOD_01.Datetimeperiod_02 = "20020810";
dtmRff1.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
rffLoop1.DTM.Add(dtmRff1);
// End RFF Group
result.RFFLoop.Add(rffLoop1);
// Repeating NAD Groups
result.NADLoop = new List <Loop_NAD_PRICAT>();
// Begin NAD Group 1
var nadLoop1 = new Loop_NAD_PRICAT();
// Buyer is identified by GLN 5412345000020
nadLoop1.NAD = new NAD();
nadLoop1.NAD.Partyqualifier_01 = "BY";
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02 = new C082();
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02.Partyididentification_01 = "5412345000020";
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02.Codelistresponsibleagencycoded_03 = "9";
// Repeating RFF NAD Groups
nadLoop1.RFFLoop = new List <Loop_RFF_PRICAT>();
// Begin RFF NAD Group
var rffNadLoop1 = new Loop_RFF_PRICAT();
// Buyer’s VAT number VR12345
rffNadLoop1.RFF = new RFF();
rffNadLoop1.RFF.REFERENCE_01 = new C506();
rffNadLoop1.RFF.REFERENCE_01.Referencequalifier_01 = "VA";
rffNadLoop1.RFF.REFERENCE_01.Referencenumber_02 = "VR12345";
// End RFF NAD Group
nadLoop1.RFFLoop.Add(rffNadLoop1);
// End NAD Group 1
result.NADLoop.Add(nadLoop1);
// Begin NAD Group 2
var nadLoop2 = new Loop_NAD_PRICAT();
// Supplier is identified by GLN 4012345500004
nadLoop2.NAD = new NAD();
nadLoop2.NAD.Partyqualifier_01 = "SU";
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02 = new C082();
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02.Partyididentification_01 = "4012345500004";
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02.Codelistresponsibleagencycoded_03 = "9";
// Repeating RFF NAD Groups
nadLoop2.RFFLoop = new List <Loop_RFF_PRICAT>();
// Begin RFF NAD Group
var rffNadLoop2 = new Loop_RFF_PRICAT();
// Supplier’s VAT number is VR95745
rffNadLoop2.RFF = new RFF();
rffNadLoop2.RFF.REFERENCE_01 = new C506();
rffNadLoop2.RFF.REFERENCE_01.Referencequalifier_01 = "VA";
rffNadLoop2.RFF.REFERENCE_01.Referencenumber_02 = "VR95745";
// End RFF NAD Group
nadLoop2.RFFLoop.Add(rffNadLoop2);
// End NAD Group 2
result.NADLoop.Add(nadLoop2);
// Repeating CUX Groups
result.CUXLoop = new List <Loop_CUX_PRICAT>();
// Begin CUX Group
var cuxLoop = new Loop_CUX_PRICAT();
// Price list currency is Euros
cuxLoop.CUX = new CUX();
cuxLoop.CUX.CURRENCYDETAILS_01 = new C504();
cuxLoop.CUX.CURRENCYDETAILS_01.Currencydetailsqualifier_01 = "2";
cuxLoop.CUX.CURRENCYDETAILS_01.Currencycoded_02 = "EUR";
cuxLoop.CUX.CURRENCYDETAILS_01.Currencyqualifier_03 = "8";
// End CUX Group
result.CUXLoop.Add(cuxLoop);
// Repeating PGI Groups
result.PGILoop = new List <Loop_PGI_PRICAT>();
// Begin PGI Group
var pgiLoop1 = new Loop_PGI_PRICAT();
// Product group containing no price group
pgiLoop1.PGI = new PGI();
pgiLoop1.PGI.Productgrouptypecoded_01 = "2";
// Repeating LIN PGI Groups
pgiLoop1.LINLoop = new List <Loop_LIN_PRICAT>();
// Begin LIN PGI Group 1
var linPgiLoop1 = new Loop_LIN_PRICAT();
// Line item 1, an addition, is identified by GTIN 5410738377131
linPgiLoop1.LIN = new LIN();
linPgiLoop1.LIN.Lineitemnumber_01 = "1";
linPgiLoop1.LIN.Actionrequestnotificationcoded_02 = "1";
linPgiLoop1.LIN.ITEMNUMBERIDENTIFICATION_03 = new C212();
linPgiLoop1.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumber_01 = "5410738377131";
linPgiLoop1.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumbertypecoded_02 = "SRV";
// Repeating PIA
linPgiLoop1.PIA = new List <PIA>();
// Supplier’s article number CU32555 is provided as an additional identification
var piaLin1 = new PIA();
piaLin1.Productidfunctionqualifier_01 = "1";
piaLin1.ITEMNUMBERIDENTIFICATION_02 = new C212();
piaLin1.ITEMNUMBERIDENTIFICATION_02.Itemnumber_01 = "CU32555";
piaLin1.ITEMNUMBERIDENTIFICATION_02.Itemnumbertypecoded_02 = "SA";
linPgiLoop1.PIA.Add(piaLin1);
// Repeating IMD
linPgiLoop1.IMD = new List <IMD>();
// Current line item is a consumer unit
var imdLin1 = new IMD();
imdLin1.Itemdescriptiontypecoded_01 = "C";
imdLin1.ITEMDESCRIPTION_03 = new C273();
imdLin1.ITEMDESCRIPTION_03.Itemdescriptionidentification_01 = "CU";
imdLin1.ITEMDESCRIPTION_03.Codelistresponsibleagencycoded_03 = "9";
linPgiLoop1.IMD.Add(imdLin1);
// Product description
var imdLin2 = new IMD();
imdLin2.Itemdescriptiontypecoded_01 = "F";
imdLin2.ITEMDESCRIPTION_03 = new C273();
imdLin2.ITEMDESCRIPTION_03.Itemdescription_04 = "HEALTHIEST CORN CRISPIES";
imdLin2.ITEMDESCRIPTION_03.Itemdescription_05 = "BOX";
linPgiLoop1.IMD.Add(imdLin2);
// Repeating MEA
linPgiLoop1.MEA = new List <MEA>();
// The net weight of the consumer unit is 250 grms
var mea = new MEA();
mea.Measurementapplicationqualifier_01 = "PD";
mea.MEASUREMENTDETAILS_02 = new C502();
mea.MEASUREMENTDETAILS_02.Measurementdimensioncoded_01 = "AAA";
mea.MEASUREMENTDETAILS_02.Measurementsignificancecoded_02 = "4";
mea.VALUERANGE_03 = new C174();
mea.VALUERANGE_03.Measureunitqualifier_01 = "GRM";
mea.VALUERANGE_03.Measurementvalue_02 = "250";
linPgiLoop1.MEA.Add(mea);
// Repeating HAN
linPgiLoop1.HAN = new List <HAN>();
// The product is foodstuffs
var hanLin1 = new HAN();
hanLin1.HANDLINGINSTRUCTIONS_01 = new C524();
hanLin1.HANDLINGINSTRUCTIONS_01.Handlinginstructionscoded_01 = "EAT";
hanLin1.HANDLINGINSTRUCTIONS_01.Codelistresponsibleagencycoded_03 = "9";
linPgiLoop1.HAN.Add(hanLin1);
// Repeating TAX LIN Groups
linPgiLoop1.TAXLoop = new List <Loop_TAX_PRICAT>();
// Begin TAX LIN Group
var taxLin1 = new Loop_TAX_PRICAT();
// The product is subject to the standard rate of 21% VAT
taxLin1.TAX = new TAX();
taxLin1.TAX.Dutytaxfeefunctionqualifier_01 = "7";
taxLin1.TAX.DUTYTAXFEETYPE_02 = new C241();
taxLin1.TAX.DUTYTAXFEETYPE_02.Dutytaxfeetypecoded_01 = "VAT";
taxLin1.TAX.DUTYTAXFEEDETAIL_05 = new C243();
taxLin1.TAX.DUTYTAXFEEDETAIL_05.Dutytaxfeerate_04 = "21";
taxLin1.TAX.Dutytaxfeecategorycoded_06 = "S";
// End TAX LIN Group
linPgiLoop1.TAXLoop.Add(taxLin1);
// Repeating PRI LIN Groups
linPgiLoop1.PRILoop = new List <Loop_PRI_PRICAT_2>();
// Begin PRI LIN Group
var priLinLoop1 = new Loop_PRI_PRICAT_2();
// The suggested retail information price, including allowances / charges and taxes, is 40
priLinLoop1.PRI = new PRI();
priLinLoop1.PRI.PRICEINFORMATION_01 = new C509();
priLinLoop1.PRI.PRICEINFORMATION_01.Pricequalifier_01 = "AAE";
priLinLoop1.PRI.PRICEINFORMATION_01.Price_02 = "40";
priLinLoop1.PRI.PRICEINFORMATION_01.Pricetypecoded_03 = "CA";
priLinLoop1.PRI.PRICEINFORMATION_01.Pricetypequalifier_04 = "SRP";
// End PRI LIN Group
linPgiLoop1.PRILoop.Add(priLinLoop1);
// Repeating PAC LIN Groups
linPgiLoop1.PACLoop = new List <Loop_PAC_PRICAT>();
// Begin PAC LIN Group
var pacLin1 = new Loop_PAC_PRICAT();
// The consumer unit is packaged in a box
pacLin1.PAC = new PAC();
pacLin1.PAC.PACKAGETYPE_03 = new C202();
pacLin1.PAC.PACKAGETYPE_03.Typeofpackagesidentification_01 = "BX";
// Repeating MEA
pacLin1.MEA = new List <MEA>();
// The height of the box is 200 mm
var meaPac1 = new MEA();
meaPac1.Measurementapplicationqualifier_01 = "PD";
meaPac1.MEASUREMENTDETAILS_02 = new C502();
meaPac1.MEASUREMENTDETAILS_02.Measurementdimensioncoded_01 = "HT";
meaPac1.VALUERANGE_03 = new C174();
meaPac1.VALUERANGE_03.Measureunitqualifier_01 = "MMT";
meaPac1.VALUERANGE_03.Measurementvalue_02 = "200";
pacLin1.MEA.Add(meaPac1);
// The length of the box is 80 mm
var meaPac2 = new MEA();
meaPac2.Measurementapplicationqualifier_01 = "PD";
meaPac2.MEASUREMENTDETAILS_02 = new C502();
meaPac2.MEASUREMENTDETAILS_02.Measurementdimensioncoded_01 = "LN";
meaPac2.VALUERANGE_03 = new C174();
meaPac2.VALUERANGE_03.Measureunitqualifier_01 = "MMT";
meaPac2.VALUERANGE_03.Measurementvalue_02 = "80";
pacLin1.MEA.Add(meaPac2);
// The width of the box is 30 mm
var meaPac3 = new MEA();
meaPac3.Measurementapplicationqualifier_01 = "PD";
meaPac3.MEASUREMENTDETAILS_02 = new C502();
meaPac3.MEASUREMENTDETAILS_02.Measurementdimensioncoded_01 = "WD";
meaPac3.VALUERANGE_03 = new C174();
meaPac3.VALUERANGE_03.Measureunitqualifier_01 = "MMT";
meaPac3.VALUERANGE_03.Measurementvalue_02 = "30";
pacLin1.MEA.Add(meaPac3);
// End PAC LIN Group
linPgiLoop1.PACLoop.Add(pacLin1);
// End LIN PGI Group 1
pgiLoop1.LINLoop.Add(linPgiLoop1);
// Begin LIN PGI Group 2
var linPgiLoop2 = new Loop_LIN_PRICAT();
// Line item 2, an addition, is identified by GTIN 5410738377117
linPgiLoop2.LIN = new LIN();
linPgiLoop2.LIN.Lineitemnumber_01 = "2";
linPgiLoop2.LIN.Actionrequestnotificationcoded_02 = "1";
linPgiLoop2.LIN.ITEMNUMBERIDENTIFICATION_03 = new C212();
linPgiLoop2.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumber_01 = "5410738377117";
linPgiLoop2.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumbertypecoded_02 = "SRV";
// Repeating PIA
linPgiLoop2.PIA = new List <PIA>();
// Supplier’s article number TU32555 is provided as an additional identification
var piaLin2 = new PIA();
piaLin2.Productidfunctionqualifier_01 = "1";
piaLin2.ITEMNUMBERIDENTIFICATION_02 = new C212();
piaLin2.ITEMNUMBERIDENTIFICATION_02.Itemnumber_01 = "TU32555";
piaLin2.ITEMNUMBERIDENTIFICATION_02.Itemnumbertypecoded_02 = "SA";
linPgiLoop2.PIA.Add(piaLin2);
// Repeating IMD
linPgiLoop2.IMD = new List <IMD>();
// Current line item is a trade unit
var imdLin3 = new IMD();
imdLin3.Itemdescriptiontypecoded_01 = "C";
imdLin3.ITEMDESCRIPTION_03 = new C273();
imdLin3.ITEMDESCRIPTION_03.Itemdescriptionidentification_01 = "TU";
imdLin3.ITEMDESCRIPTION_03.Codelistresponsibleagencycoded_03 = "9";
linPgiLoop2.IMD.Add(imdLin3);
// Product description
var imdLin4 = new IMD();
imdLin4.Itemdescriptiontypecoded_01 = "F";
imdLin4.ITEMDESCRIPTION_03 = new C273();
imdLin4.ITEMDESCRIPTION_03.Itemdescription_04 = "CORN CRISPIES";
imdLin4.ITEMDESCRIPTION_03.Itemdescription_05 = "CASE";
linPgiLoop2.IMD.Add(imdLin4);
// Repeating HAN
linPgiLoop2.HAN = new List <HAN>();
// The product is foodstuffs
var hanLin2 = new HAN();
hanLin2.HANDLINGINSTRUCTIONS_01 = new C524();
hanLin2.HANDLINGINSTRUCTIONS_01.Handlinginstructionscoded_01 = "EAT";
hanLin2.HANDLINGINSTRUCTIONS_01.Codelistresponsibleagencycoded_03 = "9";
linPgiLoop2.HAN.Add(hanLin2);
// Repeating ALI
linPgiLoop2.ALI = new List <ALI>();
// Country of origin is Belgium
var aliLin1 = new ALI();
aliLin1.Countryoforigincoded_01 = "BE";
linPgiLoop2.ALI.Add(aliLin1);
// Repeating TAX LIN Groups
linPgiLoop2.TAXLoop = new List <Loop_TAX_PRICAT>();
// Begin TAX LIN Group
var taxLin2 = new Loop_TAX_PRICAT();
// Product is subject to the standard VAT rate of 21%
taxLin2.TAX = new TAX();
taxLin2.TAX.Dutytaxfeefunctionqualifier_01 = "7";
taxLin2.TAX.DUTYTAXFEETYPE_02 = new C241();
taxLin2.TAX.DUTYTAXFEETYPE_02.Dutytaxfeetypecoded_01 = "VAT";
taxLin2.TAX.DUTYTAXFEEDETAIL_05 = new C243();
taxLin2.TAX.DUTYTAXFEEDETAIL_05.Dutytaxfeerate_04 = "21";
taxLin2.TAX.Dutytaxfeecategorycoded_06 = "S";
// End TAX LIN Group
linPgiLoop2.TAXLoop.Add(taxLin2);
// Repeating PRI LIN Groups
linPgiLoop2.PRILoop = new List <Loop_PRI_PRICAT_2>();
// Begin PRI LIN Group
var priLinLoop2 = new Loop_PRI_PRICAT_2();
// The calculation gross price for the product is 500
priLinLoop2.PRI = new PRI();
priLinLoop2.PRI.PRICEINFORMATION_01 = new C509();
priLinLoop2.PRI.PRICEINFORMATION_01.Pricequalifier_01 = "AAB";
priLinLoop2.PRI.PRICEINFORMATION_01.Price_02 = "500";
priLinLoop2.PRI.PRICEINFORMATION_01.Pricetypecoded_03 = "CA";
// Repeating ALC LIN Groups
linPgiLoop2.ALCLoop = new List <Loop_ALC_PRICAT>();
// Begin ALC LIN Group
var alcLin1 = new Loop_ALC_PRICAT();
// An allowance exists for this product
alcLin1.ALC = new ALC();
alcLin1.ALC.Allowanceorchargequalifier_01 = "A";
alcLin1.ALC.Calculationsequenceindicatorcoded_04 = "1";
// PCD Group
alcLin1.PCDLoop = new Loop_PCD_PRICAT();
// Allowance of 8%
alcLin1.PCDLoop.PCD = new PCD();
alcLin1.PCDLoop.PCD.PERCENTAGEDETAILS_01 = new C501();
alcLin1.PCDLoop.PCD.PERCENTAGEDETAILS_01.Percentagequalifier_01 = "3";
alcLin1.PCDLoop.PCD.PERCENTAGEDETAILS_01.Percentage_02 = "8";
// Is available on purchase of a minimum quantity of 48
alcLin1.PCDLoop.RNG = new RNG();
alcLin1.PCDLoop.RNG.Rangetypequalifier_01 = "1";
alcLin1.PCDLoop.RNG.RANGE_02 = new C280();
alcLin1.PCDLoop.RNG.RANGE_02.Measureunitqualifier_01 = "PCE";
alcLin1.PCDLoop.RNG.RANGE_02.Rangeminimum_02 = "48";
// End ALC LIN Group
linPgiLoop2.ALCLoop.Add(alcLin1);
// End PRI LIN Group
linPgiLoop2.PRILoop.Add(priLinLoop2);
// Repeating PAC LIN Groups
linPgiLoop2.PACLoop = new List <Loop_PAC_PRICAT>();
// Begin PAC LIN Group
var pacLin2 = new Loop_PAC_PRICAT();
// The product is packaged in a carton
pacLin2.PAC = new PAC();
pacLin2.PAC.PACKAGETYPE_03 = new C202();
pacLin2.PAC.PACKAGETYPE_03.Typeofpackagesidentification_01 = "CT";
// End PAC LIN Group
linPgiLoop2.PACLoop.Add(pacLin2);
// End LIN PGI Group 2
pgiLoop1.LINLoop.Add(linPgiLoop2);
// Begin LIN PGI Group 3
var linPgiLoop3 = new Loop_LIN_PRICAT();
// Line number 3, identified by GTIN 5410738377131, is a sub-line of line number 2
linPgiLoop3.LIN = new LIN();
linPgiLoop3.LIN.Lineitemnumber_01 = "3";
linPgiLoop3.LIN.Actionrequestnotificationcoded_02 = "1";
linPgiLoop3.LIN.ITEMNUMBERIDENTIFICATION_03 = new C212();
linPgiLoop3.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumber_01 = "5410738377131";
linPgiLoop3.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumbertypecoded_02 = "SRV";
linPgiLoop3.LIN.SUBLINEINFORMATION_04 = new C829();
linPgiLoop3.LIN.SUBLINEINFORMATION_04.Sublineindicatorcoded_01 = "1";
linPgiLoop3.LIN.SUBLINEINFORMATION_04.Lineitemnumber_02 = "2";
// Repeating QTY
linPgiLoop3.QTY = new List <QTY>();
// Number of consumer units in trade unit is 48
var qtyLin1 = new QTY();
qtyLin1.QUANTITYDETAILS_01 = new C186();
qtyLin1.QUANTITYDETAILS_01.Quantityqualifier_01 = "45E";
qtyLin1.QUANTITYDETAILS_01.Quantity_02 = "48";
linPgiLoop3.QTY.Add(qtyLin1);
// End LIN PGI Group 3
pgiLoop1.LINLoop.Add(linPgiLoop3);
// Begin LIN PGI Group 4
var linPgiLoop4 = new Loop_LIN_PRICAT();
// Line item 4, an addition, is identified by GTIN 5410738251028
linPgiLoop4.LIN = new LIN();
linPgiLoop4.LIN.Lineitemnumber_01 = "4";
linPgiLoop4.LIN.Actionrequestnotificationcoded_02 = "1";
linPgiLoop4.LIN.ITEMNUMBERIDENTIFICATION_03 = new C212();
linPgiLoop4.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumber_01 = "5410738251028";
linPgiLoop4.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumbertypecoded_02 = "SRV";
// Repeating PIA
linPgiLoop4.PIA = new List <PIA>();
// Supplier’s article number PN32555 is provided as an additional identification
var piaLin3 = new PIA();
piaLin3.Productidfunctionqualifier_01 = "1";
piaLin3.ITEMNUMBERIDENTIFICATION_02 = new C212();
piaLin3.ITEMNUMBERIDENTIFICATION_02.Itemnumber_01 = "PN32555";
piaLin3.ITEMNUMBERIDENTIFICATION_02.Itemnumbertypecoded_02 = "SA";
linPgiLoop4.PIA.Add(piaLin3);
// Repeating IMD
linPgiLoop4.IMD = new List <IMD>();
// Product is a despatch unit
var imdLin5 = new IMD();
imdLin5.Itemdescriptiontypecoded_01 = "C";
imdLin5.ITEMDESCRIPTION_03 = new C273();
imdLin5.ITEMDESCRIPTION_03.Itemdescriptionidentification_01 = "DU";
imdLin5.ITEMDESCRIPTION_03.Codelistqualifier_02 = "9";
linPgiLoop4.IMD.Add(imdLin5);
// Product description
var imdLin6 = new IMD();
imdLin6.Itemdescriptiontypecoded_01 = "F";
imdLin6.ITEMDESCRIPTION_03 = new C273();
imdLin6.ITEMDESCRIPTION_03.Itemdescription_04 = "CORN CRISPIES";
imdLin6.ITEMDESCRIPTION_03.Itemdescription_05 = "PALLET";
linPgiLoop4.IMD.Add(imdLin6);
// Repeating HAN
linPgiLoop4.HAN = new List <HAN>();
// The product is foodstuffs
var hanLin3 = new HAN();
hanLin3.HANDLINGINSTRUCTIONS_01 = new C524();
hanLin3.HANDLINGINSTRUCTIONS_01.Handlinginstructionscoded_01 = "EAT";
hanLin3.HANDLINGINSTRUCTIONS_01.Codelistresponsibleagencycoded_03 = "9";
linPgiLoop4.HAN.Add(hanLin3);
// The product is susceptible to frost damage
var hanLin4 = new HAN();
hanLin4.HANDLINGINSTRUCTIONS_01 = new C524();
hanLin4.HANDLINGINSTRUCTIONS_01.Handlinginstructionscoded_01 = "FTD";
hanLin4.HANDLINGINSTRUCTIONS_01.Codelistresponsibleagencycoded_03 = "9";
linPgiLoop4.HAN.Add(hanLin4);
// Repeating TAX LIN Groups
linPgiLoop4.TAXLoop = new List <Loop_TAX_PRICAT>();
// Begin TAX LIN Group
var taxLin3 = new Loop_TAX_PRICAT();
// The product is subject to the standard VAT rate of 21%
taxLin3.TAX = new TAX();
taxLin3.TAX.Dutytaxfeefunctionqualifier_01 = "7";
taxLin3.TAX.DUTYTAXFEETYPE_02 = new C241();
taxLin3.TAX.DUTYTAXFEETYPE_02.Dutytaxfeetypecoded_01 = "VAT";
taxLin3.TAX.DUTYTAXFEEDETAIL_05 = new C243();
taxLin3.TAX.DUTYTAXFEEDETAIL_05.Dutytaxfeerate_04 = "21";
taxLin3.TAX.Dutytaxfeecategorycoded_06 = "S";
// End TAX LIN Group
linPgiLoop4.TAXLoop.Add(taxLin3);
// Repeating PRI LIN Groups
linPgiLoop4.PRILoop = new List <Loop_PRI_PRICAT_2>();
// Begin PRI LIN Group
var priLinLoop3 = new Loop_PRI_PRICAT_2();
// The calculation net price for the product is 24000
priLinLoop3.PRI = new PRI();
priLinLoop3.PRI.PRICEINFORMATION_01 = new C509();
priLinLoop3.PRI.PRICEINFORMATION_01.Pricequalifier_01 = "AAA";
priLinLoop3.PRI.PRICEINFORMATION_01.Price_02 = "24000";
priLinLoop3.PRI.PRICEINFORMATION_01.Pricetypecoded_03 = "CA";
// End PRI LIN Group
linPgiLoop4.PRILoop.Add(priLinLoop3);
// Repeating ALC LIN Groups
linPgiLoop4.ALCLoop = new List <Loop_ALC_PRICAT>();
// Begin ALC LIN Group
var alcLin2 = new Loop_ALC_PRICAT();
// An allowance exists for this product
alcLin2.ALC = new ALC();
alcLin2.ALC.Allowanceorchargequalifier_01 = "A";
alcLin2.ALC.Calculationsequenceindicatorcoded_04 = "1";
// PCD Group
alcLin2.PCDLoop = new Loop_PCD_PRICAT();
// Allowance of 10%
alcLin2.PCDLoop.PCD = new PCD();
alcLin2.PCDLoop.PCD.PERCENTAGEDETAILS_01 = new C501();
alcLin2.PCDLoop.PCD.PERCENTAGEDETAILS_01.Percentagequalifier_01 = "1";
alcLin2.PCDLoop.PCD.PERCENTAGEDETAILS_01.Percentage_02 = "10";
// Is available on purchases of a minimum quantity of 50
alcLin2.PCDLoop.RNG = new RNG();
alcLin2.PCDLoop.RNG.Rangetypequalifier_01 = "1";
alcLin2.PCDLoop.RNG.RANGE_02 = new C280();
alcLin2.PCDLoop.RNG.RANGE_02.Measureunitqualifier_01 = "PCE";
alcLin2.PCDLoop.RNG.RANGE_02.Rangeminimum_02 = "50";
// End ALC LIN Group
linPgiLoop4.ALCLoop.Add(alcLin2);
// Repeating PAC LIN Groups
linPgiLoop4.PACLoop = new List <Loop_PAC_PRICAT>();
// Begin PAC LIN Group
var pacLin3 = new Loop_PAC_PRICAT();
// The product is packaged on an ISO 1 pallet
pacLin3.PAC = new PAC();
pacLin3.PAC.PACKAGETYPE_03 = new C202();
pacLin3.PAC.PACKAGETYPE_03.Typeofpackagesidentification_01 = "201";
pacLin3.PAC.PACKAGETYPE_03.Codelistresponsibleagencycoded_03 = "9";
// End PAC LIN Group
linPgiLoop4.PACLoop.Add(pacLin3);
// End LIN PGI Group 4
pgiLoop1.LINLoop.Add(linPgiLoop4);
// Begin LIN PGI Group 5
var linPgiLoop5 = new Loop_LIN_PRICAT();
// Line number 5, identified by GTIN 5410738377117 , is a sub-line of line number 4
linPgiLoop5.LIN = new LIN();
linPgiLoop5.LIN.Lineitemnumber_01 = "5";
linPgiLoop5.LIN.Actionrequestnotificationcoded_02 = "1";
linPgiLoop5.LIN.ITEMNUMBERIDENTIFICATION_03 = new C212();
linPgiLoop5.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumber_01 = "5410738377117";
linPgiLoop5.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumbertypecoded_02 = "SRV";
linPgiLoop5.LIN.SUBLINEINFORMATION_04 = new C829();
linPgiLoop5.LIN.SUBLINEINFORMATION_04.Sublineindicatorcoded_01 = "1";
linPgiLoop5.LIN.SUBLINEINFORMATION_04.Lineitemnumber_02 = "4";
// Repeating QTY
linPgiLoop5.QTY = new List <QTY>();
// Number of traded units in despatch unit is 24
var qtyLin2 = new QTY();
qtyLin2.QUANTITYDETAILS_01 = new C186();
qtyLin2.QUANTITYDETAILS_01.Quantityqualifier_01 = "45E";
qtyLin2.QUANTITYDETAILS_01.Quantity_02 = "24";
linPgiLoop5.QTY.Add(qtyLin2);
// End LIN PGI Group 5
pgiLoop1.LINLoop.Add(linPgiLoop5);
// End PGI Group
result.PGILoop.Add(pgiLoop1);
return(result);
}
/// <summary>
/// Build order response.
/// Original from https://www.gs1.org/sites/default/files/docs/eancom/s4/ordrsp.pdf
/// </summary>
static TSORDRSP BuildOrderResponse(string controlNumber)
{
var result = new TSORDRSP();
// Message header
result.UNH = new UNH();
result.UNH.MessageReferenceNumber_01 = controlNumber.PadLeft(14, '0');
result.UNH.MessageIdentifier_02 = new S009();
result.UNH.MessageIdentifier_02.MessageType_01 = "ORDRSP";
result.UNH.MessageIdentifier_02.MessageVersionNumber_02 = "D";
result.UNH.MessageIdentifier_02.MessageReleaseNumber_03 = "96A";
result.UNH.MessageIdentifier_02.ControllingAgencyCoded_04 = "UN";
// Order response number ORSP12856, accepted with proposals for change
result.BGM = new BGM();
result.BGM.DOCUMENTMESSAGENAME_01 = new C002();
result.BGM.DOCUMENTMESSAGENAME_01.Documentmessagenamecoded_01 = "231";
result.BGM.Documentmessagenumber_02 = "ORSP12856";
result.BGM.Messagefunctioncoded_03 = "4";
// Repeating DTM
result.DTM = new List <DTM>();
// Message date is 30th of March 2002
var dtm1 = new DTM();
dtm1.DATETIMEPERIOD_01 = new C507();
dtm1.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "137";
dtm1.DATETIMEPERIOD_01.Datetimeperiod_02 = "20020330";
dtm1.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
result.DTM.Add(dtm1);
// Repeating RFF Groups
result.RFFLoop = new List <Loop_RFF_ORDRSP>();
// Begin RFF Group
var rffLoop1 = new Loop_RFF_ORDRSP();
// Message is responding to order number 652744
rffLoop1.RFF = new RFF();
rffLoop1.RFF.REFERENCE_01 = new C506();
rffLoop1.RFF.REFERENCE_01.Referencequalifier_01 = "ON";
rffLoop1.RFF.REFERENCE_01.Referencenumber_02 = "652744";
// Repeating DTM
rffLoop1.DTM = new List <DTM>();
// Order date is 25th of March 2002
var dtmRff1 = new DTM();
dtmRff1.DATETIMEPERIOD_01 = new C507();
dtmRff1.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "171";
dtmRff1.DATETIMEPERIOD_01.Datetimeperiod_02 = "20020325";
dtmRff1.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
rffLoop1.DTM.Add(dtmRff1);
// End RFF Group
result.RFFLoop.Add(rffLoop1);
// Repeating NAD Groups
result.NADLoop = new List <Loop_NAD_ORDRSP>();
// Begin NAD Group 1
var nadLoop1 = new Loop_NAD_ORDRSP();
// Buyer is identified using GLN 5412345000013
nadLoop1.NAD = new NAD();
nadLoop1.NAD.Partyqualifier_01 = "BY";
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02 = new C082();
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02.Partyididentification_01 = "5412345000013";
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02.Codelistresponsibleagencycoded_03 = "9";
// Repeating RFF NAD Groups
nadLoop1.RFFLoop = new List <Loop_RFF_ORDRSP>();
// Begin RFF NAD Group
var rffNadLoop1 = new Loop_RFF_ORDRSP();
// Buyer’s VAT number is 452282
rffNadLoop1.RFF = new RFF();
rffNadLoop1.RFF.REFERENCE_01 = new C506();
rffNadLoop1.RFF.REFERENCE_01.Referencequalifier_01 = "VA";
rffNadLoop1.RFF.REFERENCE_01.Referencenumber_02 = "452282";
// End RFF NAD Group
nadLoop1.RFFLoop.Add(rffNadLoop1);
// End NAD Group 1
result.NADLoop.Add(nadLoop1);
// Begin NAD Group 2
var nadLoop2 = new Loop_NAD_ORDRSP();
// Supplier is identified using GLN 4012345500004
nadLoop2.NAD = new NAD();
nadLoop2.NAD.Partyqualifier_01 = "SU";
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02 = new C082();
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02.Partyididentification_01 = "4012345500004";
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02.Codelistresponsibleagencycoded_03 = "9";
// Repeating RFF NAD Groups
nadLoop2.RFFLoop = new List <Loop_RFF_ORDRSP>();
// Begin RFF NAD Group
var rffNadLoop2 = new Loop_RFF_ORDRSP();
// Supplier’s VAT number is 87765432
rffNadLoop2.RFF = new RFF();
rffNadLoop2.RFF.REFERENCE_01 = new C506();
rffNadLoop2.RFF.REFERENCE_01.Referencequalifier_01 = "VA";
rffNadLoop2.RFF.REFERENCE_01.Referencenumber_02 = "87765432";
// End RFF NAD Group
nadLoop2.RFFLoop.Add(rffNadLoop2);
// End NAD Group 2
result.NADLoop.Add(nadLoop2);
// Repeating LIN Groups
result.LINLoop = new List <Loop_LIN_ORDRSP>();
// Begin LIN Group 1
var linLoop1 = new Loop_LIN_ORDRSP();
// First product identified by GTIN 3312345501102 is accepted
linLoop1.LIN = new LIN();
linLoop1.LIN.Lineitemnumber_01 = "1";
linLoop1.LIN.Actionrequestnotificationcoded_02 = "5";
linLoop1.LIN.ITEMNUMBERIDENTIFICATION_03 = new C212();
linLoop1.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumber_01 = "3312345501102";
linLoop1.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumbertypecoded_02 = "SRV";
// End LIN Group 1
result.LINLoop.Add(linLoop1);
// Begin LIN Group 2
var linLoop2 = new Loop_LIN_ORDRSP();
// Second product identified by GTIN 3312345501003 is amended
linLoop2.LIN = new LIN();
linLoop2.LIN.Lineitemnumber_01 = "2";
linLoop2.LIN.Actionrequestnotificationcoded_02 = "3";
linLoop2.LIN.ITEMNUMBERIDENTIFICATION_03 = new C212();
linLoop2.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumber_01 = "3312345501003";
linLoop2.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumbertypecoded_02 = "SRV";
// Repeating PIA
linLoop2.PIA = new List <PIA>();
// Supplier’s article number ABC1234 is provided as an additional identification
var piaLin1 = new PIA();
piaLin1.Productidfunctionqualifier_01 = "1";
piaLin1.ITEMNUMBERIDENTIFICATION_02 = new C212();
piaLin1.ITEMNUMBERIDENTIFICATION_02.Itemnumber_01 = "ABC1234";
piaLin1.ITEMNUMBERIDENTIFICATION_02.Itemnumbertypecoded_02 = "SA";
linLoop2.PIA.Add(piaLin1);
// Repeating IMD
linLoop2.IMD = new List <IMD>();
// Product is a traded unit
var imdLin1 = new IMD();
imdLin1.Itemdescriptiontypecoded_01 = "C";
imdLin1.ITEMDESCRIPTION_03 = new C273();
imdLin1.ITEMDESCRIPTION_03.Itemdescriptionidentification_01 = "TU";
imdLin1.ITEMDESCRIPTION_03.Codelistresponsibleagencycoded_03 = "9";
linLoop2.IMD.Add(imdLin1);
// Repeating QTY
linLoop2.QTY = new List <QTY>();
// Ordered quantity is 48
var qtyLin1 = new QTY();
qtyLin1.QUANTITYDETAILS_01 = new C186();
qtyLin1.QUANTITYDETAILS_01.Quantityqualifier_01 = "21";
qtyLin1.QUANTITYDETAILS_01.Quantity_02 = "48";
linLoop2.QTY.Add(qtyLin1);
// Repeating DTM
linLoop2.DTM = new List <DTM>();
// Date of order is 10th of September 2002
var dtmLin1 = new DTM();
dtmLin1.DATETIMEPERIOD_01 = new C507();
dtmLin1.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "2";
dtmLin1.DATETIMEPERIOD_01.Datetimeperiod_02 = "20020910";
dtmLin1.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
linLoop2.DTM.Add(dtmLin1);
// Repeating MOA
linLoop2.MOA = new List <MOA>();
// Value of ordered line is 26400
var moaLin1 = new MOA();
moaLin1.MONETARYAMOUNT_01 = new C516();
moaLin1.MONETARYAMOUNT_01.Monetaryamounttypequalifier_01 = "203";
moaLin1.MONETARYAMOUNT_01.Monetaryamount_02 = "26400";
linLoop2.MOA.Add(moaLin1);
// Repeating PRI Groups
linLoop2.PRILoop = new List <Loop_PRI_ORDRSP>();
// Begin PRI LIN Group
var priLin1 = new Loop_PRI_ORDRSP();
// Net calculation price is 550
priLin1.PRI = new PRI();
priLin1.PRI.PRICEINFORMATION_01 = new C509();
priLin1.PRI.PRICEINFORMATION_01.Pricequalifier_01 = "AAA";
priLin1.PRI.PRICEINFORMATION_01.Price_02 = "550";
priLin1.PRI.PRICEINFORMATION_01.Pricetypecoded_03 = "CT";
priLin1.PRI.PRICEINFORMATION_01.Pricetypequalifier_04 = "AAA";
// End PRI LIN Group
linLoop2.PRILoop.Add(priLin1);
// Repeating PAC Groups
linLoop2.PACLoop = new List <Loop_PAC_ORDRSP_2>();
// Begin PAC LIN Group
var pacLin1 = new Loop_PAC_ORDRSP_2();
// Product is packaged in a case
pacLin1.PAC = new PAC();
pacLin1.PAC.Numberofpackages_01 = "4";
pacLin1.PAC.PACKAGINGDETAILS_02 = new C531();
pacLin1.PAC.PACKAGINGDETAILS_02.Packaginglevelcoded_01 = "1";
pacLin1.PAC.PACKAGETYPE_03 = new C202();
pacLin1.PAC.PACKAGETYPE_03.Typeofpackagesidentification_01 = "CS";
// End PAC LIN Group
linLoop2.PACLoop.Add(pacLin1);
// Repeating TAX Groups
linLoop2.TAXLoop = new List <Loop_TAX_ORDRSP>();
// Begin TAX LIN Group
var taxLin1 = new Loop_TAX_ORDRSP();
// Product is subject to standard VAT rate of 17.5 %
taxLin1.TAX = new TAX();
taxLin1.TAX.Dutytaxfeefunctionqualifier_01 = "7";
taxLin1.TAX.DUTYTAXFEETYPE_02 = new C241();
taxLin1.TAX.DUTYTAXFEETYPE_02.Dutytaxfeetypecoded_01 = "VAT";
taxLin1.TAX.DUTYTAXFEEDETAIL_05 = new C243();
taxLin1.TAX.DUTYTAXFEEDETAIL_05.Dutytaxfeerate_04 = "17.5";
taxLin1.TAX.Dutytaxfeecategorycoded_06 = "S";
// Tax amount for product is 4620
taxLin1.MOA = new MOA();
taxLin1.MOA.MONETARYAMOUNT_01 = new C516();
taxLin1.MOA.MONETARYAMOUNT_01.Monetaryamounttypequalifier_01 = "124";
taxLin1.MOA.MONETARYAMOUNT_01.Monetaryamount_02 = "4620";
// End TAX LIN Group
linLoop2.TAXLoop.Add(taxLin1);
// Repeating TDT Groups
linLoop2.TDTLoop = new List <Loop_TDT_ORDRSP>();
// Begin TDT LIN Group
var tdtLin1 = new Loop_TDT_ORDRSP();
// Main carriage transport for the product is a truck
tdtLin1.TDT = new TDT();
tdtLin1.TDT.Transportstagequalifier_01 = "20";
tdtLin1.TDT.MODEOFTRANSPORT_03 = new C220();
tdtLin1.TDT.MODEOFTRANSPORT_03.Modeoftransportcoded_01 = "30";
tdtLin1.TDT.CARRIER_05 = new C040();
tdtLin1.TDT.CARRIER_05.Carrieridentification_01 = "31";
// End TDT LIN Group
linLoop2.TDTLoop.Add(tdtLin1);
// End LIN Group 2
result.LINLoop.Add(linLoop2);
// Begin LIN Group 3
var linLoop3 = new Loop_LIN_ORDRSP();
// Third product identified by GTIN 3312345501096 is not accepted
linLoop3.LIN = new LIN();
linLoop3.LIN.Lineitemnumber_01 = "3";
linLoop3.LIN.Actionrequestnotificationcoded_02 = "7";
linLoop3.LIN.ITEMNUMBERIDENTIFICATION_03 = new C212();
linLoop3.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumber_01 = "3312345501096";
linLoop3.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumbertypecoded_02 = "SRV";
// End LIN Group 3
result.LINLoop.Add(linLoop3);
// Message detail/summary separator
result.UNS = new UNS();
result.UNS.Sectionidentification_01 = "S";
// Repeating CNT
result.CNT = new List <CNT>();
// Count of the number of LIN segments in the message
var cnt = new CNT();
cnt.CONTROL_01 = new C270();
cnt.CONTROL_01.Controlqualifier_01 = "2";
cnt.CONTROL_01.Controlvalue_02 = "3";
result.CNT.Add(cnt);
return(result);
}
/// <summary>
/// Build purchase order.
/// Original from https://www.gs1.org/standards/edi-xml-gs1-eancom/eancom-orders-s4/syntax-4
/// </summary>
public static TSORDERS BuildPurchaseOrder(string controlNumber)
{
var result = new TSORDERS();
// Message header
result.UNH = new UNH();
result.UNH.MessageReferenceNumber_01 = controlNumber.PadLeft(14, '0');
result.UNH.MessageIdentifier_02 = new S009();
result.UNH.MessageIdentifier_02.MessageType_01 = "ORDERS";
result.UNH.MessageIdentifier_02.MessageVersionNumber_02 = "D";
result.UNH.MessageIdentifier_02.MessageReleaseNumber_03 = "96A";
result.UNH.MessageIdentifier_02.ControllingAgencyCoded_04 = "UN";
// Order number 128576
result.BGM = new BGM();
result.BGM.DOCUMENTMESSAGENAME_01 = new C002();
result.BGM.DOCUMENTMESSAGENAME_01.Documentmessagenamecoded_01 = "220";
result.BGM.Documentmessagenumber_02 = "128576";
result.BGM.Messagefunctioncoded_03 = "9";
// Repeating DTM
result.DTM = new List <DTM>();
// Message date 30th of August 2002
var dtm = new DTM();
dtm.DATETIMEPERIOD_01 = new C507();
dtm.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "137";
dtm.DATETIMEPERIOD_01.Datetimeperiod_02 = "20020830";
dtm.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
result.DTM.Add(dtm);
// Instruction to pay in Bank Account
result.PAI = new PAI();
result.PAI.PAYMENTINSTRUCTIONDETAILS_01 = new C534();
result.PAI.PAYMENTINSTRUCTIONDETAILS_01.Paymentmeanscoded_03 = "42";
// Repeating FTX
result.FTX = new List <FTX>();
// Free text mutually defined
var ftx = new FTX();
ftx.Textsubjectqualifier_01 = "ZZZ";
ftx.Textfunctioncoded_02 = "1";
ftx.TEXTREFERENCE_03 = new C107();
ftx.TEXTREFERENCE_03.Freetextcoded_01 = "001";
ftx.TEXTREFERENCE_03.Codelistresponsibleagencycoded_03 = "91";
result.FTX.Add(ftx);
// Repeating RFF Groups
result.RFFLoop = new List <Loop_RFF_ORDERS>();
// Begin RFF Group
var rffLoop = new Loop_RFF_ORDERS();
// Order is based on contract number 652744
rffLoop.RFF = new RFF();
rffLoop.RFF.REFERENCE_01 = new C506();
rffLoop.RFF.REFERENCE_01.Referencequalifier_01 = "CT";
rffLoop.RFF.REFERENCE_01.Referencenumber_02 = "652744";
// Repeating DTM
rffLoop.DTM = new List <DTM>();
// Date of contract 25th of August 2002
var rffDtm1 = new DTM();
rffDtm1.DATETIMEPERIOD_01 = new C507();
rffDtm1.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "171";
rffDtm1.DATETIMEPERIOD_01.Datetimeperiod_02 = "20020825";
rffDtm1.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
rffLoop.DTM.Add(rffDtm1);
// End RFF Group
result.RFFLoop.Add(rffLoop);
// Repeating NAD Groups
result.NADLoop = new List <Loop_NAD_ORDERS>();
// Begin NAD Group 1
var nadLoop1 = new Loop_NAD_ORDERS();
// Buyer is identified by GLN 5412345000013
nadLoop1.NAD = new NAD();
nadLoop1.NAD.Partyqualifier_01 = "BY";
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02 = new C082();
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02.Partyididentification_01 = "5412345000013";
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02.Codelistresponsibleagencycoded_03 = "9";
// Repeating RFF Groups
nadLoop1.RFFLoop = new List <Loop_RFF_ORDERS>();
// Begin RFF Group
var rffLoopNad = new Loop_RFF_ORDERS();
// Buyer’s VAT number is 87765432
rffLoopNad.RFF = new RFF();
rffLoopNad.RFF.REFERENCE_01 = new C506();
rffLoopNad.RFF.REFERENCE_01.Referencequalifier_01 = "VA";
rffLoopNad.RFF.REFERENCE_01.Referencenumber_02 = "87765432";
// End RFF Group
nadLoop1.RFFLoop.Add(rffLoopNad);
// Repeating CTA Groups
nadLoop1.CTALoop = new List <Loop_CTA_ORDERS>();
// Begin CTA Group
var ctaLoop = new Loop_CTA_ORDERS();
// Order contact is PForget
ctaLoop.CTA = new CTA();
ctaLoop.CTA.Contactfunctioncoded_01 = "OC";
ctaLoop.CTA.DEPARTMENTOREMPLOYEEDETAILS_02 = new C056();
ctaLoop.CTA.DEPARTMENTOREMPLOYEEDETAILS_02.Departmentoremployee_02 = "P FORGET";
// Repeating COM
ctaLoop.COM = new List <COM>();
// Telephone number of order contact
var com = new COM();
com.COMMUNICATIONCONTACT_01 = new C076();
com.COMMUNICATIONCONTACT_01.Communicationnumber_01 = "0044715632478";
com.COMMUNICATIONCONTACT_01.Communicationchannelqualifier_02 = "TE";
ctaLoop.COM.Add(com);
// End CTA Group
nadLoop1.CTALoop.Add(ctaLoop);
// End NAD Group 1
result.NADLoop.Add(nadLoop1);
// Begin NAD Group 2
var nadLoop2 = new Loop_NAD_ORDERS();
// Supplier is identified by GLN 4012345500004
nadLoop2.NAD = new NAD();
nadLoop2.NAD.Partyqualifier_01 = "SU";
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02 = new C082();
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02.Partyididentification_01 = "4012345500004";
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02.Codelistresponsibleagencycoded_03 = "9";
// Repeating RFF Groups
nadLoop2.RFFLoop = new List <Loop_RFF_ORDERS>();
// Begin RFF Group
var rffLoopNad2 = new Loop_RFF_ORDERS();
// Supplier’s VAT number is 56225432
rffLoopNad2.RFF = new RFF();
rffLoopNad2.RFF.REFERENCE_01 = new C506();
rffLoopNad2.RFF.REFERENCE_01.Referencequalifier_01 = "VA";
rffLoopNad2.RFF.REFERENCE_01.Referencenumber_02 = "56225432";
// End RFF Group
nadLoop2.RFFLoop.Add(rffLoopNad2);
// End NAD Group 2
result.NADLoop.Add(nadLoop2);
// Repeating CUX Groups
result.CUXLoop = new List <Loop_CUX_ORDERS>();
// Begin CUX Group
var cuxLoop = new Loop_CUX_ORDERS();
// Ordering currency is Pounds Sterling with the invoicing currency identified as Euros
// The exchange rate between them is 1 Pound Sterling equals 1.67 Euros
cuxLoop.CUX = new CUX();
cuxLoop.CUX.CURRENCYDETAILS_01 = new C504();
cuxLoop.CUX.CURRENCYDETAILS_01.Currencydetailsqualifier_01 = "2";
cuxLoop.CUX.CURRENCYDETAILS_01.Currencycoded_02 = "GBP";
cuxLoop.CUX.CURRENCYDETAILS_01.Currencyqualifier_03 = "9";
cuxLoop.CUX.CURRENCYDETAILS_02 = new C504();
cuxLoop.CUX.CURRENCYDETAILS_02.Currencydetailsqualifier_01 = "3";
cuxLoop.CUX.CURRENCYDETAILS_02.Currencycoded_02 = "EUR";
cuxLoop.CUX.CURRENCYDETAILS_02.Currencyqualifier_03 = "4";
cuxLoop.CUX.Rateofexchange_03 = "1.67";
// Repeating DTM
cuxLoop.DTM = new List <DTM>();
// Period on which rate of exchange date is based is the
// 1st of August 2002 - 31st of August 2002
var dtmCux = new DTM();
dtmCux.DATETIMEPERIOD_01 = new C507();
dtmCux.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "134";
dtmCux.DATETIMEPERIOD_01.Datetimeperiod_02 = "2002080120020831";
dtmCux.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "718";
cuxLoop.DTM.Add(dtmCux);
// End CUX Group
result.CUXLoop.Add(cuxLoop);
// Repeating TDT Groups
result.TDTLoop = new List <Loop_TDT_ORDERS>();
// Begin TDT Group
var tdtLoop = new Loop_TDT_ORDERS();
// Order requests that the main carriage transport used to deliver the goods is a truck
tdtLoop.TDT = new TDT();
tdtLoop.TDT.Transportstagequalifier_01 = "20";
tdtLoop.TDT.MODEOFTRANSPORT_03 = new C220();
tdtLoop.TDT.MODEOFTRANSPORT_03.Modeoftransportcoded_01 = "30";
tdtLoop.TDT.TRANSPORTMEANS_04 = new C228();
tdtLoop.TDT.TRANSPORTMEANS_04.Typeofmeansoftransportidentification_01 = "31";
// End TDT Group
result.TDTLoop.Add(tdtLoop);
// Repeating TOD Groups
result.TODLoop = new List <Loop_TOD_ORDERS>();
// Begin TOD Group
var todLoop = new Loop_TOD_ORDERS();
// Terms of delivery are to be Cost, Insurance and Freight
todLoop.TOD = new TOD();
todLoop.TOD.Termsofdeliveryortransportfunctioncoded_01 = "3";
todLoop.TOD.TERMSOFDELIVERYORTRANSPORT_03 = new C100();
todLoop.TOD.TERMSOFDELIVERYORTRANSPORT_03.Termsofdeliveryortransportcoded_01 = "CIF";
todLoop.TOD.TERMSOFDELIVERYORTRANSPORT_03.Codelistqualifier_02 = "23";
todLoop.TOD.TERMSOFDELIVERYORTRANSPORT_03.Codelistresponsibleagencycoded_03 = "9";
// Repeating LOC Group
todLoop.LOC = new List <LOC>();
// The named port is Brussels
var loc = new LOC();
loc.Placelocationqualifier_01 = "1";
loc.LOCATIONIDENTIFICATION_02 = new C517();
loc.LOCATIONIDENTIFICATION_02.Placelocationidentification_01 = "BE-BRU";
todLoop.LOC.Add(loc);
// End TOD Group
result.TODLoop.Add(todLoop);
// Repeating LIN Groups
result.LINLoop = new List <Loop_LIN_ORDERS>();
// Begin LIN Group 1
var linLoop1 = new Loop_LIN_ORDERS();
// First product order is identified by GTIN 4000862141404
linLoop1.LIN = new LIN();
linLoop1.LIN.Lineitemnumber_01 = "1";
linLoop1.LIN.ITEMNUMBERIDENTIFICATION_03 = new C212();
linLoop1.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumber_01 = "4000862141404";
linLoop1.LIN.ITEMNUMBERIDENTIFICATION_03.Itemnumbertypecoded_02 = "SRS";
// Repeating PIA
linLoop1.PIA = new List <PIA>();
// In addition the buyer’s part number ABC1234 is provided
var pia = new PIA();
pia.Productidfunctionqualifier_01 = "1";
pia.ITEMNUMBERIDENTIFICATION_02 = new C212();
pia.ITEMNUMBERIDENTIFICATION_02.Itemnumber_01 = "ABC1234";
pia.ITEMNUMBERIDENTIFICATION_02.Itemnumbertypecoded_02 = "IN";
linLoop1.PIA.Add(pia);
// Repeating IMD
linLoop1.IMD = new List <IMD>();
// The ordered item is a traded unit
var imd = new IMD();
imd.Itemdescriptiontypecoded_01 = "C";
imd.ITEMDESCRIPTION_03 = new C273();
imd.ITEMDESCRIPTION_03.Itemdescriptionidentification_01 = "TU";
imd.ITEMDESCRIPTION_03.Codelistresponsibleagencycoded_03 = "9";
linLoop1.IMD.Add(imd);
// Repeating QTY
linLoop1.QTY = new List <QTY>();
// Ordered quantity is 48 units
var qty = new QTY();
qty.QUANTITYDETAILS_01 = new C186();
qty.QUANTITYDETAILS_01.Quantityqualifier_01 = "21";
qty.QUANTITYDETAILS_01.Quantity_02 = "48";
linLoop1.QTY.Add(qty);
// Repeating MOA
linLoop1.MOA = new List <MOA>();
// Value of order line is 699.84 Pounds Sterling
var moa = new MOA();
moa.MONETARYAMOUNT_01 = new C516();
moa.MONETARYAMOUNT_01.Monetaryamounttypequalifier_01 = "203";
moa.MONETARYAMOUNT_01.Monetaryamount_02 = "699.84";
linLoop1.MOA.Add(moa);
// Repeating PRI Groups
linLoop1.PRILoop = new List <Loop_PRI_ORDERS>();
// Begin PRI Group
var priLoop = new Loop_PRI_ORDERS();
// Fixed net calculation price is 14.58 Pounds Sterling
priLoop.PRI = new PRI();
priLoop.PRI.PRICEINFORMATION_01 = new C509();
priLoop.PRI.PRICEINFORMATION_01.Pricequalifier_01 = "AAA";
priLoop.PRI.PRICEINFORMATION_01.Price_02 = "14.58";
priLoop.PRI.PRICEINFORMATION_01.Pricetypecoded_03 = "CT";
priLoop.PRI.PRICEINFORMATION_01.Pricetypequalifier_04 = "AAE";
priLoop.PRI.PRICEINFORMATION_01.Unitpricebasis_05 = "1";
priLoop.PRI.PRICEINFORMATION_01.Measureunitqualifier_06 = "KGM";
// End PRI Group
linLoop1.PRILoop.Add(priLoop);
// Repeating RFF Groups
linLoop1.RFFLoop = new List <Loop_RFF_ORDERS>();
// Begin RFF Group
var rffLoopLin = new Loop_RFF_ORDERS();
// Price is taken from the price list AUG93RNG04
rffLoopLin.RFF = new RFF();
rffLoopLin.RFF.REFERENCE_01 = new C506();
rffLoopLin.RFF.REFERENCE_01.Referencequalifier_01 = "PL";
rffLoopLin.RFF.REFERENCE_01.Referencenumber_02 = "AUG93RNG04";
// Repeating DTM
rffLoopLin.DTM = new List <DTM>();
// Price list date 1st of August 2002
var dtmRff = new DTM();
dtmRff.DATETIMEPERIOD_01 = new C507();
dtmRff.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "171";
dtmRff.DATETIMEPERIOD_01.Datetimeperiod_02 = "20020801";
dtmRff.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
rffLoopLin.DTM.Add(dtmRff);
// End RFF Group
linLoop1.RFFLoop.Add(rffLoopLin);
// Repeating PAC Groups
linLoop1.PACLoop = new List <Loop_PAC_ORDERS_2>();
// Begin PAC Group
var pacLoop = new Loop_PAC_ORDERS_2();
// Two packages (cases) barcoded with ITF14
pacLoop.PAC = new PAC();
pacLoop.PAC.Numberofpackages_01 = "2";
pacLoop.PAC.PACKAGINGDETAILS_02 = new C531();
pacLoop.PAC.PACKAGINGDETAILS_02.Packagingrelatedinformationcoded_02 = "51";
pacLoop.PAC.PACKAGETYPE_03 = new C202();
pacLoop.PAC.PACKAGETYPE_03.Typeofpackagesidentification_01 = "CS";
// Repeating PCI Groups
pacLoop.PCILoop = new List <Loop_PCI_ORDERS>();
// Begin PCI Group
var pciLoop = new Loop_PCI_ORDERS();
// The expiry date of the product is to be marked on it's packaging
pciLoop.PCI = new PCI();
pciLoop.PCI.Markinginstructionscoded_01 = "14";
// End PCI Group
pacLoop.PCILoop.Add(pciLoop);
// End PAC Group
linLoop1.PACLoop.Add(pacLoop);
// Repeating LOC Groups
linLoop1.LOCLoop = new List <Loop_LOC_ORDERS_2>();
// Begin LOC Group 1
var locLoop1 = new Loop_LOC_ORDERS_2();
// The second place to which the product is to be delivered is identified by GLN 3312345502000
locLoop1.LOC = new LOC();
locLoop1.LOC.Placelocationqualifier_01 = "7";
locLoop1.LOC.LOCATIONIDENTIFICATION_02 = new C517();
locLoop1.LOC.LOCATIONIDENTIFICATION_02.Placelocationidentification_01 = "3312345502000";
locLoop1.LOC.LOCATIONIDENTIFICATION_02.Codelistresponsibleagencycoded_03 = "9";
// The quantity to be delivered at this location is 24
locLoop1.QTY = new QTY();
locLoop1.QTY.QUANTITYDETAILS_01 = new C186();
locLoop1.QTY.QUANTITYDETAILS_01.Quantityqualifier_01 = "11";
locLoop1.QTY.QUANTITYDETAILS_01.Quantity_02 = "24";
// Repeating DTM
locLoop1.DTM = new List <DTM>();
// The quantity should be delivered on the 15th of September 2002
var dtmLoc = new DTM();
dtmLoc.DATETIMEPERIOD_01 = new C507();
dtmLoc.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "2";
dtmLoc.DATETIMEPERIOD_01.Datetimeperiod_02 = "20020915";
dtmLoc.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
locLoop1.DTM.Add(dtmLoc);
// End LOC Group 1
linLoop1.LOCLoop.Add(locLoop1);
// Begin LOC Group 2
var locLoop2 = new Loop_LOC_ORDERS_2();
// The first place to which the product is to be delivered is identified by GLN 3312345501003
locLoop2.LOC = new LOC();
locLoop2.LOC.Placelocationqualifier_01 = "7";
locLoop2.LOC.LOCATIONIDENTIFICATION_02 = new C517();
locLoop2.LOC.LOCATIONIDENTIFICATION_02.Placelocationidentification_01 = "3312345501003";
locLoop2.LOC.LOCATIONIDENTIFICATION_02.Codelistresponsibleagencycoded_03 = "9";
// The quantity to be delivered at this location is 24
locLoop2.QTY = new QTY();
locLoop2.QTY.QUANTITYDETAILS_01 = new C186();
locLoop2.QTY.QUANTITYDETAILS_01.Quantityqualifier_01 = "11";
locLoop2.QTY.QUANTITYDETAILS_01.Quantity_02 = "24";
// Repeating DTM
locLoop2.DTM = new List <DTM>();
// The quantity should be delivered on the 13th of September 2002
var dtmLoc2 = new DTM();
dtmLoc2.DATETIMEPERIOD_01 = new C507();
dtmLoc2.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "2";
dtmLoc2.DATETIMEPERIOD_01.Datetimeperiod_02 = "20020913";
dtmLoc2.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
locLoop2.DTM.Add(dtmLoc2);
// End LOC Group 2
linLoop1.LOCLoop.Add(locLoop2);
// Repeating TAX Groups
linLoop1.TAXLoop = new List <Loop_TAX_ORDERS>();
// Begin TAX Group
var taxLoop = new Loop_TAX_ORDERS();
// The product is subject to the standard VAT rate of 17.5%
taxLoop.TAX = new TAX();
taxLoop.TAX.Dutytaxfeefunctionqualifier_01 = "7";
taxLoop.TAX.DUTYTAXFEETYPE_02 = new C241();
taxLoop.TAX.DUTYTAXFEETYPE_02.Dutytaxfeetypecoded_01 = "VAT";
taxLoop.TAX.DUTYTAXFEEDETAIL_05 = new C243();
taxLoop.TAX.DUTYTAXFEEDETAIL_05.Dutytaxfeerate_04 = "17.5";
taxLoop.TAX.Dutytaxfeecategorycoded_06 = "S";
// End TAX Group
linLoop1.TAXLoop.Add(taxLoop);
// End LIN Group 1
result.LINLoop.Add(linLoop1);
// Message detail/summary separator
result.UNS = new UNS();
result.UNS.Sectionidentification_01 = "S";
// Repeating CNT
result.CNT = new List <CNT>();
// Count of the number of LIN segments in the message
var cnt = new CNT();
cnt.CONTROL_01 = new C270();
cnt.CONTROL_01.Controlqualifier_01 = "2";
cnt.CONTROL_01.Controlvalue_02 = "1";
result.CNT.Add(cnt);
return(result);
}
/// <summary>
/// Build instruction.
/// Original from https://www.gs1.org/sites/default/files/docs/eancom/s4/iftmin.pdf
/// </summary>
static TSIFTMIN BuildInstruction(string controlNumber)
{
var result = new TSIFTMIN();
// Message header
result.UNH = new UNH();
result.UNH.MessageReferenceNumber_01 = controlNumber.PadLeft(14, '0');
result.UNH.MessageIdentifier_02 = new S009();
result.UNH.MessageIdentifier_02.MessageType_01 = "IFTMIN";
result.UNH.MessageIdentifier_02.MessageVersionNumber_02 = "D";
result.UNH.MessageIdentifier_02.MessageReleaseNumber_03 = "96A";
result.UNH.MessageIdentifier_02.ControllingAgencyCoded_04 = "UN";
// Transport instruction number
result.BGM = new BGM();
result.BGM.DOCUMENTMESSAGENAME_01 = new C002();
result.BGM.DOCUMENTMESSAGENAME_01.Documentmessagenamecoded_01 = "610";
result.BGM.Documentmessagenumber_02 = "569952";
result.BGM.Messagefunctioncoded_03 = "9";
// Repeating DTM
result.DTM = new List <DTM>();
// Message date/time 1st March 2002
var dtm1 = new DTM();
dtm1.DATETIMEPERIOD_01 = new C507();
dtm1.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "137";
dtm1.DATETIMEPERIOD_01.Datetimeperiod_02 = "20020301";
dtm1.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "102";
result.DTM.Add(dtm1);
// Delivery date/time requested, 8th March 2002 at 11:00
var dtm2 = new DTM();
dtm2.DATETIMEPERIOD_01 = new C507();
dtm2.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "2";
dtm2.DATETIMEPERIOD_01.Datetimeperiod_02 = "200203081100";
dtm2.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "203";
result.DTM.Add(dtm2);
// Repeating CNT
result.CNT = new List <CNT>();
// Total number of packages 1
var cnt = new CNT();
cnt.CONTROL_01 = new C270();
cnt.CONTROL_01.Controlqualifier_01 = "11";
cnt.CONTROL_01.Controlvalue_02 = "1";
result.CNT.Add(cnt);
// Repeating RFF Groups
result.RFFLoop = new List <Loop_RFF_IFTMIN>();
// Begin RFF Group
var rffLoop1 = new Loop_RFF_IFTMIN();
// Consignor’s reference number TI1284
rffLoop1.RFF = new RFF();
rffLoop1.RFF.REFERENCE_01 = new C506();
rffLoop1.RFF.REFERENCE_01.Referencequalifier_01 = "CU";
rffLoop1.RFF.REFERENCE_01.Referencenumber_02 = "TI1284";
// End RFF Group
result.RFFLoop.Add(rffLoop1);
// Repeating TDT Groups
result.TDTLoop = new List <Loop_TDT_IFTMIN>();
// Begin TDT Group
var tdtLoop1 = new Loop_TDT_IFTMIN();
// Details of transport, by truck
tdtLoop1.TDT = new TDT();
tdtLoop1.TDT.Transportstagequalifier_01 = "20";
tdtLoop1.TDT.MODEOFTRANSPORT_03 = new C220();
tdtLoop1.TDT.MODEOFTRANSPORT_03.Modeoftransportcoded_01 = "30";
tdtLoop1.TDT.TRANSPORTMEANS_04 = new C228();
tdtLoop1.TDT.TRANSPORTMEANS_04.Typeofmeansoftransportidentification_01 = "31";
// Repeating DTM
tdtLoop1.DTM = new List <DTM>();
// Estimated departure of truck 5th March 2002 at 11am
var dtmTdt1 = new DTM();
dtmTdt1.DATETIMEPERIOD_01 = new C507();
dtmTdt1.DATETIMEPERIOD_01.Datetimeperiodqualifier_01 = "133";
dtmTdt1.DATETIMEPERIOD_01.Datetimeperiod_02 = "200203051100";
dtmTdt1.DATETIMEPERIOD_01.Datetimeperiodformatqualifier_03 = "203";
tdtLoop1.DTM.Add(dtmTdt1);
// Repeating LOC Groups
tdtLoop1.LOCLoop = new List <Loop_LOC_IFTMIN_2>();
// Begin LOC Group
var locTdt1 = new Loop_LOC_IFTMIN_2();
// Place of truck loading identified with GLN 5412345678908
locTdt1.LOC = new LOC();
locTdt1.LOC.Placelocationqualifier_01 = "9";
locTdt1.LOC.LOCATIONIDENTIFICATION_02 = new C517();
locTdt1.LOC.LOCATIONIDENTIFICATION_02.Placelocationidentification_01 = "5412345678908";
locTdt1.LOC.LOCATIONIDENTIFICATION_02.Codelistresponsibleagencycoded_03 = "9";
// End LOC Group
tdtLoop1.LOCLoop.Add(locTdt1);
// End TDT Group
result.TDTLoop.Add(tdtLoop1);
// Repeating NAD Groups
result.NADLoop = new List <Loop_NAD_IFTMIN>();
// Begin NAD Group 1
var nadLoop1 = new Loop_NAD_IFTMIN();
// Consignor identified with GLN 5412345123453
nadLoop1.NAD = new NAD();
nadLoop1.NAD.Partyqualifier_01 = "CZ";
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02 = new C082();
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02.Partyididentification_01 = "5412345123453";
nadLoop1.NAD.PARTYIDENTIFICATIONDETAILS_02.Codelistresponsibleagencycoded_03 = "9";
// End NAD Group 1
result.NADLoop.Add(nadLoop1);
// Begin NAD Group 2
var nadLoop2 = new Loop_NAD_IFTMIN();
// Carrier identified with GLN 5411234512309
nadLoop2.NAD = new NAD();
nadLoop2.NAD.Partyqualifier_01 = "CA";
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02 = new C082();
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02.Partyididentification_01 = "5411234512309";
nadLoop2.NAD.PARTYIDENTIFICATIONDETAILS_02.Codelistresponsibleagencycoded_03 = "9";
// End NAD Group 2
result.NADLoop.Add(nadLoop2);
// Begin NAD Group 3
var nadLoop3 = new Loop_NAD_IFTMIN();
// Consignee identified with GLN 5411234444402
nadLoop3.NAD = new NAD();
nadLoop3.NAD.Partyqualifier_01 = "CN";
nadLoop3.NAD.PARTYIDENTIFICATIONDETAILS_02 = new C082();
nadLoop3.NAD.PARTYIDENTIFICATIONDETAILS_02.Partyididentification_01 = "5411234444402";
nadLoop3.NAD.PARTYIDENTIFICATIONDETAILS_02.Codelistresponsibleagencycoded_03 = "9";
// End NAD Group 3
result.NADLoop.Add(nadLoop3);
// Begin NAD Group 4
var nadLoop4 = new Loop_NAD_IFTMIN();
// Delivery party identified with GLN 5412345145660
nadLoop4.NAD = new NAD();
nadLoop4.NAD.Partyqualifier_01 = "DP";
nadLoop4.NAD.PARTYIDENTIFICATIONDETAILS_02 = new C082();
nadLoop4.NAD.PARTYIDENTIFICATIONDETAILS_02.Partyididentification_01 = "5412345145660";
nadLoop4.NAD.PARTYIDENTIFICATIONDETAILS_02.Codelistresponsibleagencycoded_03 = "9";
// End NAD Group 4
result.NADLoop.Add(nadLoop4);
// Repeating GID Groups
result.GIDLoop = new List <Loop_GID_IFTMIN>();
// Begin GID Group
var gidLoop1 = new Loop_GID_IFTMIN();
// First occurrence of goods in one returnable pallet with 14 packages
gidLoop1.GID = new GID();
gidLoop1.GID.Goodsitemnumber_01 = "1";
gidLoop1.GID.NUMBERANDTYPEOFPACKAGES_02 = new C213();
gidLoop1.GID.NUMBERANDTYPEOFPACKAGES_02.Numberofpackages_01 = "1";
gidLoop1.GID.NUMBERANDTYPEOFPACKAGES_02.Typeofpackagesidentification_02 = "09";
gidLoop1.GID.NUMBERANDTYPEOFPACKAGES_02.Codelistresponsibleagencycoded_04 = "9";
gidLoop1.GID.NUMBERANDTYPEOFPACKAGES_03 = new C213();
gidLoop1.GID.NUMBERANDTYPEOFPACKAGES_03.Numberofpackages_01 = "14";
gidLoop1.GID.NUMBERANDTYPEOFPACKAGES_03.Typeofpackagesidentification_02 = "PK";
// The goods are foods stuffs
gidLoop1.HAN = new HAN();
gidLoop1.HAN.HANDLINGINSTRUCTIONS_01 = new C524();
gidLoop1.HAN.HANDLINGINSTRUCTIONS_01.Handlinginstructionscoded_01 = "EAT";
gidLoop1.HAN.HANDLINGINSTRUCTIONS_01.Codelistresponsibleagencycoded_03 = "9";
// Transport temperature 0 degrees Celsius
gidLoop1.TMP = new TMP();
gidLoop1.TMP.Temperaturequalifier_01 = "2";
gidLoop1.TMP.TEMPERATURESETTING_02 = new C239();
gidLoop1.TMP.TEMPERATURESETTING_02.Temperaturesetting_01 = "000";
gidLoop1.TMP.TEMPERATURESETTING_02.Measureunitqualifier_02 = "CEL";
// The range of temperature must be between –5 and 5 degrees Celsius
gidLoop1.RNG = new RNG();
gidLoop1.RNG.Rangetypequalifier_01 = "5";
gidLoop1.RNG.RANGE_02 = new C280();
gidLoop1.RNG.RANGE_02.Measureunitqualifier_01 = "CEL";
gidLoop1.RNG.RANGE_02.Rangeminimum_02 = "-5";
gidLoop1.RNG.RANGE_02.Rangemaximum_03 = "5";
// Repeating MOA
gidLoop1.MOA = new List <MOA>();
// Declared valued of the carriage 45.000 EUR
var moaGid1 = new MOA();
moaGid1.MONETARYAMOUNT_01 = new C516();
moaGid1.MONETARYAMOUNT_01.Monetaryamounttypequalifier_01 = "44";
moaGid1.MONETARYAMOUNT_01.Monetaryamount_02 = "45000";
moaGid1.MONETARYAMOUNT_01.Currencycoded_03 = "EUR";
gidLoop1.MOA.Add(moaGid1);
// Repeating PIA
gidLoop1.PIA = new List <PIA>();
// Product identification of the goods using GTIN 5410738377117
var piaGid1 = new PIA();
piaGid1.Productidfunctionqualifier_01 = "5";
piaGid1.ITEMNUMBERIDENTIFICATION_02 = new C212();
piaGid1.ITEMNUMBERIDENTIFICATION_02.Itemnumber_01 = "5410738377117";
piaGid1.ITEMNUMBERIDENTIFICATION_02.Itemnumbertypecoded_02 = "SRV";
gidLoop1.PIA.Add(piaGid1);
// Repeating MEA Groups
gidLoop1.MEALoop = new List <Loop_MEA_IFTMIN>();
// Begin MEA GID Group
var meaGid1 = new Loop_MEA_IFTMIN();
// Gross weight of returnable pallet plus 14 packages on the pallet is 250 Kilograms
meaGid1.MEA = new MEA();
meaGid1.MEA.Measurementapplicationqualifier_01 = "AAE";
meaGid1.MEA.MEASUREMENTDETAILS_02 = new C502();
meaGid1.MEA.MEASUREMENTDETAILS_02.Measurementdimensioncoded_01 = "X7E";
meaGid1.MEA.VALUERANGE_03 = new C174();
meaGid1.MEA.VALUERANGE_03.Measureunitqualifier_01 = "KGM";
meaGid1.MEA.VALUERANGE_03.Measurementvalue_02 = "250";
// End MEA GID Group
gidLoop1.MEALoop.Add(meaGid1);
// Repeating PCI Groups
gidLoop1.PCILoop = new List <Loop_PCI_IFTMIN>();
// Begin PCI GID Group
var pciGid1 = new Loop_PCI_IFTMIN();
// Marked with the EAN.UCC serial shipping container code
pciGid1.PCI = new PCI();
pciGid1.PCI.Markinginstructionscoded_01 = "33E";
// Repeating GIN
pciGid1.GIN = new List <GIN>();
// Identification of marked serial shipping container code
var ginPci1 = new GIN();
ginPci1.Identitynumberqualifier_01 = "BJ";
ginPci1.IDENTITYNUMBERRANGE_02 = new C208();
ginPci1.IDENTITYNUMBERRANGE_02.Identitynumber_01 = "354123450000000014";
pciGid1.GIN.Add(ginPci1);
// End PCI GID Group
gidLoop1.PCILoop.Add(pciGid1);
// End GID Group
result.GIDLoop.Add(gidLoop1);
return(result);
}
