โดย applerepublic » จันทร์ เม.ย. 25, 2011 1:28 pm
ช่วยเช็คได้ไหมครับว่าทำไมเวลาprint มา ความสูงยังเหมือนเดิม และตัวอัษรยังเท่าเดิม ครับ
* ARCSH.RLZ - บิลเงินสด•(CASH•RECEIPT) พิมพ์ครึ่งหน้า
*
[report frame]
*** ผู้ใช้สามารถเปลี่ยนแปลงแก้ไข•ได้ตามต้องการ•****************************************
Ti:: ~INIT
He:SPT
He:
He:ลูกค้า ~CUSNAM เลขที่บิล ~DOCNUM
He: ~AREA วันที่ ~DOCDAT
He:๏๔๔๔๔๘๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๘๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๓
He:๓ No.๓ รายละเอียด ๓ จำนวน ๓
He:๕๔๔๔๔๙๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๙๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๓
Bo::
Ih::;1 stcrd->docnum artrn->docnum
Ib: ~N ~STKDES ~QTY ~TQUCOD ;1
Ih::;2 artrnrm->docnum+artrnrm->seqnum stcrd->rdocnum
Ib: ~REMARK ;2
Ih::;3 artrnrm->docnum+artrnrm->seqnum stcrd->docnum+stcrd->seqnum
Ib: ~REMARK ;3
*Ih:;4 arrcpcq->rcpnum artrn->docnum
*Ib:~BY ~CHQNUM ~CHQDAT ~RCVAMT_Q ~AMOUNT_Q ~BNKCOD ;4
Bt:๓ ๓ ๓ ๓
Fo:๕๔๔๔๔๗๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๗๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๔๗
Su:
Su:
Su: ~PRNDAT ~PRNTIM ~PRNBY
[end frame]
*** คำสั่งต่อจากนี้•ผู้ใช้ไม่ควรแก้ไข•****************************************
[print options]
Top=0
Left=0
Tabs=4
Right=94
Lines=22
File Name=ARCSH.TXT
*ใช้กำหนดตัวอักษร•=•12•ตัวต่อนิ้ว
Print Control=\027\033\000\027\103
*ใช้กำหนดกระดาษ•6•นิ้ว
*Print Control=\027\033\001\027\067\000\006
*ใช้กำหนดกระดาษ•5•นิ้ว
*Print Control=\027\033\001\027\067\000\004
*ใช้กำหนดกระดาษ•5.5•นิ้ว•(ใช้ได้กับ•Epson•2170i)
*Print Control=\027\033\001\027\040\067\002\000\188\007
Fix Summary Line=ON
Select Page=OFF
Condition=OFF
********************************************************************
*** คำสั่งชุดด้านล่างนี้•ใช้เพื่อสั่งให้โปรแกรม•พิมพ์เอกสารทีเดียวหลาย•ๆ•ใบ
*** รายละเอียดเป็นดังนี้•:-
*** 1) ต้องกำหนด Select Scope=ON•เพื่อเลือกช่วงของเลขที่เอกสารก่อนพิมพ์
*** แต่ถ้าต้องการพิมพ์ครั้งละบิล•ให้กำหนด•Select•Scope=OFF
*** 2) คำสั่ง•Form=ON•จะใช้คู่กับ•Select•Scope=ON•เสมอ•จึงจะพิมพ์เอกสารต่อเนื่องได้
*** •(ถ้าฟอร์มไหนไม่มีบรรทัดนี้•คุณต้องเพิ่มเข้าไป•มิฉะนั้นเวลาพิมพ์บิลยอดเงินจะผิด)
*** 3) วิธีกำหนดอุปกรณ์แสดงผล•:-
*** . ถ้าต้องการเลือกอุปกรณ์แสดงผลทุกครั้งก่อนพิมพ์•ให้กำหนด•Output=Select
*** . ถ้าต้องการให้พิมพ์ออกไปที่เครื่องพิมพ์เลย•••••ให้กำหนด•Output=Printer
*** (คือย้ายคำว่า•Printer•มาไว้หลังเครื่องหมายเท่ากับ)
*** 4) วิธีกำหนดการเลื่อนหน้ากระดาษ•:-
*** . ถ้าเป็นกระดาษขนาด•6•หรือ•5•นิ้ว•(วัดจากขอบกระดาษด้านบน•ถึงรอยปรุสำหรับฉีกกระดาษ)
*** ต้องกำหนดค่าต่าง•ๆ•ดังนี้•:-
*** - ให้เลือกใช้•Print•Control=\027\067\000\006
*** (เพื่อส่งคำสั่ง•ให้เลื่อนกระดาษทีละ•6•นิ้ว)
*** - ให้เลือกใช้•Print•Control=\027\067\000\005
*** (เพื่อส่งคำสั่ง•ให้เลื่อนกระดาษทีละ•5•นิ้ว)
*** - กำหนด•Feed After Print=ON
*** - ลบบรรทัด•Su:•ว่างๆ•ด้านล่างของฟอร์ม•ทิ้ง•2•บรรทัด
*** - กำหนด•Line=22••(สามารถเปลี่ยนได้ตามความเหมาะสม)
*** . ถ้าเป็นกระดาษขนาด•5.5•นิ้ว•ให้กำหนดค่าดังนี้•:-
*** + กรณีที่ใช้•Printer•Epson•2170i•(สามารถเลื่อนทีละ•5.5นิ้วได้)
*** ให้กำหนดค่าดังนี้•:-
*** - ให้เลือกใช้•Print•Control=\027\040\067\002\000\188\007
*** (เพื่อส่งคำสั่ง•ให้เลื่อนกระดาษทีละ•5.5•นิ้ว)
*** - กำหนด•Feed After Print=ON
*** - ลบบรรทัด•Su:•ว่างๆ•ด้านล่างของฟอร์ม•ทิ้ง•2•บรรทัด
*** - กำหนด•Line=20••(สามารถเปลี่ยนได้ตามความเหมาะสม)
*** + ถ้าเป็นเครื่องพิมพ์รุ่นอื่น•ให้กำหนดค่าดังนี้•:-
*** - ให้เลือกใช้•Print•Control=\027\033\001
*** (เพื่อส่งคำสั่ง•ให้ใช้ตัวอักษรขนาด•12•ตัวต่อนิ้ว)
*** - กำหนด•Feed After Print=2•(คือสั่งให้พิมพ์•2•ฟอร์มแล้วขึ้นหน้าใหม่)
*** - ไม่ต้องลบบรรทัด•Su:•ว่างๆ•ด้านล่างของฟอร์ม•(2บรรทัด)•ทิ้ง
*** (เพราะจะใช้สำหรับดันให้หัวเอกสารของใบที่สอง•ต่ำลงมา)
*** - กำหนด•Line=22
*********************************************************************
Select Scope=ON
Form=ON
Output=Select, Printer, Screen, File,
Feed After Print=OFF
[range of report]
From=CUR
[master file]
File=artrn
Alias=A
Tag=artrn1
System=DATA_PATH
[item file]
File=stcrd
Alias=B
Tag=stcrd5
System=DATA_PATH
File=artrnrm
Alias=C
Tag=artrnrm1
System=DATA_PATH
File=arrcpcq
Alias=D
Tag=arrcpcq1
System=DATA_PATH
[relate file]
File=armas
Alias=R
Tag=armas1
System=DATA_PATH
Master file=artrn
Master-Related Field=CUSCOD
File=stmas
Alias=M
Tag=stmas1
System=DATA_PATH
Master file=stcrd
Master-Related Field=STKCOD
File=oeso
Alias=Y
Tag=oeso1
System=DATA_PATH
Master file=artrn
Master-Related Field=SONUM
File=stloc
Alias=L
Tag=stloc1
System=DATA_PATH
Master file=stcrd
Master-Related Field=STKCOD+LOCCOD
[data spec]
* len (0)default, (>0)cut, (<0)cut to new line
*~dat: len, "pict", "data", "exp"
~ADDR: 0, "", "p_addr()", ""
~TAXID: 0, "", "p_taxid()", ""
~TEL: 0, "", "p_telnum()", ""
~INIT: 0, "", "", "seq=0; sumamt0=0; sumamt1=0"
~TXT0: 0, "", "txt0", "txt0 = IIF( ARTRN->FLGVAT <> '1', ' จำนวนเงิน', 'ราคารวมภาษี')",
*~TXT1: 0, "", "txt1", "txt1 = IIF( ARTRN->FLGVAT <> '1', 'จำนวนเงินหลังหักส่วนลด', 'จำนวนเงินรวมทั้งสิ้น ')",
~TXT1: 0, "", "txt1", "txt1 = IIF( ARTRN->FLGVAT <> '1', 'จำนวนเงินหลังหักมัดจำ ', 'จำนวนเงินรวมทั้งสิ้น ')",
~TXT2: 0, "", "txt2", "txt2 = IIF( ARTRN->FLGVAT <> '1', 'จำนวนเงินรวมทั้งสิ้น', 'ราคาสินค้า ')",
~DOCNUM: 0, "", "ARTRN->DOCNUM", ""
~DOCDAT: 0, "", "ARTRN->DOCDAT", ""
~CUSCOD: 0, "", "ARTRN->CUSCOD", ""
~CUSNAM: 0, "", "cus_nam", "cus_nam = ARMAS->PRENAM - '•' - ARMAS->CUSNAM"
~ADDR01: 0, "", "ARMAS->ADDR01", ""
*~ADDR02: 0, "", "ARMAS->ADDR02", ""
~ADDR02: 0, "", "addr_02", "addr_02 = ARMAS->ADDR02 - '•' - ARMAS->ADDR03 - '•' - ARMAS->ZIPCOD"
~ADDR03: 0, "", "addr_03", "addr_03 = ARMAS->ADDR03 - '•' - ARMAS->ZIPCOD"
~TELNUM: 0, "", "ARMAS->TELNUM", ""
~YOUREF: 0, "", "ARTRN->YOUREF", ""
~SLMCOD: 27, "", "slm", "slm = ARTRN->SLMCOD-'-'-OESLM->SLMNAM"
~DLVBY: 0, "", "p_istab( ARTRN->DLVBY, 41, 1, 40 )", ""
~AREA: 27, "", "p_istab( ARTRN->AREACOD, 40, 1, 40 )", ""
~SONUM: 0, "", "ARTRN->SONUM", ""
~SODAT: 0, "", "OESO->SODAT", ""
~FLGVAT: 0, "Y", "ARTRN->FLGVAT", ""
~AMOUNT: 0, "99,999,999.99", "ARTRN->AMOUNT", ""
~DISC: 0, "", "ARTRN->DISC", ""
~DISCAMT: 0, "99,999,999.99", "ARTRN->DISCAMT", ""
~TOTAL: 0, "99,999,999.99", "ARTRN->TOTAL", ""
~ADVNUM: 0, "", "ARTRN->ADVNUM", ""
~ADVAMT: 0, "99,999,999.99", "ARTRN->ADVAMT", ""
~VAT: 0, "99.99", "ARTRN->VATRAT", ""
~VATAMT: 0, "99,999,999.99", "ARTRN->VATAMT", ""
~CHKAMT: 0, "99,999,999.99", "netamt", "netamt = IIF( ARTRN->FLGVAT <> '1', ARTRN->NETAMT, ARTRN->TOTAL - ARTRN->VATAMT)"
~BAHT: 0, "", "t_baht(ARTRN->NETAMT)", ""
~N: 0, "999", "seq", "seq=seq+1"
~ARTICLE: 42, "", "article", "article = STCRD->STKCOD - '•' - STCRD->STKDES"
~STKCOD: 15, "", "STCRD->STKCOD", ""
~STKDES: 28, "", "STCRD->STKDES", ""
~L: 0, "", "STCRD->LOCCOD", ""
~QTY: 0, "qtyZ(7)", "STCRD->TRNQTY", ""
~TQUCOD: 9, "", "p_istab( STCRD->TQUCOD, 20, 1, 0 )", ""
~UNITPR: 0, "priZ(10)", "STCRD->UNITPR", ""
~DISC_I: 0, "", "STCRD->DISC", ""
~NETAMT_I: 0, "ZZ,ZZZ,ZZZ.ZZ", "STCRD->TRNVAL", ""
~SONUM_I: 0, "", "STCRD->RDOCNUM", ""
~REMARK: 0, "", "ARTRNRM->REMARK", ""
~MQTY: 0, "qtyZ(7)", "mqty", "mqty = STCRD->TRNQTY * STCRD->TFACTOR"
~MQUCOD: 0, "", "p_istab( STMAS->QUCOD, 20, 1, 0 )", ""
~NETAMT0: 0, "ZZ,ZZZ,ZZZ.ZZ", "amt0", "amt0=IIF(STCRD->VATCOD='0', STCRD->TRNVAL, 0); sumamt0 =sumamt0+amt0"
~NETAMT1: 0, "ZZ,ZZZ,ZZZ.ZZ", "amt1", "amt1=IIF(STCRD->VATCOD#'0', STCRD->TRNVAL, 0); sumamt1 =sumamt1+amt1"
~SUMAMT0: 0, "99,999,999.99", "sumamt0", ""
~SUMAMT1: 0, "99,999,999.99", "sumamt1", ""
~BY: 0, "", "p_isrun( ARRCPCQ->CHQNUM, ZR, 1, 0)", ""
~CHQNUM: 0, "", "chqnum", "chqnum= substr(ARRCPCQ->CHQNUM,3,8)"
~CHQDAT: 0, "", "BKTRN->CHQDAT", ""
~BNKCOD: 0, "", "p_istab( BKTRN->BNKCOD, 01, 0, 0)", ""
~AMOUNT_Q: 0, "ZZ,ZZZ,ZZZ.ZZ", "BKTRN->AMOUNT", ""
~REMAMT_Q: 0, "ZZ,ZZZ,ZZZ.ZZ", "BKTRN->REMAMT", ""
~RCVAMT_Q: 0, "ZZ,ZZZ,ZZZ.ZZ", "ARRCPCQ->RCVAMT", ""
~HREM1: 0, "", "p_hrem( A->DOCNUM,1,A->SONUM )", ""
~HREM2: 0, "", "p_hrem( A->DOCNUM,2,A->SONUM )", ""
~HREM3: 0, "", "p_hrem( A->DOCNUM,3,A->SONUM )", ""
~HREM4: 0, "", "p_hrem( A->DOCNUM,4,A->SONUM )", ""
~HREM5: 0, "", "p_hrem( A->DOCNUM,5,A->SONUM )", ""
~DEP: 0, "", "A->DEPCOD", ""
~P_ISDEP: 0, "", "p_isdep( A->DEPCOD )", ""
~LOCAREA: 0, "", "STLOC->AREA", ""
~RDOCNUM: 0, "", "so", "so = SUBSTR( STCRD->RDOCNUM,1,12)"
~NETAMT: 0, "99,999,999.99", "ARTRN->NETAMT", ""
~AMTRATZ: 0, "99,999,999.99", "AMTRATZ", "AMTRATZ = ARTRN->AMTRAT0 - (ARTRN->AMTRAT0 * ARTRN->DISCAMT / ARTRN->AMOUNT)"
~AMTRATX: 0, "99,999,999.99", "AMTRATX", "AMTRATX = IIF(ARTRN->FLGVAT='1',ARTRN->TOTAL - AMTRATZ - ARTRN->VATAMT, ARTRN->TOTAL - AMTRATZ)"
*~V: 0, "", "VAT_SYM", "VAT_SYM = IIF(STCRD->VATCOD='0', ' ', 'V')"
~V: 0, "", "STCRD->VATCOD", ""
~SHIPTO: 0, "", "ARTRN->SHIPTO", ""
~S_ADDR01: 0, "", "ARSHIP->ADDR01", ""
~S_ADDR02: 0, "", "ARSHIP->ADDR02", ""
~S_ADDR03: 0, "", "addr_03", "addr_03 = ARSHIP->ADDR03 - '•' - ARSHIP->ZIPCOD"
~S_TELNUM: 0, "", "ARSHIP->TELNUM", ""
~PRNBY: 0, "", "p_userid()", ""
~PRNDAT: 0, "", "@d_prndat()", ""
~PRNTIM: 0, "", "s_prntim()", ""
~PRNCNT: 0, "999", "@n_prncnt()", ""
~RECBY: 0, "", "A->USERID", ""