รายงานสินค้าประจำวัน(PO,OU)

[MA_A_DA]

อยากทราบว่า รายงานสินค้าประจำวัน PD , OU ในช่อง (เลือกแผนก) ถ้าสมมุติเราอยากจะสร้างรายงานใหม่ โดย(เลือกหมวดสินค้า)ได้หรือไม่อย่างไร หรือว่ามีฟังชั่นอยู่แล้วครับ 

[savek]

ให้คัดลอกรายงานต้นฉบับมาแก้ไขครับ โดยเพิ่มบรรทัดคำสั่งข้างล่างนี้เข้าไป

Query=DTOS(DOCDAT)>='Date1()'.AND.DTOS(DOCDAT)<='Date2()'
Query=.AND.DOCNUM>='Doc1()'.AND. DOCNUM<='Doc2()'
Condition=STMAS->STKGRP='รหัสหมวดสินค้าที่ต้องการ'

จากนั้นออกจากโปรแกรม แล้วกลับมาเข้าพิมพ์รายงานตัวใหม่นี้จากเมนูรายงานข้อ 9.1 ครับ

[MA_A_DA]

ผมได้ลอง COPY ไปใส่แล้วก็ยังไม่เห็นผลเลยครับ ขอให้พี่SAVEK บอกอีกที

[savek]

ได้ออกจากโปรแกรม แล้วค่อยกลับเข้าลองพิมพ์ใช่ไหมครับ หากทำแล้วแต่ยังไม่ได้ ลองก๊อปปี้โค้ดคำสั่งทั้งหมดให้ผมดูในกระทู้นี้อีกทีครับ

[AdsN]

* STTRNR6.RWT
*  - Stock Transaction Report
*  - Internal Issue Report
[report frame]
Ti::~INIT
He:\NAME                                                    `˹éÒ    : \PAGE
He:$EÃÒ§ҹ¨èÒÂÊÔ¹¤éÒÀÒÂã¹$E
He:Çѹ·Õè¨Ò¡    ~FROMDATE      ¶Ö§  ~TODATE                  `Çѹ·Õè    : \DATE
H1:àÅ¢·Õè¨Ò¡    ~FROMDOC        ¶Ö§  ~TODOC          àÅ×Í¡á¼¹¡  ~DEPT
He:\LINE
He:ÅӴѺ  ÃËÑÊÊÔ¹¤éÒ              ÃÒÂÅÐàÍÕ´                                    ¤Åѧ·Õè      ¨Ó¹Ç¹          ÃÒ¤ÒµèÍ˹èÇ        ÁÙŤèÒÃÇÁ
He:\LINE
*  xx    xxxxxxxxx1xxxxxxxxx2 xxxxxxxxx1xxxxxxxxx2xxxxxxxxx3xxxxxxxxx4xxxx xxxx  999,999.999 xxxxxxxx999,999.999 99,999,999.99
Bo:$B~DOCNUM      ~DOCDAT  $B ~DEP  ~REMARK
*Ih:                                    ËÁÒÂà˵Øà¾ÔèÁàµÔÁ:        ;1 artrnrm->docnum+'@' sttrn->docnum+'@'
*Ib:                                        ~REMARK_H      ;1
Ih::~CLRSUM                        ;2  stcrd->docnum  sttrn->docnum
Ib: ~NN  ~STOCK                                                            ~LC  ~TRNQTY    ~QUDES  ~UNITPR    ~TRNVAL    ;2
If:                                                                                                    ÃÇÁ        $B~TTRNVAL    $B ;2
Su:                                                                                                              --------------
Su:                                                        àÍ¡ÊÒà ~CNT  㺠                     ÃÇÁ·Ñé§ÊÔé¹      $B~GTRNVAL      $B
Su:                                                                                                              ==============
Su:>>>>  ¨ºÃÒ§ҹ  <<<<
[end frame]

[print options]
Top=0
Left=0
Right=124
Lines=41
Output=Select, Printer, Screen, File,
File Name=STTRNR6.TXT
Fix Foot Line=OFF
Select Scope=OFF
Select Page=OFF
Select Paper=15_Inch, 8_Inch, Default
8_Inch=\027\033\004
15_Inch=\027\033\001
Query=DTOS(DOCDAT)>='Date1()'.AND.DTOS(DOCDAT)<='Date2()'
Query=.AND.DOCNUM>='Doc1()'.AND. DOCNUM<='Doc2()'
Condition=STMAS->STKGRP='02'


[master file]
File=STTRN
Alias=A
Tag=STTRN1
System=DATA_PATH

[item file]
File=STCRD
Alias=I
Tag=STCRD3
System=DATA_PATH

File=ISTAB
Alias=T
Tag=ISTAB1
System=DATA_PATH

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

[relate file]
File=STMAS
Alias=M
Tag=STMAS1
System=DATA_PATH
Master file=STCRD
Master-Related Field=STKCOD

[data spec]
*~dat:      len,"pict",            "data",            "exp"
~INIT:      0,  "",                "",                "grandval=0;cnt=0"
~FROMDOC:  0,  "",                "Doc1()",          ""
~TODOC:    0,  "",                "Doc2()",          ""
~FROMDATE:  0,  "d

[MA_A_DA]

คุณSAVEKครับ ข้อความของ ADSN ครับ ที่ว่าใส่สูตรที่คุณSAVEKบอกมาแล้วนำไปทดลองแล้วไม่ได้ ช่วยคุณSAVEKช่วยตรวจสอบให้อีกทีครับ 

[MA_A_DA]

ช่วยคุณSAVEKตรวจดูสูตรให้ด้วยนะครับ 

[savek]

อ่อ ขออภัยครับ ตรงนี้สูตรที่ผมให้ไปจะใช้ไม่ได้ครับ เพราะฟิลด์ข้อมูลที่เป็นรายการสินค้านั้น อยู่ในส่วนของ [item file] ที่ไม่สามารถนำมาสร้างเงื่อนไขในการพิมพ์รายงานได้นะครับ

[MA_A_DA]

แล้วต้องทำยังไงครับ มีวิธีอื่นหรือเปล่าครับ