jaimex8
2/23/2016 - 8:35 PM

Colinear Batch Report Feed

Colinear Batch Report Feed

<mvt:comment>
| Amazon Product Feed
| Edsyn Products
| File Output: /colinear_import.txt

<mvt:item name="attributemachine" param="head" />
</mvt:comment>
<mvt:assign name="g.tab" value="asciichar(9)" />
<mvt:assign name="g.newline" value="asciichar(10)" />
<mvt:assign name="g.pipe" value="asciichar(124)" />
<mvt:assign name="g.comma" value="asciichar(44)" />
<mvt:assign name="g.quote" value="asciichar(34)" />
<mvt:assign name="g.period" value="asciichar(46)" />
<mvt:assign name="g.delimiter" value="asciichar(9)" />
<mvt:assign name="g.filename" value="'colinear_import.txt'" />
<mvt:assign name="g.filepath" value="'/'" />

<mvt:comment>
    Delete File if it exists, create new file with header row
</mvt:comment>
<mvt:assign name="g.file_exists" value="sexists(g.filepath $ g.filename)" />
<mvt:if expr="g.file_exists EQ 1">
    <mvt:assign name="g.file_deleted" value="sdelete(g.filepath $ g.filename)" />
    <mvt:if expr="g.file_deleted EQ 1">
        <mvt:assign name="g.file_created" value="file_create(g.filepath $ g.filename,'script', g.headerrow)" />
    </mvt:if>
<mvt:else>
    <mvt:assign name="g.file_created" value="file_create(g.filepath $ g.filename,'script', g.headerrow)" />
</mvt:if> 

<mvt:foreach iterator="order" array="admin_order:orders">
<mvt:assign name="g.var" value="miva_array_serialize(l.settings:order)" />
<!-- @@ &mvt:global:var; -->
<mvt:comment>Field #1 - </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '1. **KEY**' $ g.newline"/>
<mvt:comment>Field #2 - Reserved 1</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '2.' $ g.newline"/>
<mvt:comment>Field #3 - Reserved 2</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '3.' $ g.newline"/>
<mvt:comment>Field #4 - Reserved 3</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '4.' $ g.newline"/>
<mvt:comment>Field #5 - Outside System Generated Number  (goes to sysoent.a6 3/11/00)</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '5.' $ g.newline"/>
<mvt:comment>Field #6 - Transaction Type (SHOULD ALWAYS BE “O” except for orders including a gift certificate redemption, in which case it should be “Z”)</mvt:comment>
<mvt:foreach iterator="item" array="order:groups">
    <mvt:if expr="item:code EQ 'GIFTCERT'">
        <mvt:assign name="g.gift_cert" value="1" />
    </mvt:if>
</mvt:foreach>
<mvt:if expr="g.gift_cert EQ 1">
    <mvt:assign name="g.file_row" value="g.file_row $ '6. Z' $ g.newline"/>
<mvt:else>
    <mvt:assign name="g.file_row" value="g.file_row $ '6. O' $ g.newline"/>
