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

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

~DOCDAT:    0,  "d/mm/yyyy",                "A->DOCDAT",    ""

[quote="savek"]
ลองแก้ไขรายงานและเปลี่ยนรูปแบบการแสดงผลวันที่ ให้เป็นแบบข้างล่างนี้แทนนะครับ จากนั้นจึงลองพิมพ์รายงาน และนำไปใช้ในโปรแกรม Excel อีกทีหนึ่ง

~DOCDAT:     0,  "d/mm/yyyy",                 "A->DOCDAT",     ""

[/quote]

หาตรงนี้ไม่เจอครับ
เจอแต่ส่วนนี้

Ti::~INIT_VAR
He:\NAME                                                    ","","","","","","","˹éÒ  : \PAGE
He:ÊÁØ´ÃÒÂÇѹàÃÕ§µÒÁàÅ¢·ÕèºÑ­ªÕ
He:àÅ¢·ÕèºÑ­ªÕ¨Ò¡      ","","~FROMACC        ¶Ö§  ~TOACC            ","","","","","Çѹ·Õè    : \DATE
H1:Çѹ·Õè¨Ò¡          ","","~FROMDATE        ¶Ö§  ~TODATE          àÅ×Í¡á¼¹¡  ~D1
*He:\LINE
He:","Çѹ·Õè","ÊÁØ´","ãºÊӤѭ","à´ºÔ·","à¤Ã´Ôµ","¤Ó͸ԺÒÂ","ʶҹÐ
He:","--------","----","-----------","-----------------","----------------","------------------------------------------------","-----
*  dd/mm/yyyy  GEN    GLxxxxxxxxYYYY 99,999,999,999.99 99,999,999,999.99  xxxxxxxxx1xxxxxxxxx2xxxxxxxxx3xxxxxxxxx4xxxxxxxxx5  X
Gh::  ; 1  ACCNUM
Gh:àÅ¢·ÕèºÑ­ªÕ:      ~ACCNUM                                                                    ; 2  DEPCOD
Bo:~VDATE    ~MNE  ~VOUCHER    ~DB_AMT          ~CR_AMT            ~DESCRP                                            ~POST ~A2 
Gf:                              ----------------- -----------------      ; 2
Gf:~A1              ÃÇÁ          ~TOTDB            ~TOTCR            ~CLR
Gf:\LINE
Su:","","","","=================","=================
Su:ÃÇÁ·Ñé§ÊÔé¹      ~GTDB            ~GTCR         
Su:","","","","=================","=================
Su:~RS    ÃÒ¡ÒÃ
Su:~TC    ºÑ­ªÕ
Su:
Su: ËÁÒÂà˵ؕ•Ê¶Ò¹Ð•U=ÂѧäÁè¼èÒ¹ºÑ­ªÕ,•C=¡àÅÔ¡
Su:>>>> ¨ºÃÒ§ҹ <<<<
[end frame]

[print options]
Top=0
Right=123
Lines=41
Output=Select, Printer, Screen, File,
File Name=GLJNL3X.TXT
Select Paper=15_Inch, 8_Inch, Default
8_Inch=\027\033\004
15_Inch=\027\033\001
Query=ACCNUM>='Acc1()'.AND.ACCNUM<='Acc2()'
Query=.AND.DTOS(VOUDAT)>='Date1()'.AND.DTOS(VOUDAT)<='Date2()'
Query=.AND.GLACC->ACCTYP='0'
*à¾×èÍ´Ù੾ÒÐàÍ¡ÊÒë×éÍàª×èÍ(·Ø¡àÁ¹ÙÂèÍ·ÕèÊÃéÒ§à¾ÔèÁ)
*Query=.AND.ISRUN->DOCTYP='RR'

[master file]
File=GLJNLIT
Alias=J
Tag=GLJNLIT2
System=DATA_PATH

