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

ในรางาน 1A4 ลูกหนี้คงค้างแบบละเอียด หากเราต้องการให้แสดงรายการสินค้าที่อยู่ใน invoice นั้นที่ยังค้างอยู่  อยากให้แสดงบรรทัดถัดไป จะเขียนคำสั่งอย่างไรคะ

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

วิธีการให้เพิ่มส่วนที่เป็นสีแดงนี้เข้าไปครับ

Ih::                          ;1 ARRCPIT->DOCNUM A->DOCNUM
Ib:~PRN                      ~IT_RCPNUM  ~IT_RCVDAT    ~IT_RCVAMT    ~CHK ;1
Ih::                    ;2 stcrd->docnum artrn->docnum
Ib: ~N    ~ARTICLE                                  ~QTY    ~TQUCOD  ~UNITPR    ~NETAMT_I        ;2


[item file]
File=ARRCPIT
Alias=F
Tag=ARRCPIT2
System=DATA_PATH

File=stcrd
Alias=B
Tag=stcrd5
System=DATA_PATH


~F:        0,  "",                "is_rcperr",    "is_rcperr=' '+IIF(A->RECTYP='9'.AND.A->DOCSTAT='R','!',' '); prn_remark=IIF(is_rcperr='!', ' ',prn_remark)"
~DOCNUM:    0,  "",                "A->DOCNUM",    "c_doc=c_doc+1;seq=0"
~DOCDAT:    0,  "",                "A->DOCDAT",    ""
~SLMCOD:    0,  "",                "A->SLMCOD",    ""


~GTOT5:        0,  "999,999,999.99",  "gtot5",        ""
~GTOT6:        0,  "999,999,999.99",  "gtot6",        ""
~GTOTAL:        0,  "9999,999,999.99",  "gtot",        ""

[color=red]~N:        0,      "999",              "seq",              "seq=seq+1"
~ARTICLE:  42,      "",                "article",          "article = STCRD->STKCOD - '

ได้แล้วค่ะ คุณ savek  ขอบคุณค่ะ

มาทำรายงานต่อแล้ว อยากรบกวนอีกนิดค่ะ คือต้องการยอดรวมของแต่ละ item สินค้า ซึ่งวางไว้ด้านขวาของรายงาน จะเขียนไงดีค่ะ ไปไม่ถูกค่ะ

* ARBALAGD.RWT - A/R Balance Aging Detail Report
*
[report frame]
Ti::~INIT ~INIT2 ~CLR_T
He:\NAME                                                    `˹éÒ    : \PAGE
He:$EÅ١˹Õ餤éÒẺÅÐàÍÕ´$E
He:³

สมมติว่าจะรวมช่อง NETAMT_I ให้ทำลักษณะนี้ครับ

~NETAMT_I:  0,      "ZZ,ZZZ,ZZZ.ZZ",    "STCRD->TRNVAL",    "sumnet=sumnet+STCRD->TRNVAL"

จากนั้นสร้างตัวแปรขึ้นมาเพื่อใช้แสดงค่า sumnet ที่เป็นยอดรวมของจำนวนเงินค่าสินค้า

และล้างค่า sumnet ทุกครั้งที่ขึ้นบิลขายใบใหม่ โดยใส่คำสั่ง sumnet=0 ไว้ที่บรรทัดตัวแปร ~DOCNUM

ok ได้ในระดับหนึ่งแล้วค่ะ แต่เมื่อทดสอบพบว่า หากมีเอกสารใบที่ 2 ที่เป็นลูกค้าเดียวกัน กลับไม่ sum ให้ค่ะ คือยังเป็นยอดแรกอยู่  เช่นใบแรก 4800  ใบที่สองมี 4000  ยอด sum ยังเป็น 4800 ค่ะ

ได้แล้วค่ะ  วางผิดตำแหน่งไปนิด เลยไม่ sum ยอดให้

จากรายงานเดิม  รบกวนช่วยทำตัวที่มาของตัวแปรในช่อง กลุ่มA โดยขอตัวแปร บรรทัดรวมลูกค้า และบรรทัดรวมตามประเภทของลูกค้า ด้วยค่ะ  งง ทำต่อไม่ได้ค่ะ แต่ทำตัวแปรไว้แล้ว รบกวนคุณ savek ทำตัวอย่างเฉพาะ  ~AMBR01  และ ~S_AMBR01  ค่ะ ที่เหลือเดี๋ยวคัดลอกเองได้

* ARBALAGD.RWT - A/R Balance Aging Detail Report
*
[report frame]
Ti::~INIT ~INIT2 ~CLR_T
He:\NAME                                                    `˹éÒ    : \PAGE
He:$EÅ١˹Õ餤éÒẺÅÐàÍÕ´$E
He:³

ตัวแปร ~S_AMBR01 ให้ทำในลักษณะเดียวกับ gambr01 ได้เลยครับ คือ สั่งให้มีการคำนวณค่าเก็บเอาไว้ในบรรทัดตัวแปร ~AMBR01

~AMBR01:  0,      "Z,ZZZ,ZZZ.ZZ",    "ambr01",          "ambr01=IIF(STCRD->DEPCOD='01',STCRD->TRNVAL+(STCRD->TRNVAL*7/100),0); s_ambr01=s_ambr01+ambr01; gambr01=gambr01+ambr01"

และเนื่องจากต้องรวมยอดใหม่ทุกครั้งทีขึ้นรหัสลูกค้ารายใหม่ ดังนั้นจึงต้องเคลียร์ค่า s_ambr01 ให้เป็น 0 ในบรรทัด Gh: ของรหัสลูกค้า ในลักษณะนี้ครับ

~CUSTOMER:  0,  "",                "cus_nam",      "cus_nam = ARMAS->CUSNAM - '

ได้แล้วค่ะ  แต่ขอวิธีอีกตัวค่ะ  ~T_AMBR01

ได้แล้วค่ะ ทำได้ครบแล้ว ขอบคุณ คุณ savek ค่ะ