</mvt:if>
<mvt:comment>Field #7 - Existing Customer Number (Correct number from customer or “1”)</mvt:comment>
<mvt:if expr="l.settings:order:customer_id">
<mvt:assign name="g.file_row" value="g.file_row $ '7. ' $ l.settings:order:customer_id $ g.newline"/>
<mvt:else>
<mvt:assign name="g.file_row" value="g.file_row $ '7. 1' $ g.newline"/>
</mvt:if>
<mvt:comment>Field #8 - Customer Type (ALWAYS “RC”)</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '8. RC' $ g.newline"/>
<mvt:comment>Field #9 - Batch ID </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '9. ' $ g.newline"/>
<mvt:comment>Field #10 - Salesman ID</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '10. ' $ g.newline"/>
<mvt:comment>Field #11 - Purchase Order</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '11. ' $ g.newline"/>
<mvt:comment>Field #12 - Source/Media Code (selected from list)</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '12. ' $ g.newline"/>
<mvt:comment>Field #13 - Bill to Salutation (Mr., Ms., Dr., Rev.)</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '13. ' $ g.newline"/>
<mvt:comment>Field #14 - Bill to Title (Dir Mktg, Pres., VP) </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '14. ' $ g.newline"/>
<mvt:comment>Field #15 - Bill to First Name</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '15. ' $ l.settings:order:bill_fname $ g.newline"/>
<mvt:comment>Field #16 - Bill to Last Name</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '16. ' $ l.settings:order:bill_lname $ g.newline"/>
<mvt:comment>Field #17 - Bill to Company Name</mvt:comment>
<mvt:if expr="NOT ISNULL l.order:bill_comp">
<mvt:assign name="g.file_row" value="g.file_row $ '17. ' $ l.settings:order:bill_comp $ g.newline"/>
<mvt:else>
<mvt:assign name="g.file_row" value="g.file_row $ '17. ' $ g.newline"/>
</mvt:if>
<mvt:comment>Field #18 - Bill to Address 1</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '18. ' $ l.settings:order:bill_addr $ g.newline"/>
<mvt:comment>Field #19 - Bill to Address 2</mvt:comment>
<mvt:if expr="NOT ISNULL l.order:bill_addr2">
<mvt:assign name="g.file_row" value="g.file_row $ '19. ' $ l.settings:order:bill_addr2 $ g.newline"/>
<mvt:else>
<mvt:assign name="g.file_row" value="g.file_row $ '19. ' $ g.newline"/>
</mvt:if>
<mvt:comment>Field #20 - Bill to Address 3</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '20. ' $ g.newline"/>
<mvt:comment>Field #21 - Bill to Address 4 </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '22. ' $ g.newline"/>
<mvt:comment>Field #22 - Bill to Address 5 </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '22. ' $ g.newline"/>
<mvt:comment>Field #23 - Bill to City</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '23. ' $ l.settings:order:bill_city $ g.newline"/>
<mvt:comment>Field #24 - Bill to State</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '24. ' $ l.settings:order:bill_state $ g.newline"/>
<mvt:comment>Field #25 - Bill to Zip</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '25. ' $ l.settings:order:bill_zip $ g.newline"/>
<mvt:comment>Field #26 - Bill to Country (use “USA” and  “Canada” for those countries)</mvt:comment>
<mvt:if expr="l.settings:order:bill_cntry EQ 'US'">
<mvt:assign name="g.file_row" value="g.file_row $ '26. USA' $ g.newline"/>
<mvt:elseif expr="l.settings:order:bill_cntry EQ 'CA'">
<mvt:assign name="g.file_row" value="g.file_row $ '26. Canada' $ g.newline"/>
<mvt:else>
<mvt:assign name="g.file_row" value="g.file_row $ '26. ' $ l.settings:order:bill_cntry $ g.newline"/>
</mvt:if>
<mvt:comment>Field #27 - International Phone No</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '27. ' $ g.newline"/>
<mvt:comment>Field #28 - Bill to phone area code</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '28. ' $ substring( l.settings:order:bill_phone, 1, 3 ) $ g.newline"/>
<mvt:comment>Field #29 - Bill to phone exchange</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '29. ' $ substring( l.settings:order:bill_phone, 5, 3 ) $ g.newline"/>
<mvt:comment>Field #30 - Bill to phone local</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '30. ' $ substring( l.settings:order:bill_phone, 9, 4 ) $ g.newline"/>
<mvt:comment>Field #31 - Bill to phone extension</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '31. ' $ g.newline"/>
<mvt:comment>Field #32 - Alt Bill to phone area code</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '32. ' $ g.newline"/>
<mvt:comment>Field #33 - Alt Bill to phone exchange</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '33. ' $ g.newline"/>
<mvt:comment>Field #34 - Alt Bill to phone local</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '34. ' $ g.newline"/>
<mvt:comment>Field #35 - Alt Bill to phone extension</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '35. ' $ g.newline"/>
<mvt:comment>Field #36 - International Fax Number </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '36. ' $ g.newline"/>
<mvt:comment>Field #37 - Fax Bill to phone area code</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '37. ' $ g.newline"/>
<mvt:comment>Field #38 - Fax Bill to phone exchange</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '38. ' $ g.newline"/>
<mvt:comment>Field #39 - Fax Bill to phone local</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '39. ' $ g.newline"/>
<mvt:comment>Field #40 - Fax Bill to phone extension</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '40. ' $ g.newline"/>
<mvt:comment>Field #41 - Bill-To Comment 1 </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '41. ' $ g.newline"/>
<mvt:comment>Field #42 - Bill-To Comment 2 </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '42. ' $ g.newline"/>
<mvt:comment>Field #43 - Ship to Salutation (Mr., Ms., Dr., Rev.)</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '43. ' $ g.newline"/>
<mvt:comment>Field #44 - Ship to Title (Dir Mktg, Pres., VP) </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '44. ' $ g.newline"/>
<mvt:comment>Field #45 - Ship to First Name</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '45. ' $ l.settings:order:ship_fname $ g.newline"/>
<mvt:comment>Field #46 - Ship to Last Name</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '46. ' $ l.settings:order:ship_lname $ g.newline"/>
<mvt:comment>Field #47 - Ship to Company Name</mvt:comment>
<mvt:if expr="NOT ISNULL l.order:ship_comp">
<mvt:assign name="g.file_row" value="g.file_row $ '47. ' $ l.settings:order:ship_comp $ g.newline"/>
<mvt:else>
<mvt:assign name="g.file_row" value="g.file_row $ '47. ' $ g.newline"/>
</mvt:if>
<mvt:comment>Field #48 - Ship to Address 1</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '48. ' $ l.settings:order:ship_addr $ g.newline"/>
<mvt:comment>Field #49 - Ship to Address 2</mvt:comment>
<mvt:if expr="NOT ISNULL l.order:ship_addr2">
<mvt:assign name="g.file_row" value="g.file_row $ '49. ' $ l.settings:order:ship_addr2 $ g.newline"/>
<mvt:else>
<mvt:assign name="g.file_row" value="g.file_row $ '49. ' $ g.newline"/>
</mvt:if>
<mvt:comment>Field #50 - Ship to Address 3</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '50. ' $ g.newline"/>
<mvt:comment>Field #51 - Ship to Address 4 </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '51. ' $ g.newline"/>
<mvt:comment>Field #52 - Ship to Address 5 </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '52. ' $ g.newline"/>
<mvt:comment>Field #53 - Ship to City</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '53. ' $ l.settings:order:ship_city $ g.newline"/>
<mvt:comment>Field #54 - Ship to State</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '54. ' $ l.settings:order:ship_state $ g.newline"/>
<mvt:comment>Field #55 - Ship to Zip</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '55. ' $ l.settings:order:ship_zip $ g.newline"/>
<mvt:comment>Field #56 - Ship to Country (use “USA” and “Canada” for those countries)</mvt:comment>
<mvt:if expr="l.settings:order:ship_cntry EQ 'US'">
<mvt:assign name="g.file_row" value="g.file_row $ '26. USA' $ g.newline"/>
<mvt:elseif expr="l.settings:order:ship_cntry EQ 'CA'">
<mvt:assign name="g.file_row" value="g.file_row $ '26. Canada' $ g.newline"/>
<mvt:else>
<mvt:assign name="g.file_row" value="g.file_row $ '26. ' $ l.settings:order:bill_cntry $ g.newline"/>
</mvt:if>
<mvt:comment>Field #57 - Ship to International Phone No </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '57.' $ g.newline"/>
<mvt:comment>Field #58 - Ship to phone area code</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '58. ' $ substring( l.settings:order:ship_phone, 1, 3 ) $ g.newline"/>
<mvt:comment>Field #59 - Ship to phone exchange</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '59. ' $ substring( l.settings:order:ship_phone, 5, 3 ) $ g.newline"/>
<mvt:comment>Field #60 - Ship to phone local</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '60. ' $ substring( l.settings:order:ship_phone, 9, 4 ) $ g.newline"/>
<mvt:comment>Field #61 - Ship to phone extension</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '61.' $ g.newline"/>
<mvt:comment>Field #62 - Alt Ship to phone area code </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '62.' $ g.newline"/>
<mvt:comment>Field #63 - Alt Ship to phone exchange   </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '63.' $ g.newline"/>
<mvt:comment>Field #64 - Alt Ship to phone local</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '64.' $ g.newline"/>
<mvt:comment>Field #65 - Alt Ship to phone extension</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '65.' $ g.newline"/>
<mvt:comment>Field #66 - International Fax Ship to</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '66.' $ g.newline"/>
<mvt:comment>Field #67 - Fax Ship to phone area code</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '67.' $ g.newline"/>
<mvt:comment>Field #68 - Fax Ship to phone exchange</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '68.' $ g.newline"/>
<mvt:comment>Field #69 - Fax Ship to phone local</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '69.' $ g.newline"/>
<mvt:comment>Field #70 - Fax Ship to phone extension   </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '70.' $ g.newline"/>
<mvt:comment>Field #71 - Payment Code (selected from list)</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '71. [secured]' $ g.newline"/>
<mvt:comment>Field #72 - Credit Card Number</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '72. [secured]' $ g.newline"/>
<mvt:comment>Field #73 - CC Expiration Date (mmyy, mmddyy or mmddccyy are acceptable)  </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '73. [secured]' $ g.newline"/>
<mvt:comment>Field #74 - CC Auth Code </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '74.' $ g.newline"/>
<mvt:comment>Field #75 - Shipping Method (select from list)</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '75. ' $ l.settings:order:ship_method $ g.newline"/>
<mvt:comment>Field #76 - **Gross Amount of Order (this means merchandise total)</mvt:comment>
<mvt:foreach iterator="group" array="order:groups">
    <mvt:assign name="gross_amt" value="g.gross_amt + l.settings:group:subtotal_retail" />
