specification/src/Text/Edifact/D01B/Segments/NAD.hs

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D01B.Segments.NAD
   7   ( -- * Definition
   8     segmentNAD
   9     -- * Dependencies
  10   , compositeC058
  11   , compositeC059
  12   , compositeC080
  13   , compositeC082
  14   , compositeC819
  15   , simple3035
  16   , simple3164
  17   , simple3207
  18   , simple3251
  19   ) where
  20
  21 import           Text.Edifact.D01B.Composites (compositeC058, compositeC059,
  22                                                compositeC080, compositeC082,
  23                                                compositeC819)
  24 import           Text.Edifact.D01B.Simples    (simple3035, simple3164,
  25                                                simple3207, simple3251)
  26
  27 import           Text.Edifact.Parsing
  28 import           Text.Edifact.Types           (Value)
  29
  30 -- | Derived from this specification:
  31 --
  32 -- >        NAD  NAME AND ADDRESS
  33 -- >
  34 -- >        Function: To specify the name/address and their related
  35 -- >                  function, either by C082 only and/or
  36 -- >                  unstructured by C058 or structured by C080 thru
  37 -- >                  3207.
  38 -- >
  39 -- > 010    3035 PARTY FUNCTION CODE QUALIFIER              M    1 an..3
  40 -- >
  41 -- > 020    C082 PARTY IDENTIFICATION DETAILS               C    1
  42 -- >        3039  Party identifier                          M      an..35
  43 -- >        1131  Code list identification code             C      an..17
  44 -- >        3055  Code list responsible agency code         C      an..3
  45 -- >
  46 -- > 030    C058 NAME AND ADDRESS                           C    1
  47 -- >        3124  Name and address description              M      an..35
  48 -- >        3124  Name and address description              C      an..35
  49 -- >        3124  Name and address description              C      an..35
  50 -- >        3124  Name and address description              C      an..35
  51 -- >        3124  Name and address description              C      an..35
  52 -- >
  53 -- > 040    C080 PARTY NAME                                 C    1
  54 -- >        3036  Party name                                M      an..35
  55 -- >        3036  Party name                                C      an..35
  56 -- >        3036  Party name                                C      an..35
  57 -- >        3036  Party name                                C      an..35
  58 -- >        3036  Party name                                C      an..35
  59 -- >        3045  Party name format code                    C      an..3
  60 -- >
  61 -- > 050    C059 STREET                                     C    1
  62 -- >        3042  Street and number or post office box
  63 -- >              identifier                                M      an..35
  64 -- >        3042  Street and number or post office box
  65 -- >              identifier                                C      an..35
  66 -- >        3042  Street and number or post office box
  67 -- >              identifier                                C      an..35
  68 -- >        3042  Street and number or post office box
  69 -- >              identifier                                C      an..35
  70 -- >
  71 -- > 060    3164 CITY NAME                                  C    1 an..35
  72 -- >
  73 -- > 070    C819 COUNTRY SUB-ENTITY DETAILS                 C    1
  74 -- >        3229  Country sub-entity name code              C      an..9
  75 -- >        1131  Code list identification code             C      an..17
  76 -- >        3055  Code list responsible agency code         C      an..3
  77 -- >        3228  Country sub-entity name                   C      an..70
  78 -- >
  79 -- > 080    3251 POSTAL IDENTIFICATION CODE                 C    1 an..17
  80 -- >
  81 -- > 090    3207 COUNTRY NAME CODE                          C    1 an..3
  82 --
  83 -- Dependencies: 'compositeC058', 'compositeC059', 'compositeC080', 'compositeC082', 'compositeC819', 'simple3035', 'simple3164', 'simple3207', 'simple3251'.
  84 segmentNAD :: Parser Value
  85 segmentNAD =
  86   segment "NAD"
  87     [ "010" .@ mandatory simple3035
  88     , "020" .@ optional  compositeC082
  89     , "030" .@ optional  compositeC058
  90     , "040" .@ optional  compositeC080
  91     , "050" .@ optional  compositeC059
  92     , "060" .@ optional  simple3164
  93     , "070" .@ optional  compositeC819
  94     , "080" .@ optional  simple3251
  95     , "090" .@ optional  simple3207
  96     ]