การดึงข้อมูล Note แต่ละบรรทัดของแต่ละสินค้า มาแสดง

[itpic]

ซึ่งตอนนี้สามารถดึงมาได้ทั้งหมดเเล้ว แต่อยากให้สามารถเลือกได้ว่าจะเอา Note ของสินค้า บรรทัดที่เท่านี้ มาแสดง โดยไม่เอามาทั้งหมด ต้องทำอย่างไรครับ

[savek]

ถ้าสินค้าทุกรายการที่มีในบิล เอาเฉพาะหมายเหตุบรรทัดเดียวกันทั้งหมด จะแก้ไขได้ตามแบบข้างล่างนี้นะครับ โดยเลือกพิมพ์เฉพาะหมายเหตุบรรทัดที่ 2 (แต่ถ้าสินค้าในบิลบางรายการเลือกหมายเหตุบรรทัดที่ 1 สินค้าบางรายการเลือกหมายเหตุบรรทัดที่ 2 แบบนั้นแก้ไขไม่ได้นะครับ)

Ib: ~N ~ARTICLE ~QTY ~TQUCOD ~UNITPR ~NETAMT_I ;1
Ih:: ;2 artrnrm->docnum+artrnrm->seqnum stcrd->rdocnum
Ib: ~REMARK ;2
Ih:: ;3 artrnrm->docnum+artrnrm->seqnum stcrd->docnum+stcrd->seqnum
Ib:~RMK *~REMARK ;3


[data spec]
...
~INIT: 0, "", "", "seq=0; sumamt0=0; sumamt1=0; SQTY=0; ITEM=0; RMSEQ=1"

~N: 0, "999", "seq", "seq=seq+1"
~ARTICLE: 42, "", "article", "article = STCRD->STKCOD - '•' - STCRD->STKDES; RMSEQ=1"
~STKCOD: 15, "", "STCRD->STKCOD", ""
~STKDES: 28, "", "STCRD->STKDES", ""

...
~NETAMT_I: 0, "ZZ,ZZZ,ZZZ.ZZ", "STCRD->TRNVAL", ""
~SONUM_I: 0, "", "STCRD->RDOCNUM", ""
~REMARK: 0, "", "ARTRNRM->REMARK", "RMSEQ=RMSEQ+1"
~MQTY: 0, "ZZ,ZZZ", "mqty", "mqty = STCRD->TRNQTY * STCRD->TFACTOR"

...
~RMK: 0, "", "RMK", "RMK=IIF(RMSEQ # 2, ':', ' ')"

[kriangsakkho]

ถ้าสินค้าทุกรายการที่มีในบิล เอาเฉพาะหมายเหตุบรรทัดเดียวกันทั้งหมด จะแก้ไขได้ตามแบบข้างล่างนี้นะครับ โดยเลือกพิมพ์เฉพาะหมายเหตุบรรทัดที่ 2 (แต่ถ้าสินค้าในบิลบางรายการเลือกหมายเหตุบรรทัดที่ 1 สินค้าบางรายการเลือกหมายเหตุบรรทัดที่ 2 แบบนั้นแก้ไขไม่ได้นะครับ)

Ib: ~N ~ARTICLE ~QTY ~TQUCOD ~UNITPR ~NETAMT_I ;1
Ih:: ;2 artrnrm->docnum+artrnrm->seqnum stcrd->rdocnum
Ib: ~REMARK ;2
Ih:: ;3 artrnrm->docnum+artrnrm->seqnum stcrd->docnum+stcrd->seqnum
Ib:~RMK *~REMARK ;3


[data spec]
...
~INIT: 0, "", "", "seq=0; sumamt0=0; sumamt1=0; SQTY=0; ITEM=0; RMSEQ=1"

~N: 0, "999", "seq", "seq=seq+1"
~ARTICLE: 42, "", "article", "article = STCRD->STKCOD - '•' - STCRD->STKDES; RMSEQ=1"
~STKCOD: 15, "", "STCRD->STKCOD", ""
~STKDES: 28, "", "STCRD->STKDES", ""

...
~NETAMT_I: 0, "ZZ,ZZZ,ZZZ.ZZ", "STCRD->TRNVAL", ""
~SONUM_I: 0, "", "STCRD->RDOCNUM", ""
~REMARK: 0, "", "ARTRNRM->REMARK", "RMSEQ=RMSEQ+1"
~MQTY: 0, "ZZ,ZZZ", "mqty", "mqty = STCRD->TRNQTY * STCRD->TFACTOR"

...
~RMK: 0, "", "RMK", "RMK=IIF(RMSEQ # 2, ':', ' ')"

หากต้องการเรียกเพิ่มอีก 1 บรรทัดสามารถทำได้อย่างไรครับ ตามโค้ดที่ให้มาเรียก Note บรรทัดที่ 2 ได้แล้ว ผมต้องการเรียกอีก 1 บรรทัดครับ

[savek]

สมมติว่าต้องการบรรทัดที่ 2 กับ 3 ให้ลองแบบนี้ดูครับ

~RMK: 0, "", "RMK", "RMK=IIF(RMSEQ = 2 .AND. RMSEQ = 3, ' ', ':')"