</mvt:foreach>
<mvt:assign name="g.gross_amt" value="glosub(g.gross_amt,'.','')" />
<mvt:assign name="g.file_row" value="g.file_row $ '76. ' $ g.gross_amt $ g.newline"/>
<mvt:comment>Field #77 - Misc/credit Amount</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '77.' $ g.newline"/>
<mvt:comment>Field #78 - Discount Amount</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '78.' $ g.newline"/>
<mvt:comment>Field #79 - Tax & Duty (MA shipto’s only – 6.25%)</mvt:comment>
<mvt:if expr="l.settings:order:ship_state EQ 'MA'">
    <mvt:foreach iterator="charge" array="order:charges">
        <mvt:if expr="'Tax' CIN l.settings:charge:descrip">
            <mvt:assign name="sales_tax" value="l.settings:charge:amount" />
        </mvt:if>
    </mvt:foreach>
    <mvt:assign name="sales_tax" value="glosub(g.sales_tax, '.','')" />
    <mvt:assign name="g.file_row" value="g.file_row $ '79. ' $ g.sales_tax $ g.newline" />
<mvt:else>
    <mvt:assign name="g.file_row" value="g.file_row $ '79. 0' $ g.newline"/>
</mvt:if>
<mvt:comment>Field #80 - Shipping (see table provided + surcharge & flatrate instructions)</mvt:comment>
<mvt:foreach iterator="charge" array="order:charges">
    <mvt:if expr="'Shipping' CIN l.settings:charge:descrip">
        <mvt:assign name="ship_charge" value="l.settings:charge:amount" />
    </mvt:if>
