แก้ไขฟอร์ม(จำนวนในสินค้าชุด ในฟอร์ม IV)

[L&L Accounting SiS]

แก้ไขฟอร์ม IV โดยแสดงจำนวนสินค้าทั้งหมดว่ามีจำนวนเท่าไหร่ ต่อชุด ดังตัวอย่างนี้ค่ะ
ลำดับ รายละเอียด จำนวนสินค้าต่อชุด จำนวนที่ขาย ราคาต่อหน่วย รวม
1 AAAA 46 2 20000 40000

สินค้าชุด AAAA ประกอบด้วย
AAA1 12
AAA2 24
AAA3 10

ใช้คำสั่งหรือตัวแปรใดให้แสงดจำนวนสินค้าต่อชุด

[ASAN]

- พี่เล็กลองทำดูนะ ไฟล์ STBOM อ้างถึง STCRD ได้เลย

[suchai]

ผมเสนอให้อีกแบบครับ สำหรับชุดธรรมดา ที่จำนวนคงที่
ให้ใส่ผลรวม ในช่องหมายเหตุ ของข้อ 4 รายละเอียดสินค้าชุด

ในฟอร์ม IV
ลำดับ รายละเอียด จำนวนสินค้าต่อชุด จำนวนที่ขาย ราคาต่อหน่วย รวม
~N ~STKDES ~SET ~QTY ~TQUCOD ~UNITPR ~NETAMT_I

[data spec]

~SET: 0, "", "STMAS->REMARK", ""

ช่องหมายเหตุนี้ ต้องไม่นำไปใช้อย่างอื่น แต่ถ้าต้องใช้ ก็อาจ
ใช้ หมายเหตุ ใน Alt+R ของสินค้าชุดได้

[L&L Accounting SiS]

ขอบคุณทุกท่านที่ช่วยกันแสดงความคิดเห็นค่ะ
เผอิญต้องการตัวเลข เพื่อนำไปคำนวณต่อค่ะ จึงคิดว่าใช้ Remark ไม่ได้
อาซันสบายดีนะคะ ไม่ได้ติดต่อไปนานแสนนาน มัวแต่ไปช่วยงาน
กุศลอยู่น่ะ

[suchai]

ถ้าจะเอา Remark ไปคำนวนต่อ ก็ใช้ VAL(STMAS->REMARK)
สมมติ ให้แสดงผลเป็นจำนวนทั้งหมด 46 * 2 = 92

ในฟอร์ม IV
ลำดับ รายละเอียด จำนวนสินค้าต่อชุด จำนวนที่ขาย ราคาต่อหน่วย รวม
~N ~STKDES ~SET ~QTY ~TQUCOD ~UNITPR ~NETAMT_I

[data spec]

~INIT: 0, "", "", "seq=0; set=0 "
....
....
~SET: 0, "9,999", "set", "set=VAL(STMAS->REMARK) * STCRD->TRNQTY"

ก็จะได้
ลำดับ รายละเอียด จำนวนสินค้าต่อชุด จำนวนที่ขาย ราคาต่อหน่วย รวม
1 AAAA 92 2 20000 40000

[L&L Accounting SiS]

ขอบคุณมากค่ะ

[02]

Fo:
Su: รวม ~SS ~AMOUNT

[relate file]

File=ABB
CLONE FROM=ARTRNRM
Alias=L
KEY=DOCNUM+SEQNUM
INDEX=C:\TES
FILTER=.NOT.DELETED()
System=DATA_PATH
Master file=STCRD
Master-Related Field=STKCOD

[data spec]
~INIT: 0, "", "", "seq=0; sumamt0=0; sumamt1=0;SS=0"

~SET: 0, "999,999.99", "SET", "SET=VAL(ABB->REMARK)*(STCRD->TRNQTY);SS=SS+SET"
~SS: 0, "99,999", "SS", ""

[02]

ขอโทษค่ะ ลืมแนะนำไปนิดหนึง ให้เพิ่ม ~SS
แล้วก้อเพิ่ม ในส่วนของ [relate file] แล้วก้อใน [data spec] ให้แก้ใหม่ไปเลยโดยให้พิมพ์ตามที่แก้ให้ใหม่ได้เลย

[L&L Accounting SiS]

ขอบคุณมากค่ะ