1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Simples.S9303
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > 9303 Sealing party name code [B]
17 -- > Desc: Code specifying the name of the sealing party.
22 -- > Party which consolidates cargo.
25 -- > The sealing party is unknown.
27 -- > AC Quarantine agency
28 -- > Agency responsible for the administration of statutory
29 -- > disease controls on the movement of people, animals and
33 -- > Party undertaking or arranging transport of goods
34 -- > between named points.
37 -- > 'Customs' means the Government Service which is
38 -- > responsible for the administration of Customs law and
39 -- > the collection of duties and taxes and which also has
40 -- > the responsibility for the application of other laws and
41 -- > regulations relating to the importation, exportation,
42 -- > movement or storage of goods.
45 -- > Party which, by contract with a carrier, consigns or
46 -- > sends goods with the carrier, or has them conveyed by
49 -- > TO Terminal operator
50 -- > Party which handles the loading and unloading of marine
52 simple9303 :: Parser Value
53 simple9303 = simple "9303" (alphaNumeric `upTo` 3)