stupidedi 1.2.2 → 1.2.5

data/lib/stupidedi/contrib/003040/guides/WA142.rb

@@ -134,6 +134,7 @@ module Stupidedi
                   b::Element(e::Required,    "Special Services Code", b::Values("PP","SH","ZZ")),
                   b::Element(e::Situational, "Allowance or Charge Rate - Supplier Rate"),
                   b::Element(e::Situational, "Allowance or Charge Total Amount"),
+                  b::Element(e::NotUsed,     ""),
                   b::Element(e::Situational, "Quantity - Supplier Amount"))),
 
               d::LoopDef.build("PRR", d::RepeatCount.unbounded,

data/lib/stupidedi/contrib/004010/guides/PO850.rb

@@ -86,7 +86,33 @@ module Stupidedi
                 b::Element(e::Situational, "Product/Process Characteristic Code"),
                 b::Element(e::Situational, "Agency Qualifier Code"),
                 b::Element(e::Situational, "Product Description Code"),
-                b::Element(e::Situational, "Description")))),
+                b::Element(e::Situational, "Description"))),
+            d::LoopDef.build("SCH", d::RepeatCount.bounded(200),
+              b::Segment(295, s::SCH, "Line Item Schedule",
+                r::Situational, d::RepeatCount.bounded(1),
+                b::Element(e::Required,    "Numeric value ofquantiy"),
+                b::Element(e::Required, "Unit or Basis for Measurement Code", b::Values("DZ", "EA", "FT", "RL")),
+                b::Element(e::Situational, "Date/Time Qualifer"),
+                b::Element(e::Situational, "Date"),
+                b::Element(e::Situational, "Date/Time Qualifer"),
+                b::Element(e::Situational, "Date"))),
+            d::LoopDef.build("N1", d::RepeatCount.bounded(200),
+              b::Segment(350, s:: N1, "Name",
+                r::Situational, d::RepeatCount.bounded(1),
+                b::Element(e::Required,    "Entity Identifier Code", b::Values("SF", "ST")),
+                b::Element(e::Required,    "Name"),
+                b::Element(e::Situational, "Identification Code Qualifier", b::Values("91")),
+                b::Element(e::Situational, "Identification Code")),
+              b::Segment(370, s:: N3, "Address Information",
+                r::Situational, d::RepeatCount.bounded(2),
+                b::Element(e::Required,    "Address Information"),
+                b::Element(e::Situational, "Address Information")),
+              b::Segment(380, s:: N4, "Geographic Location",
+                r::Situational, d::RepeatCount.bounded(1),
+                b::Element(e::Situational, "City Name"),
+                b::Element(e::Situational, "State or Province Code"),
+                b::Element(e::Situational, "Postal Code"),
+                b::Element(e::Situational, "Country Code")))),           
 
           d::TableDef.header("Summary",
             d::LoopDef.build("CTT", d::RepeatCount.bounded(1),

data/lib/stupidedi/contrib/004010/transaction_set_defs.rb

@@ -45,6 +45,9 @@ module Stupidedi
         autoload :SQ866, # Production Sequence
           "stupidedi/contrib/004010/transaction_set_defs/SQ866"
 
+        autoload :SC832, # Price/Sales Catalog
+          "stupidedi/contrib/004010/transaction_set_defs/SC832"
+
       end
     end
   end

data/lib/stupidedi/contrib/004010/transaction_set_defs/PO850.rb

@@ -28,7 +28,15 @@ module Stupidedi
               s::PO1.use( 10, r::Mandatory, d::RepeatCount.bounded(1))),
 
             d::LoopDef.build("PID", d::RepeatCount.bounded(1000),
-              s::PID.use( 50, r::Optional,  d::RepeatCount.bounded(1)))),
+              s::PID.use( 50, r::Optional,  d::RepeatCount.bounded(1))),
+
+            d::LoopDef.build("SCH", d::RepeatCount.bounded(200),
+              s::SCH.use( 295, r::Optional, d::RepeatCount.bounded(1))),
+
+            d::LoopDef.build("N1", d::RepeatCount.bounded(200),
+              s::N1.use( 350, r::Optional, d::RepeatCount.bounded(1)),
+              s::N3.use( 370, r::Optional,  d::RepeatCount.bounded(2)),
+              s::N4.use( 380, r::Optional,  d::RepeatCount.bounded(1)))),
 
           d::TableDef.header("Table 3 - Summary",
             d::LoopDef.build("CTT", d::RepeatCount.bounded(1),

data/lib/stupidedi/contrib/004010/transaction_set_defs/SC832.rb

@@ -0,0 +1,44 @@
+module Stupidedi
+  module Contrib
+    module FortyTen
+      module TransactionSetDefs
+
+        d = Schema
+        r = SegmentReqs
+        s = SegmentDefs
+
+        SC832 = d::TransactionSetDef.build("SC", "832", "Price/Sales Catalog",
+
+          d::TableDef.header("Table 1 - Header",
+            s:: ST.use( 100, r::Mandatory, d::RepeatCount.bounded(1)),
+            s::BCT.use( 200, r::Mandatory, d::RepeatCount.bounded(1)),
+            s::REF.use( 500, r::Optional, d::RepeatCount.unbounded),
+            s::DTM.use( 700, r::Optional, d::RepeatCount.bounded(10)),
+            d::LoopDef.build("N1", d::RepeatCount.bounded(1),
+              s::N1.use(1500, r::Optional, d::RepeatCount.bounded(1))
+            )
+          ),
+
+          d::TableDef.detail("Table 2 - Products",
+            d::LoopDef.build("LIN", d::RepeatCount.bounded(200000),
+              s::LIN.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+              s::DTM.use( 300, r::Optional,  d::RepeatCount.bounded(10)),
+              s::REF.use( 400, r::Optional,  d::RepeatCount.unbounded),
+              s::PID.use( 700, r::Optional,   d::RepeatCount.bounded(200)),
+              s::PO4.use(1000, r::Mandatory,  d::RepeatCount.bounded(1)),
+              d::LoopDef.build("CTP", d::RepeatCount.bounded(100),
+                s::CTP.use(1700, r::Optional, d::RepeatCount.bounded(1))
+              )
+            )
+          ),
+
+          d::TableDef.summary("Table 3 - Summary",
+            s::CTT.use(100, r::Optional,  d::RepeatCount.bounded(1)),
+            s:: SE.use(200, r::Mandatory, d::RepeatCount.bounded(1))
+          )
+        )
+
+      end
+    end
+  end
+end

data/lib/stupidedi/schema/segment_def.rb

@@ -96,7 +96,15 @@ module Stupidedi
         element_uses = args.take_while{|x| x.is_a?(AbstractElementUse) }
         syntax_notes = args.drop(element_uses.length)
 
-        # @todo: Validate SyntaxNotes
+        # @todo: Validate SyntaxNotes (beyond this rudimentary validation)
+        syntax_notes.each do |sn|
+          unless sn.indexes.max - 1 <= element_uses.length
+            raise Exceptions::InvalidSchemaError,
+              "Syntax note for #{id} (#{element_uses.length} elements) " <<
+              "refers to non-existent element #{sn.indexes.max}"
+          end
+        end
+
         new(id, name, purpose, element_uses, syntax_notes, nil)
       end
 

data/lib/stupidedi/schema/syntax_note.rb

@@ -52,10 +52,6 @@ module Stupidedi
 
       def children(zipper)
         indexes.map{|n| zipper.child(n - 1) }
-      rescue
-        pp zipper.node
-        pp indexes
-        raise $!
       end
     end
 

data/lib/stupidedi/version.rb

@@ -1,3 +1,3 @@
 module Stupidedi
-  VERSION = "1.2.2"
+  VERSION = "1.2.5"
 end

data/lib/stupidedi/versions/functional_groups/002001/element_defs.rb

@@ -5661,7 +5661,7 @@ module Stupidedi
           E369  = t::AN.new(:E369, "Free-form Description"                 , 1, 45)
 
           E372  = t::AN.new(:E372, "Lading Liability Code - Nissan Part Description", 1, 25)
-          E373  = t::DT.new(:E373 , "Date"                                 , 8, 8)
+          E373  = t::DT.new(:E373 , "Date"                                 , 6, 6)
           E374  = t::ID.new(:E374 , "Date/Time Qualifier"                  , 3, 3,
             s::CodeList.build(
               "001" => "Cancel after",

data/lib/stupidedi/versions/functional_groups/002001/element_types/identifier_val.rb

@@ -145,14 +145,14 @@ module Stupidedi
 
               # (string any* -> any)
               extend Forwardable
-              def_delegators :@value, :to_d, :to_s, :to_f, :to_c, :to_r, :to_sym, :to_str,
+              def_delegators :value, :to_d, :to_s, :to_f, :to_c, :to_r, :to_sym, :to_str,
                 :hex, :oct, :ord, :sum, :length, :count, :index, :rindex,
                 :lines, :bytes, :chars, :each, :upto, :split, :scan, :unpack,
                 :=~, :match, :partition, :rpatition, :each, :split, :scan,
                 :unpack, :encoding, :count, :casecmp, :sum, :valid_enocding?,
-                :at, :empty?, :blank? 
-              
-              
+                :at, :empty?, :blank?
+
+
               # (string any* -> StringVal)
               extend Operators::Wrappers
               wrappers :%, :+, :*, :slice, :take, :drop, :[], :capitalize,
@@ -241,8 +241,8 @@ module Stupidedi
                 :=~, :match, :partition, :rpatition, :each, :split, :scan,
                 :unpack, :encoding, :count, :casecmp, :sum, :valid_enocding?,
                 :at, :empty?, :blank?
-              
-              
+
+
 
               # (string any* -> StringVal)
               extend Operators::Wrappers

data/lib/stupidedi/versions/functional_groups/002001/segment_defs/MEA.rb

@@ -15,16 +15,15 @@ module Stupidedi
             e::E739 .simple_use(r::Relational, s::RepeatCount.bounded(1)),
             e::E355 .simple_use(r::Mandatory,  s::RepeatCount.bounded(1)),
             e::E740 .simple_use(r::Relational, s::RepeatCount.bounded(1)),
-            e::E741 .simple_use(r::Relational, s::RepeatCount.bounded(1)),
-
-            SyntaxNotes::R.build( 3,  5,  6,  8),
-            SyntaxNotes::E.build( 4, 12),
-            SyntaxNotes::L.build( 5,  4, 12),
-            SyntaxNotes::L.build( 6,  4, 12),
-            SyntaxNotes::L.build( 7,  3,  5,  6),
-            SyntaxNotes::E.build( 8,  3),
-            SyntaxNotes::P.build(11, 12))
+            e::E741 .simple_use(r::Relational, s::RepeatCount.bounded(1)))
 
+          # SyntaxNotes::R.build( 3,  5,  6,  8),
+          # SyntaxNotes::E.build( 4, 12),
+          # SyntaxNotes::L.build( 5,  4, 12),
+          # SyntaxNotes::L.build( 6,  4, 12),
+          # SyntaxNotes::L.build( 7,  3,  5,  6),
+          # SyntaxNotes::E.build( 8,  3),
+          # SyntaxNotes::P.build(11, 12))
 
         end
       end

data/lib/stupidedi/versions/functional_groups/003010/element_defs.rb

@@ -4215,7 +4215,9 @@ module Stupidedi
           E362  = t::Nn.new(:E362   , "Terms Discount Amount"              , 1, 10, 2)
           E363  = t::ID.new(:E363  , "Note Reference Code"                 , 3, 3,
             s::CodeList.build(
-              "ZZZ" => "Mutually Defined"))
+              "ZZZ" => "Mutually Defined",
+              "GEN" => "Entire Transaction Set",
+              "LIN" => "Line Item"))
 
           E364  = t::AN.new(:E364  , "Communication Number"                , 1, 80)
           E365  = t::ID.new(:E365 , "Communcation Number Qualifier"        , 2, 2,
@@ -4245,6 +4247,7 @@ module Stupidedi
             s::CodeList.build(
               "001" => "Cancel after",
               "002" => "Delivery Requested",
+              "003" => "",
               "007" => "Effective",
               "010" => "Requested ship",
               "011" => "Shipped",
@@ -5871,8 +5874,61 @@ module Stupidedi
               "PC" => "Price Change",
               "QD" => "Quantity Decrease",
               "QI" => "Quantity Increase"))