</mvt:foreach>
<mvt:assign name="ship_charge" value="glosub(g.ship_charge, '.','')" />
<mvt:if expr="g.ship_charge GT 0">
    <mvt:assign name="g.file_row" value="g.file_row $ '80. ' $ g.ship_charge $ g.newline"/>
<mvt:else>
    <mvt:assign name="g.file_row" value="g.file_row $ '80. 0' $ g.newline"/>
</mvt:if>
<mvt:comment>Field #81 - Handling or Personalization Charges </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '81. ' $ g.newline"/>
<mvt:comment>Field #82 - Other Misc Charges </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '82. ' $ g.newline"/>
<mvt:comment>Field #83 - Order Total</mvt:comment>
<mvt:assign name="total" value="glosub(l.settings:order:total, '.','')" />
<mvt:assign name="g.file_row" value="g.file_row $ '83. ' $ g.total $ g.newline"/>
<mvt:comment>Field #84 - Prepaid / Deposit Amount</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '84. ' $ g.newline"/>
<mvt:comment>Field #85 - Prepaid Amount Ref No </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '85. ' $ g.newline"/>
<mvt:comment>Field #86 - Balance Due</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '86. ' $ g.total $ g.newline"/>
<mvt:comment>Field #87 - E-mail Address</mvt:comment>
<mvt:if expr="NOT ISNULL l.order:bill_email">
<mvt:assign name="g.file_row" value="g.file_row $ '87. ' $ l.settings:order:bill_email $ g.newline"/>
<mvt:else>
<mvt:assign name="g.file_row" value="g.file_row $ '87. ' $ l.settings:order:ship_email $ g.newline"/>
</mvt:if>
<mvt:comment>Field #88 - Alt. E-mail Address</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '88. ' $ g.newline"/>
<mvt:comment>Field #89 - Mail Flag (OK to share name? Y/N) blank in dha_stdacct.mv 090901 – ok with privacy policy</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '89. ' $ g.newline"/>
<mvt:comment>Field #90 - Warehouse Comment 1 (Midco order reference number)</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '90. ' $ g.newline"/>
<mvt:comment>Field #91 - Warehouse Comment 2 (ditto)</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '91. ' $ g.newline"/>
<mvt:comment>Field #92 - Customer Service Comment 1 </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '92. ' $ g.newline"/>
<mvt:comment>Field #93 - Customer Service Comment 2 </mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '93. ' $ g.newline"/>
<mvt:comment>Field #94 - Reserved 4</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '94. ' $ g.newline"/>
<mvt:comment>Field #95 - Reserved 5</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '95. ' $ g.newline"/>
<mvt:comment>Field #96 - Reserved 6</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '96. ' $ g.newline"/>
<mvt:comment>Field #97 - Reserved 7</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '97. ' $ g.newline"/>
<mvt:comment>Field #98 - Reserved 8</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '98. ' $ g.newline"/>
<mvt:comment>Field #99 - Reserved 9</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '99. ' $ g.newline"/>
<mvt:comment>Field #100 - Reserved 10</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '100. ' $ g.newline"/>
<mvt:comment>Field #101 - Reserved 11</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '101. ' $ g.newline"/>
<mvt:comment>Field #102 - Reserved 12</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '102. ' $ g.newline"/>
<mvt:comment>Field #103 - Gift order? (Y/N)</mvt:comment>
<mvt:item name="customfields" param="Read_Order( l.settings:order:id, 'gift_order', g.gift_order )" />
<mvt:if expr="g.gift_order EQ 'yes'">
    <mvt:assign name="g.file_row" value="g.file_row $ '103. Y' $ g.newline"/>
