From a9d77a20008efe82862cc1adbfa7a6d4f09f8ff7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Menou?= Date: Thu, 8 Dec 2016 10:19:15 +0200 Subject: Release code as open source --- .../src/Text/Edifact/D96A/Simples/S3139.hs | 246 +++++++++++++++++++++ 1 file changed, 246 insertions(+) create mode 100644 specification/src/Text/Edifact/D96A/Simples/S3139.hs (limited to 'specification/src/Text/Edifact/D96A/Simples/S3139.hs') diff --git a/specification/src/Text/Edifact/D96A/Simples/S3139.hs b/specification/src/Text/Edifact/D96A/Simples/S3139.hs new file mode 100644 index 0000000..50ffe3f --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Simples/S3139.hs @@ -0,0 +1,246 @@ +{-# LANGUAGE OverloadedStrings #-} + +---- Machine generated code. +---- Output of edi-parser-scaffolder + +module Text.Edifact.D96A.Simples.S3139 + ( simple3139 + ) where + +import Text.Edifact.Parsing +import Text.Edifact.Types (Value) + +-- | Derived from this specification: +-- +-- > 3139 Contact function, coded +-- > +-- > Desc: Code specifying the function of a contact (e.g. department or +-- > person). +-- > +-- > Repr: an..3 +-- > +-- > AA Insurance contact +-- > Department/person to contact for matters regarding +-- > insurance. +-- > AB Workshop contact +-- > Department/person to contact for matters regarding the +-- > workshop. +-- > AC Accepting contact +-- > Department/person in charge of accepting incoming goods. +-- > AD Accounting contact +-- > Department/person responsible for the accounts payable +-- > function within a corporation. +-- > AE Contract contact +-- > Department/person to contact for matters regarding +-- > contracts. +-- > AF Land registry contact +-- > Department/person to contact for matters regarding land +-- > registry. +-- > AG Agent +-- > Department/person of the agent which acts on behalf of +-- > another party. +-- > AH Coordination contact +-- > Department/person to contact for matters regarding +-- > technical coordination of works. +-- > AI Project management contact +-- > Department/person to contact for matters regarding +-- > project management on behalf of the contractor. +-- > AJ Investment contact +-- > Department/person to contact for matters regarding +-- > investments. +-- > AK Works management contact +-- > Department/person to contact for matters regarding +-- > management of works on behalf of the owner. +-- > AL Personnel contact +-- > Department/person to contact for matters regarding +-- > personnel (human resources). +-- > AM Claims contact +-- > Department/person to contact for matters regarding +-- > claims. +-- > AN Laboratory contact +-- > Department/person to contact for laboratory matters. +-- > AO Plant/equipment contact +-- > Department/person to contact for matters regarding +-- > plant/equipment. +-- > AP Accounts payable contact +-- > Department/person responsible for the accounts payable +-- > function within a corporation. +-- > AQ Quantity surveyor contact +-- > Department/person to contact for matters regarding +-- > quantity surveying. +-- > AR Accounts receivable contact +-- > Department/person responsible for the accounts receivable +-- > within a corporation. +-- > AS Public relations contact +-- > Department/person to contact for matters regarding public +-- > relations. +-- > AT Technical contact +-- > Department/person to contact for matters regarding +-- > technical issues. +-- > AU City works authority contact +-- > Department/person to contact for matters regarding city +-- > works. +-- > AV Maintenance contact +-- > Department/person to contact for matters regarding +-- > maintenance. +-- > AW Town planning contact +-- > Department/person to contact for matters regarding town ` +-- > planning. +-- > AX Traffic authority contact +-- > Department/person to contact for matters regarding +-- > traffic. +-- > AY Electricity supply contact +-- > Department/person to contact for matters regarding +-- > electricity supply. +-- > AZ Gas supply contact +-- > Department/person to contact for matters regarding gas +-- > supply. +-- > BA Water supply contact +-- > Department/person to contact for matters regarding water +-- > supply. +-- > BB Telecommunications network contact +-- > Department/person to contact for matters regarding +-- > telecommunications network. +-- > BC Banking contact +-- > Contact person for bank. +-- > BD New developments contact +-- > Department/person to contact for matters regarding new +-- > developments (e.g. construction). +-- > BE Transport infrastructure authority +-- > Department/person to contact for matters regarding +-- > transport infrastructure. +-- > BF Service contact +-- > Department/person to be contacted in service matters. +-- > BU Ultimate consignee +-- > Department/designated on the invoice or packing list as +-- > the final recipient of the stated merchandise. +-- > CA Carrier +-- > (3126) Party undertaking or arranging transport of goods +-- > between named points. +-- > CB Changed by +-- > Person who made the change. +-- > CC Responsible person for information production +-- > Responsible person to contact for matters regarding the +-- > production of information. +-- > CD Responsible person for information dissemination +-- > Responsible person to contact for matters regarding +-- > information dissemination. +-- > CE Head of unit for computer data processing +-- > Head of unit to contact for matters regarding computer +-- > data processing. +-- > CF Head of unit for information production +-- > Head of unit to contact for matters regarding the +-- > production of information. +-- > CG Head of unit for information dissemination +-- > Head of unit to contact for matters regarding +-- > dissemination of information. +-- > CN Consignee +-- > (3132) Party to which goods are consigned. +-- > CO Consignor +-- > (3336) Party which, by contract with a carrier, consigns +-- > or sends goods with the carrier, or has them conveyed by +-- > him. Synonym: shipper/sender. +-- > CP Responsible person for computer data processing +-- > Responsible person to contact for matters regarding +-- > computer data processing. +-- > CR Customer relations +-- > Individual responsible for customer relations. +-- > CW Confirmed with +-- > Person with whom the contents of the purchase order has +-- > been discussed and agreed (e.g. by telephone) prior to +-- > the sending of this message. +-- > DE Department/employee to execute export procedures +-- > Self explanatory. +-- > DI Department/employee to execute import procedures +-- > Self explanatory. +-- > DL Delivery contact +-- > Department/person responsible for delivery. +-- > EB Entered by +-- > Name of an individual who made the entry. +-- > EC Education coordinator +-- > Person in charge of coordination of education. +-- > ED Engineering contact +-- > Department/person to contact for matters regarding +-- > engineering. +-- > EX Expeditor +-- > Party to be contacted where goods are (to be) expedited. +-- > GR Goods receiving contact +-- > Department/person responsible for receiving the goods at +-- > the place of delivery. +-- > HE Emergency dangerous goods contact +-- > Party who is to be contacted to intervene in case of +-- > emergency. +-- > HG Dangerous goods contact +-- > Department/person to be contacted for details about the +-- > transportation of dangerous goods/hazardous material. +-- > HM Hazardous material contact +-- > Department/person responsible for hazardous material +-- > control. +-- > IC Information contact +-- > Department/person to contact for questions regarding +-- > transactions. +-- > IN Insurer contact +-- > Self explanatory. +-- > LB Place of delivery contact +-- > Self explanatory. +-- > LO Place of collection contact +-- > Self explanatory. +-- > MC Material control contact +-- > Department/person responsible for the +-- > controlling/inspection of goods. +-- > MD Material disposition contact +-- > Department/person responsible for the +-- > disposition/scheduling of goods. +-- > MH Material handling contact +-- > Self explanatory. +-- > MR Message recipient contact +-- > Self explanatory. +-- > MS Message sender contact +-- > Self explanatory. +-- > NT Notification contact +-- > Self explanatory. +-- > OC Order contact +-- > An individual to contact for questions regarding this +-- > order. +-- > PA Prototype coordinator +-- > Description to be provided. +-- > PD Purchasing contact +-- > Department/person responsible for issuing this purchase +-- > order. +-- > PE Payee contact +-- > Self explanatory. +-- > PM Product management contact +-- > Department/person to contact for questions regarding this +-- > order. +-- > QA Quality assurance contact +-- > Quality assurance contact within an organization. +-- > QC Quality coordinator contact +-- > Quality coordinator contact within an organization. +-- > RD Receiving dock contact +-- > The receiving dock contact within an organization. +-- > SA Sales administration +-- > Name of the sales administration contact within a +-- > corporation. +-- > SC Schedule contact +-- > Name of the scheduling contact within a corporation. +-- > SD Shipping contact +-- > The shipping department contact within an organization. +-- > SR Sales representative or department +-- > The sales representative or department contact within an +-- > organization. +-- > SU Supplier contact +-- > Department/person to be contacted at the supplier. +-- > TA Traffic administrator +-- > The traffic administrator contact within an organization. +-- > TD Test contact +-- > Department/person responsible for testing contact. +-- > TI Technical documentation recipient +-- > Department/person to receive technical documentation. +-- > TR Transport contact +-- > Department/person in charge of transportation. +-- > WH Warehouse +-- > The warehouse contact within an organization. +-- > ZZZ Mutually defined +-- > Self explanatory. +simple3139 :: Parser Value +simple3139 = simple "3139" (alphaNumeric `upTo` 3) -- cgit v1.2.3