+
           E671  = t:: R.new(:E671 , "Quantity Left to Receive"             , 1, 9)
 
+          E673  = t::ID.new(:E673 , "Quantity Qualifier"                   , 2, 2,
+            s::CodeList.build(
+              "01" => "Discrete Quantity",
+              "02" => "Cumulative Quantity",
+              "90" => "Acknowledged Quantity",
+              "AA" => "Unacknowledged Quantity",
+              "CA" => "Covered - Actual",
+              "CD" => "Co-insured - Actual",
+              "FL" => "Units",
+              "LA" => "Life-time Reserve - Actual",
+              "LE" => "Life-time Reserve - Estimated",
+              "NA" => "Number of Non-covered Days",
+              "NE" => "Non-Covered Amount - Estimated",
+              "NR" => "Not Replaced Blood Units",
+              "OU" => "Outlier Days",
+              "PS" => "Prescription",
+              "PT" => "Patients",
+              "QA" => "Quantity Approved",
+              "QC" => "Quantity Disapproved",
+              "VS" => "Visits",
+              "ZK" => "Federal Medicare or Medicaid Payment Mandate Category 1",
+              "ZL" => "Federal Medicare or Medicaid Payment Mandate Category 2",
+              "ZM" => "Federal Medicare or Medicaid Payment Mandate Category 3",
+              "ZN" => "Federal Medicare or Medicaid Payment Mandate Category 4",
+              "ZO" => "Federal Medicare or Medicaid Payment Mandate Category 5"))
+
+          E675  = t::ID.new(:E675 , "Schedule Type Qualifier"              , 2, 2,
+            s::CodeList.build(
+              "DL" => "Delivery Based",
+              "SH" => "Shipment Based"))
+
+          E676  = t::ID.new(:E676 , "Schedule Quantity Qualifier"          , 2, 2,
+            s::CodeList.build(
+              "A" => "Actual Discrete Quantities"))
+
+          E678  = t::ID.new(:E678 , "Ship/Delivery or Calendar Pattern Code"  , 1, 2,
+            s::CodeList.build(
+              "Y" => "None"))
+
+          E679  = t::ID.new(:E679 , "Ship/Delivery Pattern Time Code"          , 1, 1,
+            s::CodeList.build(
+              "Y" => "None"))
+
+          E680  = t::ID.new(:E680 , "Forecast Qualifier"                      , 1, 1,
+            s::CodeList.build(
+              "C" => "New Firm Order",
+              "D" => "Planning/Forecast"))
+          E681  = t::ID.new(:E681 , "Forecast Timing Qualifier"             , 1, 1,
+            s::CodeList.build(
+              "D" => "Discrete",
+              "F" => "Flexible Interval (from Date X through Date Y)"))
+
           E706  = t::ID.new(:E706 , "Entity Relationship Code"             , 2, 2,
             s::CodeList.build(
               "01" => "Parent",

data/lib/stupidedi/versions/functional_groups/003010/segment_defs.rb

@@ -245,6 +245,20 @@ module Stupidedi
           autoload :POC,
             "stupidedi/versions/functional_groups/003010/segment_defs/POC"
 
+          autoload :BFR,
+            "stupidedi/versions/functional_groups/003010/segment_defs/BFR"
+
+          autoload :UIT,
+            "stupidedi/versions/functional_groups/003010/segment_defs/UIT"
+
+          autoload :SDP,
+            "stupidedi/versions/functional_groups/003010/segment_defs/SDP"
+
+          autoload :FST,
+            "stupidedi/versions/functional_groups/003010/segment_defs/FST"
+
+          autoload :SHP,
+            "stupidedi/versions/functional_groups/003010/segment_defs/SHP"  
         end
       end
     end

data/lib/stupidedi/versions/functional_groups/003010/segment_defs/BFR.rb

@@ -0,0 +1,40 @@
+module Stupidedi
+  module Versions
+    module FunctionalGroups
+      module ThirtyTen
+        module SegmentDefs
+
+          s = Schema
+          e = ElementDefs
+          r = ElementReqs
+
+          # Definition might be outdated, working from ANSI X12 2001 specification
+          BFR = s::SegmentDef.build(:BFR, "Beginning Segment for Planning Schedule",
+            "To indicate the beginning of a planning schedule transaction set; whether a ship or "\
+            "delivery based forecast; and related forecast envelope dates",
+            e::E353 .simple_use(r::Mandatory, s::RepeatCount.bounded(1)),
+            e::E127 .simple_use(r::Relational,s::RepeatCount.bounded(1)),
+            e::E328 .simple_use(r::Relational,s::RepeatCount.bounded(1)),
+            e::E675 .simple_use(r::Mandatory, s::RepeatCount.bounded(1)),
+            e::E676 .simple_use(r::Mandatory, s::RepeatCount.bounded(1)),
+            e::E373 .simple_use(r::Mandatory, s::RepeatCount.bounded(1)),
+            e::E373 .simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E373 .simple_use(r::Mandatory, s::RepeatCount.bounded(1)),
+            e::E367 .simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E367 .simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E324 .simple_use(r::Optional,  s::RepeatCount.bounded(1)))
+
+            # e::E353.simple_use(r::Mandatory,  s::RepeatCount.bounded(1)),
+            # e::E127.simple_use(r::Relational, s::RepeatCount.bounded(1)),
+            # e::E328.simple_use(r::Relational, s::RepeatCount.bounded(1)),
+            # e::E675.simple_use(r::Mandatory,  s::RepeatCount.bounded(1)),
+            # e::E676.simple_use(r::Mandatory, s::RepeatCount.bounded(1)),
+            # e::E373.simple_use(r::Mandatory, s::RepeatCount.bounded(1)),
+            # e::E373.simple_use(r::Mandatory, s::RepeatCount.bounded(1)),
+            # e::E373.simple_use(r::Mandatory, s::RepeatCount.bounded(1)))
+
+        end
+      end
+    end
+  end
+end

data/lib/stupidedi/versions/functional_groups/003010/segment_defs/BPS.rb

@@ -15,7 +15,14 @@ module Stupidedi
             payee to occur while utilizing an automated clearing house (ACH) or other banking network.",
             e::E591.simple_use(r::Mandatory,  s::RepeatCount.bounded(1)),
             e::E782.simple_use(r::Mandatory,  s::RepeatCount.bounded(1)),
-            e::E305.simple_use(r::Mandatory,  s::RepeatCount.bounded(1)), #E373 ?
+            e::E305.simple_use(r::Mandatory,  s::RepeatCount.bounded(1)),
+            e::E352.simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E352.simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E352.simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E352.simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E352.simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E352.simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E352.simple_use(r::Optional,  s::RepeatCount.bounded(1)),
             e::E508.simple_use(r::Optional,   s::RepeatCount.bounded(1)),
             e::E513.simple_use(r::Optional,   s::RepeatCount.bounded(1)))
 

data/lib/stupidedi/versions/functional_groups/003010/segment_defs/CTT.rb

@@ -10,8 +10,8 @@ module Stupidedi
 
           CTT = s::SegmentDef.build(:CTT, "Transaction Totals",
             "To transmit a hash total for a specific element in the transaction set",
-            e::E354 .simple_use(r::Mandatory,  s::RepeatCount.bounded(1)))
-            # e::E347 .simple_use(r::Optional,   s::RepeatCount.bounded(1)),
+            e::E354 .simple_use(r::Mandatory,  s::RepeatCount.bounded(1)),
+            e::E347 .simple_use(r::Optional,   s::RepeatCount.bounded(1)))
             # e::E81  .simple_use(r::Relational, s::RepeatCount.bounded(1)),
             # e::E355 .simple_use(r::Relational, s::RepeatCount.bounded(1)),
             # e::E183 .simple_use(r::Relational, s::RepeatCount.bounded(1)),