<mvt:else>
    <mvt:assign name="g.file_row" value="g.file_row $ '103. N' $ g.newline"/>
</mvt:if>
<mvt:comment>Field #104 - OK to Email? (1/0)</mvt:comment>
<mvt:item name="customfields" param="Read_Order( l.settings:order:id, 'email_ok', g.email_ok )" />
<mvt:if expr="g.email_ok EQ 'yes'">
    <mvt:assign name="g.file_row" value="g.file_row $ '104. 1' $ g.newline"/>
<mvt:else>
    <mvt:assign name="g.file_row" value="g.file_row $ '104. 0' $ g.newline"/>
</mvt:if>
<mvt:comment>Field #105 - Items Ordered (1 thru n)  see specification below</mvt:comment>
<mvt:assign name="g.file_row" value="g.file_row $ '105. ' $ g.newline"/>
<mvt:assign name="g.file_row" value="g.file_row $ '106. ' $ g.newline"/>
<mvt:assign name="g.file_row" value="g.file_row $ '107. ' $ g.newline"/>
<mvt:assign name="line_num" value="108" />
<mvt:foreach iterator="group" array="order:groups">
    <mvt:assign name="prod_id" value="substring(padr(l.settings:group:product:code,16,' '),1,16)" />

    <mvt:assign name="prod_name" value="substring(padr(l.settings:group:product:name,36,' '),1,36)" />

    <mvt:assign name="prod_qty" value="padl(l.settings:group:quantity,4,'0')" />

    <mvt:assign name="unit_price" value="glosub(l.settings:group:formatted_price,'.','')" />
    <mvt:assign name="unit_price" value="glosub(g.unit_price,'$','')" />
    <mvt:assign name="unit_price" value="padl(g.unit_price,8,'0')" />

    <mvt:assign name="g.file_row" value="g.file_row $ g.line_num $ '. ' $ g.prod_id $ g.prod_name $ g.prod_qty $ g.unit_price $ g.newline"/>

    <mvt:assign name="line_num" value="g.line_num + 1" />
</mvt:foreach>

</mvt:foreach>
<mvt:assign name="g.file_row" value="g.file_row $ 'ZZTOTALZZ'"/>
&mvt:global:file_row;
<mvt:assign name="g.write_line" value="file_append( g.filepath $ g.filename, 'script', g.file_row )" />