[relate file]
File=GLJNL
Alias=H
Tag=GLJNL1
System=DATA_PATH
Master file=GLJNLIT
Master-Related Field=VOUCHER

File=GLACC
Alias=A
Tag=GLACC1
System=DATA_PATH
Master file=GLJNLIT
Master-Related Field=ACCNUM

File=GLBAL
Alias=B
Tag=GLBAL1
System=DATA_PATH
Master file=GLJNLIT
Master-Related Field=ACCNUM+DEPCOD

File=ISRUN
Alias=RUN
Tag=ISRUN2
System=DATA_PATH
Master file=GLJNLIT
Master-Related Field=SUBSTR(VOUCHER,1,2)

[data spec]
*~dat:      len,"pict",                "data",        "exp"
~INIT_VAR:  0,  "",                    "",            "TOTDB=0;TOTCR=0;GTDB=0;GTCR=0;CNT=0;TAC=0; is_audit=@n_isAudit()"
~CLR:      0,  "",                    "",            "TOTDB=0;TOTCR=0"
~FROMACC:  0,  "",                    "Acc1()",      ""
~TOACC:    0,  "",                    "Acc2()",      ""
~D1:        0,  "",                    "Dep1()",      ""
~D2:        0,  "",                    "Dep2()",      ""
~FROMDATE:  0,  "d•´´´•»»»»",          "@date1()",    ""
~TODATE:    0,  "d•´´´•»»»»",          "@date2()",    ""
~PF:        0,  "",                    "Period1()",    ""
~PT:        0,  "",                    "Period2()",    ""
*~ACCNUM:  0,  "",                    "J->ACCNUM",    ""
~ACCNUM:    0,  "",                    "acc",          "acc=trim(J->ACCNUM)+' '+J->DEPCOD+' '+GLACC->ACCNAM"
~DEP:      0,  "",                    "J->DEPCOD",    ""
~ACCNAM:    0,  "",                    "NAMERR",      "NAMERR=IIF(GLACC->ACCNUM='    ','*** A/C Not Found ***                            ',GLACC->ACCNAM)"
~VDATE:    0,  "",                    "J->VOUDAT",    "",B , 0, 1
~MNE:      0,  "",                    "mne_jnl()",    "DB_AMT=IIF (J->TRNTYP='0', J->AMOUNT, 0)",C
~VOUCHER:  0,  "",                    "J->VOUCHER",  "CR_AMT=IIF (J->TRNTYP='1', J->AMOUNT, 0)",D
~DESCRP:    0,  "",                    "J->DESCRP",    "",G
~DB_AMT:    0,  "ZZ,ZZZ,ZZZ,ZZZ.ZZ",    "DB_AMT",      "TOTDB=TOTDB+DB_AMT",E
~CR_AMT:    0,  "ZZ,ZZZ,ZZZ,ZZZ.ZZ",    "CR_AMT",      "TOTCR=TOTCR+CR_AMT",F
~TOTDB:    0,  "99,999,999,999.99",    "TOTDB",        "GTDB=GTDB+TOTDB",E
~TOTCR:    0,  "99,999,999,999.99",    "TOTCR",        "GTCR=GTCR+TOTCR",F
~GTDB:      0,  "99,999,999,999.99",    "GTDB",        "",E
~GTCR:      0,  "99,999,999,999.99",    "GTCR",        "",F
~POST:      0,  "",                    "POST",        "POST=IIF(GLJNL->DOCSTAT='C','C',IIF(GLJNL->TRNSTAT='U','U',IIF(is_audit=1.AND.GLJNLIT->ADJUST='Y','E',' ')))",H
~A1:        0,  "",                    "",            "TAC=TAC+1"
~A2:        0,  "",                    "",            "CNT=CNT+1"
~RS:        0,  "99,999",              "CNT",          ""
~TC:        0,  "99,999",              "TAC",          ""

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

~VDATE:    0,  "d/mm/yyyy",                    "J->VOUDAT",    "",B , 0, 1