data/lib/stupidedi/versions/functional_groups/003010/segment_defs/FOB.rb

@@ -13,6 +13,8 @@ module Stupidedi
             e::E146 .simple_use(r::Mandatory,  s::RepeatCount.bounded(1)),
             e::E309 .simple_use(r::Relational,  s::RepeatCount.bounded(1)),
             e::E352 .simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E352 .simple_use(r::Optional,  s::RepeatCount.bounded(1)),
+            e::E352 .simple_use(r::Optional,  s::RepeatCount.bounded(1)),
             e::E309 .simple_use(r::Relational,  s::RepeatCount.bounded(1)),
             e::E352 .simple_use(r::Optional,  s::RepeatCount.bounded(1)))
 

data/lib/stupidedi/versions/functional_groups/003010/segment_defs/FST.rb

@@ -0,0 +1,31 @@
+module Stupidedi
+  module Versions
+    module FunctionalGroups
+      module ThirtyTen
+        module SegmentDefs
+
+          s = Schema
+          e = ElementDefs
+          r = ElementReqs
+
+          FST = s::SegmentDef.build(:FST, "Forecast Schedule",
+            "To specify the forecasted dates and quantities",
+            e::E380 .simple_use(r::Mandatory,   s::RepeatCount.bounded(1)),
+            e::E680 .simple_use(r::Mandatory,   s::RepeatCount.bounded(1)),
+            e::E681 .simple_use(r::Mandatory,   s::RepeatCount.bounded(1)),
+            e::E373 .simple_use(r::Mandatory,   s::RepeatCount.bounded(1)),
+            e::E373 .simple_use(r::Optional,    s::RepeatCount.bounded(1)),
+            e::E374 .simple_use(r::Relational,  s::RepeatCount.bounded(1)),
+            e::E337 .simple_use(r::Relational,  s::RepeatCount.bounded(1)),
+            e::E128 .simple_use(r::Relational,  s::RepeatCount.bounded(1)),
+            e::E127 .simple_use(r::Relational,  s::RepeatCount.bounded(1)))
+
+
+            # SyntaxNotes::P.build(6, 7),
+            # SyntaxNotes::P.build(1, 2, 3))
+
+        end
+      end
+    end
+  end
+end

