ต้องการเพิ่ม remark ในเอกสาร 466 ซึ่งเป็นรายงานการโอนย้าย

[ICT.PM1994]

สวัสดีครับ สอบถามเรื่องโค้ด remark ที่ใช้ใส่ลง รายงานสร้างเองต้นฉบับ รายงานข้อ 466 รายงานการโอนสินค้า
จะสามารถเพิ่ม remark ลงในรายงาน ซึ่งดึงมาจาก remark ที่อยู่ในเอกสารการโอนย้ายได้ไหมครับ

[savek]

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

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

File=STTRN
Alias=M
Tag=STTRN1
System=DATA_PATH
Master file=STCRD
Master-Related Field=DOCNUM

เพิ่มในส่วนของ [data spec]

~REMARK: 0, "", "STTRN->REMARK", ""

[ICT.PM1994]

*EX-47
* STRELO.RWT
* - Stock Relocation Report
[report frame]
Ti::~INIT
He:\NAME
*He:","$EÃÒ§ҹâ͹ÂéÒÂÊÔ¹¤éÒ$E
*He:","Çѹ·Õè¨Ò¡ ~FROMDATE ¶Ö§ ~TODATE `Çѹ·Õè : \DATE
*H1:","ÃËÑÊÊÔ¹¤éÒ¨Ò¡ ~FROMSTK ¶Ö§ ~TOSTK
*H1:","¤Åѧµé¹·Ò§¨Ò¡ ~FROMLOC ¶Ö§ ~TOLOC
*H1:","¤Åѧ»ÅÒ·ҧ¨Ò¡ ~FROMLOCD ¶Ö§ ~TOLOCD
*He:\LINE
He:~1A ~1B ~1C • • ••~1D ~1E ~1F ~1G ••••• • ~1H ~1I ~1J
*He: àÅ¢·ÕèàÍ¡ÊÒà Çѹ·Õè ËÁÒÂà赯 ¨Ò¡¤Åѧ 令Åѧ ÃËÑÊÊÔ¹¤éÒ ª×èÍÊÔ¹¤éÒ •• • ¨Ó¹Ç¹ ˹èǹѺ ÁÙŤèÒ
*He:\LINE
Gh:
BO: ~DOCNUM ~DOCDAT ~remark •••••• •~LC1 ~LC2 ~STKCOD ~STKDES~CLRSUM ~TRNQTY ~QUDES ~XTRNVAL ; 1 STCRD->LOCCOD ; 2 STCRD->PEOPLE 0 4 ; 3 STCRD->DOCDAT
Gf:~PRN_TTRN ~2GFI ~TTRNQTY ~TTRNVAL ;2
*Gh: ~LC1 ~LC1_T ; 1 STCRD->LOCCOD
*Gh: ~LC2 ~LC2_T ~CLRSUM ; 2 STCRD->PEOPLE 0 4
*Gh:: ; 3 STCRD->DOCDAT
*Gh:
*Bo:{1} ~DOCNUM ~DOCDAT {1} ~STKCOD ~STKDES ~TRNQTY ~QUDES ~XTRNVAL
* dd/mm/yy xxxxxxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 9999,999.999 xxxxxxxx 999,999,999.99
*Gf:~PRN_TTRN ~2GFI ~TTRNVAL ;2
*Gf:~PRN_TTRN ~2GFI ~TTRNQTY ~TTRNVAL ;2
Su: ~1LL
Su: ~1SUI ~GTRNVAL
Su: ~1SUI ~GTRNQTY ~GTRNVAL
Su: ~6LL
Su:~2SUB
[end frame]

[print options]
Top=0
Left=0
Right=195
Lines=41
Output=Select, Printer, Screen, File,
File Name=466.CSV
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
DATE FORMAT=DD/MM/YYYY
Query=POSOPR = '4'
Query=.AND.DTOS(DOCDAT)>='Date1()'.AND.DTOS(DOCDAT)<='Date2()'
Query=.AND.STKCOD>='Stk1()'.AND.STKCOD<='Stk2()'
Query=.AND.LOCCOD>='Loc1()'.AND.LOCCOD<='Loc2()'
Query=.AND.SUBSTR(PEOPLE,1,4) >='LocD1()'.AND.SUBSTR(PEOPLE,1,4) <='LocD2()'
Sort=LOCCOD+PEOPLE+DTOS(DOCDAT)+STKCOD

[master file]
File=STCRD
Alias=A
Tag=STCRD3
System=DATA_PATH

[item file]
File=ISTAB
Alias=T
Tag=ISTAB1
System=DATA_PATH

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

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

File=STTRN
Alias=M
Tag=STTRN1
System=DATA_PATH
Master file=STCRD
Master-Related Field=DOCNUM

[data spec]
*~dat: len,"pict", "data", "exp"
~INIT: 0, "", "", "grandqty=0; grandval=0; cnt=0"
~FROMSTK: 0, "", "Stk1()", ""
~TOSTK: 0, "", "Stk2()", ""
~FROMDATE: 0, "d•´´´•»»»»", "@date1()", ""
~TODATE: 0, "d•´´´•»»»»", "@date2()", ""
~FROMLOC: 0, "", "Loc1()", ""
~TOLOC: 0, "", "Loc2()", ""
~FROMLOCD: 0, "", "LocD1()", ""
~TOLOCD: 0, "", "LocD2()", ""
~DOCNUM: 0, "", "STCRD->DOCNUM", "",A
~DOCDAT: 0, "DD/MM/YYYY", "STCRD->DOCDAT", "",B
~remark: 0, "", "STTRN->REMARK" "",C
~LC1: 0, "", "LC1", "LC1=STCRD->LOCCOD-'•'",D
*~LC1_T: 0, "", "p_istab( STCRD->LOCCOD,21,1,30)", "",C
~LC2: 0, "", "LC2", "LC2=STCRD->PEOPLE-'•'",E
*~LC2_T: 0, "", "p_istab( STCRD->PEOPLE,21,1,30)", "",E
~NN: 0, "", "STCRD->SEQNUM", ""
~STKCOD: 0, "", "STCRD->STKCOD", "",F
~STKDES: 0, "", "STMAS->STKDES", "",G
~TRNQTY: 0, "qty(12)", "STCRD->TRNQTY", "qty=IIF(STMAS->STKTYP='1',0,STCRD->TRNQTY); sumqty=sumqty+qty",H
~QUDES: 0, "", "p_istab( STCRD->TQUCOD,20,1,8)", "",I


~XTRNVAL: 0, "ZZZ,ZZZ,ZZZ.ZZ", "STCRD->XTRNVAL", "item=item+1; val=IIF(STMAS->STKTYP='1',0,STCRD->XTRNVAL); sumval=sumval+val; prn_ttrn=IIF(val>0.AND.item>1, ' ', prn_ttrn )",J
~TTRNQTY: 0, "qty(12)", "sumqty", "grandqty=grandqty+sumqty",J
~TTRNVAL: 0, "999,999,999.99", "sumval", "grandval=grandval+sumval",L
~CLRSUM: 0, "", "", "sumqty=0; sumval=0; prn_ttrn=':'; item=0"
~GTRNQTY: 0, "qty(12)", "grandqty", "",J
~GTRNVAL: 0, "999,999,999.99", "grandval", "",L
~PRN_TTRN: 0, "", "prn_ttrn", ""

**********************************************************************************
** 1HE **
~1A: 0, "", "1A", "1A = 'àÅ¢·ÕèàÍ¡ÊÒÃ'",A
~1B: 0, "", "1B", "1B = 'Çѹ·Õè'",B
~1C: 0, "", "1C", "1C = 'ËÁÒÂà˵Ø'",C
~1D: 0, "", "1D", "1D = '¨Ò¡¤Åѧ'",D
~1E: 0, "", "1E", "1E = '令Åѧ'",E
~1F: 0, "", "1F", "1F = 'ÃËÑÊÊÔ¹¤éÒ'",F
~1G: 0, "", "1G", "1G = 'ª×èÍÊÔ¹¤éÒ'",G
~1H: 0, "", "1H", "1H = '¨Ó¹Ç¹'",H
~1I: 0, "", "1I", "1I = '˹èǹѺ'",I
~1J: 0, "", "1J", "1J = 'ÁÙŤèÒ'",J
*~1K: 0, "", "1I", "1I = '˹èǹѺ'",K
*~1L: 0, "", "1J", "1J = 'ÁÙŤèÒ'",L

** 2GF **
~2GFI: 0, "", "2GFI", "2GFI = 'ÃÇÁ'",I

** 1SU **
~1SUI: 0, "", "1SUI", "1SUI = 'ÃÇÁ·Ñé§ÊÔé¹'",I

** 2SU **
~2SUB: 0, "", "2SUB", "2SUB = '>>>•¨ºÃÒ§ҹ•<<<'",B

** LINE ãËéµÃ§¡Ñº¤ÍÅÑÁ¹ì´éÒ¹º¹••(àÊé¹à´ÕèÂÇãªé•1-5••àÊ鹤Ùèãªé•6à»ç¹µé¹ä»)•**
~1LL: 0, "", "1LL", "1LL = '--------------- '",L

~6LL: 0, "", "6LL", "6LL = '=============== '",L


ขอเพิ่มเติมครับ ผมแก้ผิดพลาดตรงไหน ระบบถึงไม่ รวมให้ครับ