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/S5125.hs | 50 ++++++++++++++++++++++ 1 file changed, 50 insertions(+) create mode 100644 specification/src/Text/Edifact/D96A/Simples/S5125.hs (limited to 'specification/src/Text/Edifact/D96A/Simples/S5125.hs') diff --git a/specification/src/Text/Edifact/D96A/Simples/S5125.hs b/specification/src/Text/Edifact/D96A/Simples/S5125.hs new file mode 100644 index 0000000..afa22b0 --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Simples/S5125.hs @@ -0,0 +1,50 @@ +{-# LANGUAGE OverloadedStrings #-} + +---- Machine generated code. +---- Output of edi-parser-scaffolder + +module Text.Edifact.D96A.Simples.S5125 + ( simple5125 + ) where + +import Text.Edifact.Parsing +import Text.Edifact.Types (Value) + +-- | Derived from this specification: +-- +-- > * 5125 Price qualifier +-- > +-- > Desc: Identification of a type of price. +-- > +-- > Repr: an..3 +-- > +-- > AAA Calculation net +-- > The price stated is the net price including allowances/ +-- > charges. Allowances/charges may be stated for information +-- > only. +-- > AAB Calculation gross +-- > The price stated is the gross price to which allowances/ +-- > charges must be applied. +-- > AAC Allowances and charges not included, tax included +-- > The price does not include the allowances and charges, +-- > but includes the taxes. +-- > AAD Average selling price +-- > Average selling price of a product. +-- > + AAE Information price, excluding allowances or charges, +-- > including taxes +-- > The price stated is for information purposes only and +-- > excludes all allowances and charges. Taxes however are +-- > included in the price. +-- > + AAF Information price, excluding allowances or charges, and +-- > taxes +-- > The price stated is for information purposes only and +-- > excludes all allowances, charges and taxes. +-- > CAL Calculation price +-- > The price stated is the price for the calculation of the +-- > line item amount. +-- > INF Information +-- > The price is provided for information. +-- > INV Invoice price +-- > Referenced price taken from an invoice. +simple5125 :: Parser Value +simple5125 = simple "5125" (alphaNumeric `upTo` 3) -- cgit v1.2.3