data/lib/stupidedi/versions/functional_groups/003010/segment_defs/MEA.rb

@@ -15,16 +15,15 @@ module Stupidedi
             e::E739 .simple_use(r::Relational, s::RepeatCount.bounded(1)),
             e::E355 .simple_use(r::Mandatory,  s::RepeatCount.bounded(1)),
             e::E740 .simple_use(r::Relational, s::RepeatCount.bounded(1)),
-            e::E741 .simple_use(r::Relational, s::RepeatCount.bounded(1)),
-
-            SyntaxNotes::R.build( 3,  5,  6,  8),
-            SyntaxNotes::E.build( 4, 12),
-            SyntaxNotes::L.build( 5,  4, 12),
-            SyntaxNotes::L.build( 6,  4, 12),
-            SyntaxNotes::L.build( 7,  3,  5,  6),
-            SyntaxNotes::E.build( 8,  3),
-            SyntaxNotes::P.build(11, 12))
+            e::E741 .simple_use(r::Relational, s::RepeatCount.bounded(1)))
 
+          # SyntaxNotes::R.build( 3,  5,  6,  8),
+          # SyntaxNotes::E.build( 4, 12),
+          # SyntaxNotes::L.build( 5,  4, 12),
+          # SyntaxNotes::L.build( 6,  4, 12),
+          # SyntaxNotes::L.build( 7,  3,  5,  6),
+          # SyntaxNotes::E.build( 8,  3),
+          # SyntaxNotes::P.build(11, 12))
 
         end
       end