ชุมชนคนใช้งานโปรแกรมบัญชี Express

ได้โจทก์ยาก...
ลูกค้า เป็นบริษัท Shipping
ต้องการออกใบแจ้งหนี้ ที่รวมทั้งเงินทดรองจ่าย และค่าบริการ ซึ่งมี VAT
โดยใบแจ้งหนี้แยกช่องสินค้าที่มี VAT กับ ไม่มี VAT
หากเป็นสินค้ามี VAT แสดงที่ช่องขวาสุด และไม่มี VAT แสดงที่ช่องถัดมาค่ะ

รหัส รายละเอียด                               จำนวนเงินสินค้าไม่VAT         จำนวนเงิน สินค้า VAT
420-1 Customs clearance                                 2,500.00
420-2 Truck service                                         7,000.00
113-1 Customs EDI FEE                200.00
113-2 Port Authority of Th             1,700.00

                                                            1,900.00         9,500.00
                                                                                 VAT     665.00
                                                                                     12,065.00 ยอดนี้รวมทั้งหมด

ประมาณนี้ค่ะ
แต่พอออกใบเสร็จรับเงิน  ให้แสดงยอดรวมทั้งหมด (ใช้แบบของ Express ได้)
แต่ใบกำกับภาษี ให้ออกเฉพาะรายการที่ มี VAT อีกค่ะ

แก้ไขฟอร์มได้ยากพอสมควรเลยครับ รบกวนโทร.เข้ามาให้ จนท.แนะนำวิธีการแก้ไขให้ดีกว่านะครับ

โจทก์ยากจิงๆ
ยากแบบนี้คงต้องมีค่าใช้จ่ายละมั๊งคับ express คงต้องคิดเพิ่ม

จริงมั๊ยครับ?? 

จริงๆด้วย 
....
แต่ก็พยายามเองส่วนหนึ่ง  (กลัวเสียค่าใช้จ่าย  )
และทางน้อง Support ที่น่ารักมากๆ (ใจเย็นดีมาก) สอนอีกส่วนหนึ่ง
ทำได้แล้วค่ะ 

สุดยอดอ่ะครับ

ว่าแต่.... ขอโค้ดได้ป่ะครับ 

ส่งไฟล์ตัวอย่างไปให้นะคะ
ส่งไปที่ไหนดี (เข้าหลังบ้านเลยค่ะ)

รบกวนขอไฟล์ตัวอย่างบ้างได้มั้ยคะ 


ขอบคุณค่าา

ไม่รู้ว่า CODE ยังอยู่มั้ย ขอด้วยได้มั้ยคะ

หลักการก็ไม่ได้ยุ่งยากอะไรค่ะ  เพียงแต่เราแยกคอลัมป์ก่อน จากนั้นสร้างต้วแปรแต่ละคอลัมป์ที่จะแสดง

คอลัมป์ 1 IIF  ถ้าสินค้าไม่มี Vat แสดง  ถ้าไม่เข้าเงื่อนไข ให้เป็น 0
คอลัมป์ 2 IIF ถ้าสินค้ามี Vat แสดง ถ้าไม่เข้าเงื่อนไข ให้เป็น 0

ทั้งตัวแปร คอลัมป์ 1 และ 2 copy กันได้เลย แต่ให้เปลี่ยน =,#  เท่านั้นเองค่ะ

เพิ่ม
Ib: ~N    ~ARTICLE                                                    ~NETAMT0      ~NETAMT1        ;1

เพิ่ม ที่ช่องรวมเงิน
Su: หมายเหตุ                              รวมเป็นเงิน                    ~SUMAMT0      ~SUMAMT1 

ส่วนท้ายนี้ Copy ทั้งหมดวางทับเลยค่ะ (ระวังว่ามีการออกแบบรายงานเป็นพิเศษอยู่รึเปล่าด้วยนะคะ)
[print options]
Top=0
Left=0
Tabs=4
Right=94
Lines=41
Output=Select, Printer, Screen, File,
File Name=ARIVC.TXT
Print Control=\027\033\001
Fix Summary Line=ON
Select Scope=OFF
*Form=ON
Select Page=OFF
Condition=OFF

[range of report]
From=CUR

[master file]
File=artrn
Alias=A
Tag=artrn1
System=DATA_PATH

[item file]
File=stcrd
Alias=B
Tag=stcrd5
System=DATA_PATH

File=artrnrm
Alias=C
Tag=artrnrm1
System=DATA_PATH

[relate file]
File=armas
Alias=R
Tag=armas1
System=DATA_PATH
Master file=artrn
Master-Related Field=CUSCOD

File=stmas
Alias=C
Tag=stmas1
System=DATA_PATH
Master file=stcrd
Master-Related Field=STKCOD

File=oeso
Alias=Y
Tag=oeso1
System=DATA_PATH
Master file=artrn
Master-Related Field=SONUM

File=stloc
Alias=L
Tag=stloc1
System=DATA_PATH
Master file=stcrd
Master-Related Field=STKCOD+LOCCOD

[data spec]
*          len  (0)default, (>0)cut, (<0)cut to new line
*~dat:      len,    "pict",            "data",            "exp"
~ADDR:      0,      "",                "p_addr()",        ""
~TAXID:    0,      "",                "p_taxid()",        ""
~TEL:      0,      "",                "p_telnum()",      ""
~INIT:      0,      "",                "",                "seq=0; sumamt0=0; sumamt1=0"
~TXT0:      0,      "",                "txt0",            "txt0 = IIF( ARTRN->FLGVAT <> '1', '  ¨Ó¹Ç¹àÔ¹',  'ÃÒ¤ÒÃÇÁÀÒÉÕ')",
*~TXT1:    0,      "",                "txt1",            "txt1 = IIF( ARTRN->FLGVAT <> '1', '¨Ó¹Ç¹àÔ¹ËÅÑËÑ¡ÊèǹŴ',    '¨Ó¹Ç¹àÔ¹ÃÇÁ·ÑéÊÔé¹      ')",
~TXT1:      0,      "",                "txt1",            "txt1 = IIF( ARTRN->FLGVAT <> '1', '¨Ó¹Ç¹àÔ¹ËÅÑËÑ¡ÁÑ´¨Ó    ', '¨Ó¹Ç¹àÔ¹ÃÇÁ·ÑéÊÔé¹      ')",
~TXT2:      0,      "",                "txt2",            "txt2 = IIF( ARTRN->FLGVAT <> '1', '¨Ó¹Ç¹àÔ¹ÃÇÁ·ÑéÊÔé¹',      'ÃÒ¤ÒÊÔ¹¤éÒ            ')",
*~DOCNUM:  0,      "",                "doc_num",          "doc_num=SUBSTR(ARTRN->DOCNUM, 3, "
~DOCNUM:    0,      "",                "ARTRN->DOCNUM",    ""
*~DOCDAT:  0,      "",                "p_date( ARTRN->DOCDAT)",  ""
~DOCDAT:    0,      "",                "ARTRN->DOCDAT",    ""
~CUSCOD:    0,      "",                "ARTRN->CUSCOD",    ""
~CUSNAM:    0,      "",                "cus_nam",          "cus_nam = ARMAS->PRENAM - '