edi_scratch/ftx_test.output

   1  {
   2     "recipient":"1556150",
   3     "sender":"6666666",
   4     "body": [{
   5       "ORDERS":[ "order", {
   6          "po_number":8,
   7          "date":"20100610",
   8          "buyer":[{                "id":"6666666"        }],
   9          "vendor":[             "1556150",
  10              {"id-qualifier": 92, "id":"8"}
  11          ],
  12          "currency":"USD",
  13          "items":[
  14
  15          {
  16              "identifiers":[
  17                  {"id-qualifier":"EN","id":"9780446360272"},
  18                  {"id-qualifier":"SA","id":"57"},
  19                  {"id-qualifier":"IB","id":"0446360279"}
  20              ],
  21              "price":4.50,
  22              "desc":[
  23                  {"BTI":"Webster's new world thesaurus :"},
  24                  {"BPU":"Warner Books, Inc.,"},
  25                  {"BPD":"1990."},
  26                  {"BPH":"xv, 494 p. ;"}
  27              ],
  28              "quantity":8,
  29              "FTX": { "4451": "LIN", "C108": {"4440": "This is a TEST! zzz!"} }
  30          },
  31          {
  32              "identifiers":[
  33                  {"id-qualifier":"SA","id":"59"},
  34                  {"id-qualifier":"IB","id":"0446831832"},
  35                  {"id-qualifier":"EN","id":"9780446357197"}
  36              ],
  37              "price":7.99,
  38              "desc":[
  39                  {"BTI":"The world is full of divorced women /"},
  40                  {"BPU":"Warner Books,"},
  41                  {"BPD":"c1980."},
  42                  {"BPH":"413 p. ;"}
  43              ],
  44              "quantity":10
  45          },
  46          {
  47              "identifiers":[
  48                  {"id-qualifier":"SA","id":"60"},
  49                  {"id-qualifier":"IB","id":"0446350109"},
  50                  {"id-qualifier":"EN","id":"9780446350105"}
  51              ],
  52              "price":8.75,
  53              "desc":[
  54                  {"BTI":"Windmills of the gods /"},
  55                  {"BPU":"Warner Books,"},
  56                  {"BPD":"1988, c1987."},
  57                  {"BPH":"xiii, 434 p. ;"}
  58              ],
  59              "quantity":5
  60          }
  61          ],
  62          "line_items":3
  63       }]
  64     }]
  65  }
  66
  67
  68
  69 # json2edi Response:
  70 $VAR1 = bless( do{\(my $o = 'UNA:+.? \'UNB+UNOB:3+6666666:31B+1556150:31B+100812:2026+1\'UNH+1+ORDERS:D:96A:UN\'BGM+220+8+9\'DTM+137:20100610:102\'NAD+BY+6666666::31B\'NAD+SU+1556150::31B\'NAD+SU+8::92\'CUX+2:USD:9\'LIN+1++9780446360272:EN\'PIA+5+9780446360272:EN+57:SA+0446360279:IB\'IMD+F+BTI+:::Webster?\'s new world thesaurus ?:\'IMD+F+BPU+:::Warner Books, Inc.,\'IMD+F+BPD+:::1990.\'IMD+F+BPH+:::xv, 494 p. ;\'QTY+21:8\'PRI+AAB:4.5\'RFF+LI:8/1\'LIN+2++59:SA\'PIA+5+59:SA+0446831832:IB+9780446357197:EN\'IMD+F+BTI+:::The world is full of divorced women: /\'IMD+F+BPU+:::Warner Books,\'IMD+F+BPD+:::c1980.\'IMD+F+BPH+:::413 p. ;\'QTY+21:10\'PRI+AAB:7.99\'RFF+LI:8/2\'LIN+3++60:SA\'PIA+5+60:SA+0446350109:IB+9780446350105:EN\'IMD+F+BTI+:::Windmills of the gods /\'IMD+F+BPU+:::Warner Books,\'IMD+F+BPD+:::1988, c1987.\'IMD+F+BPH+:::xiii, 434 p. ;\'QTY+21:5\'PRI+AAB:8.75\'RFF+LI:8/3\'UNS+S\'CNT+2:3\'UNT+37+1\'UNZ+1+1\'')}, 'RPC::XML::string' );