*       *********************************************************
*       *                                                         
*       * 27/01/2010            FDSALE3.SPR              06:44:21 
*       *                                                         
*       *********************************************************
*       *                                                         
*       * Author's Name                                           
*       *                                                         
*       * Copyright (c) 2010 Company Name                         
*       * Address                                                 
*       * City,     Zip                                           
*       *                                                         
*       * Description:                                            
*       * This program was automatically generated by GENSCRN.    
*       *                                                         
*       *********************************************************


#REGION 0
REGIONAL m.currarea, m.talkstat, m.compstat

IF SET("TALK") = "ON"
	SET TALK OFF
	m.talkstat = "ON"
ELSE
	m.talkstat = "OFF"
ENDIF
m.compstat = SET("COMPATIBLE")
SET COMPATIBLE FOXPLUS

m.rborder = SET("READBORDER")
SET READBORDER ON

m.currarea = SELECT()


*       *********************************************************
*       *                                                         
*       *               Windows Window definitions                
*       *                                                         
*       *********************************************************
*

IF NOT WEXIST("foodsale") ;
	OR UPPER(WTITLE("FOODSALE")) == "FOODSALE.PJX" ;
	OR UPPER(WTITLE("FOODSALE")) == "FOODSALE.SCX" ;
	OR UPPER(WTITLE("FOODSALE")) == "FOODSALE.MNX" ;
	OR UPPER(WTITLE("FOODSALE")) == "FOODSALE.PRG" ;
	OR UPPER(WTITLE("FOODSALE")) == "FOODSALE.FRX" ;
	OR UPPER(WTITLE("FOODSALE")) == "FOODSALE.QPR"
	DEFINE WINDOW foodsale ;
		AT  0.000, 0.000  ;
		SIZE 39.692,127.333 ;
		FONT "MS Sans Serif", 8 ;
		NOFLOAT ;
		NOCLOSE ;
		NOMINIMIZE ;
		SYSTEM ;
		COLOR RGB(,,,192,192,192)
	MOVE WINDOW foodsale CENTER
ENDIF


*       *********************************************************
*       *                                                         
*       *         FDSALE3/Windows Setup Code - SECTION 2          
*       *                                                         
*       *********************************************************
*

#REGION 1
cfScr4Pos='FOODSALE'
nfHelp_Pos = 0
If m.Mshow=1
	ffHelp_Fd  = .T.  && เปิดการใช้งานชั่วคราว
Else
	ffHelp_Fd  = .F.  && ปิดการใช้งานชั่วคราว
Endif



*       *********************************************************
*       *                                                         
*       *              FDSALE3/Windows Screen Layout              
*       *                                                         
*       *********************************************************
*

#REGION 1
IF WVISIBLE("foodsale")
	ACTIVATE WINDOW foodsale SAME
ELSE
	ACTIVATE WINDOW foodsale NOSHOW
ENDIF
@ 1.462,2.333 GET m.nTableSH1 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(1) ;
	VALID VTBBOTT(1)
@ 1.462,11.833 GET m.nTableSH11 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(11) ;
	VALID VTBBOTT(11)
@ 1.462,21.333 GET m.nTableSH21 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(21) ;
	VALID VTBBOTT(21)
@ 1.462,30.833 GET m.nTableSH31 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(31) ;
	VALID VTBBOTT(31)
@ 1.462,40.500 GET m.nTableSH41 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(41) ;
	VALID VTBBOTT(41)
@ 1.462,50.000 GET m.nTableSH51 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(51) ;
	VALID VTBBOTT(51)
@ 1.462,59.667 GET m.nTableSH61 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(61) ;
	VALID VTBBOTT(61)
@ 2.462,72.833 SAY Iif(Empty(mFlag1),'','รายละเอียด') ;
	SIZE 1.000,32.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	COLOR RGB(0,0,0,192,192,192)
@ 2.462,102.833 SAY Iif(Empty(mFlag1),'','จำนวน') ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 2.462,110.833 SAY Iif(Empty(mFlag1),'','จำนวนเงิน') ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 3.538,2.333 GET m.nTableSH2 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(2) ;
	VALID VTBBOTT(2)
@ 3.538,11.833 GET m.nTableSH12 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(12) ;
	VALID VTBBOTT(12)
@ 3.538,21.333 GET m.nTableSH22 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(22) ;
	VALID VTBBOTT(22)
@ 3.538,30.833 GET m.nTableSH32 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(32) ;
	VALID VTBBOTT(32)
@ 3.538,40.500 GET m.nTableSH42 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(42) ;
	VALID VTBBOTT(42)
@ 3.538,50.000 GET m.nTableSH52 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(52) ;
	VALID VTBBOTT(52)
@ 3.538,59.667 GET m.nTableSH62 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(62) ;
	VALID VTBBOTT(62)
@ 3.692,69.333 SAY mId1 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 3.692,72.833 SAY Alltrim(mpluname1)+'  '+Alltrim(mPlucode1) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 3.692,102.833 SAY mqty1 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 3.692,110.833 SAY mPrice1 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 3.692,121.667 SAY mFlag1 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 4.923,69.333 SAY mId2 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 4.923,72.833 SAY Alltrim(mpluname2)+'  '+Alltrim(mPlucode2) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 4.923,102.833 SAY mqty2 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 4.923,110.833 SAY mPrice2 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 4.923,121.667 SAY mFlag2 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 5.615,2.333 GET m.nTableSH3 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(3) ;
	VALID VTBBOTT(3)
@ 5.615,11.833 GET m.nTableSH13 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(13) ;
	VALID VTBBOTT(13)
@ 5.615,21.333 GET m.nTableSH23 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(23) ;
	VALID VTBBOTT(23)
@ 5.615,30.833 GET m.nTableSH33 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(33) ;
	VALID VTBBOTT(33)
@ 5.615,40.500 GET m.nTableSH43 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(43) ;
	VALID VTBBOTT(43)
@ 5.615,50.000 GET m.nTableSH53 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(53) ;
	VALID VTBBOTT(53)
@ 5.615,59.667 GET m.nTableSH63 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(63) ;
	VALID VTBBOTT(63)
@ 6.154,69.333 SAY mId3 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 6.154,72.833 SAY Alltrim(mpluname3)+'  '+Alltrim(mPlucode3) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 6.154,102.833 SAY mqty3 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 6.154,110.833 SAY mPrice3 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 6.154,121.667 SAY mFlag3 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 7.385,69.333 SAY mId4 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 7.385,72.833 SAY Alltrim(mpluname4)+'  '+Alltrim(mPlucode4) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 7.385,102.833 SAY mqty4 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 7.385,110.833 SAY mPrice4 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 7.385,121.667 SAY mFlag4 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 7.692,2.333 GET m.nTableSH4 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(4) ;
	VALID VTBBOTT(4)
@ 7.692,11.833 GET m.nTableSH14 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(14) ;
	VALID VTBBOTT(14)
@ 7.692,21.333 GET m.nTableSH24 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(24) ;
	VALID VTBBOTT(24)
@ 7.692,30.833 GET m.nTableSH34 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(34) ;
	VALID VTBBOTT(34)
@ 7.692,40.500 GET m.nTableSH44 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(44) ;
	VALID VTBBOTT(44)
@ 7.692,50.000 GET m.nTableSH54 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(54) ;
	VALID VTBBOTT(54)
@ 7.692,59.667 GET m.nTableSH64 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(64) ;
	VALID VTBBOTT(64)
@ 8.615,69.333 SAY mId5 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 8.615,72.833 SAY Alltrim(mpluname5)+'  '+Alltrim(mPlucode5) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 8.615,102.833 SAY mqty5 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 8.615,110.833 SAY mPrice5 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 8.615,121.667 SAY mFlag5 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 9.769,2.333 GET m.nTableSH5 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(5) ;
	VALID VTBBOTT(5)
@ 9.769,11.833 GET m.nTableSH15 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(15) ;
	VALID VTBBOTT(15)
@ 9.769,21.333 GET m.nTableSH25 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(25) ;
	VALID VTBBOTT(25)
@ 9.769,30.833 GET m.nTableSH35 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(35) ;
	VALID VTBBOTT(35)
@ 9.769,40.500 GET m.nTableSH45 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(45) ;
	VALID VTBBOTT(45)
@ 9.769,50.000 GET m.nTableSH55 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(55) ;
	VALID VTBBOTT(55)
@ 9.769,59.667 GET m.nTableSH65 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(65) ;
	VALID VTBBOTT(65)
@ 9.846,69.333 SAY mId6 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 9.846,72.833 SAY Alltrim(mpluname6)+'  '+Alltrim(mPlucode6) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 9.846,102.833 SAY mqty6 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 9.846,110.833 SAY mPrice6 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 9.846,121.667 SAY mFlag6 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 11.077,69.333 SAY mId7 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 11.077,72.833 SAY Alltrim(mpluname7)+'  '+Alltrim(mPlucode7) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 11.077,102.833 SAY mqty7 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 11.077,110.833 SAY mPrice7 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 11.077,121.667 SAY mFlag7 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 11.846,2.333 GET m.nTableSH6 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(6) ;
	VALID VTBBOTT(6)
@ 11.846,11.833 GET m.nTableSH16 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(16) ;
	VALID VTBBOTT(16)
@ 11.846,21.333 GET m.nTableSH26 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(26) ;
	VALID VTBBOTT(26)
@ 11.846,30.833 GET m.nTableSH36 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(36) ;
	VALID VTBBOTT(36)
@ 11.846,40.500 GET m.nTableSH46 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(46) ;
	VALID VTBBOTT(46)
@ 11.846,50.000 GET m.nTableSH56 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(56) ;
	VALID VTBBOTT(56)
@ 11.846,59.667 GET m.nTableSH66 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(66) ;
	VALID VTBBOTT(66)
@ 12.308,69.333 SAY mId8 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 12.308,72.833 SAY Alltrim(mpluname8)+'  '+Alltrim(mPlucode8) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 12.308,102.833 SAY mqty8 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 12.308,110.833 SAY mPrice8 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 12.308,121.667 SAY mFlag8 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 13.538,69.333 SAY mId9 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 13.538,72.833 SAY Alltrim(mpluname9)+'  '+Alltrim(mPlucode9) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 13.538,102.833 SAY mqty9 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 13.538,110.833 SAY mPrice9 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 13.538,121.667 SAY mFlag9 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 13.923,2.333 GET m.nTableSH7 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(7) ;
	VALID VTBBOTT(7)
@ 13.923,11.833 GET m.nTableSH17 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(17) ;
	VALID VTBBOTT(17)
@ 13.923,21.333 GET m.nTableSH27 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(27) ;
	VALID VTBBOTT(27)
@ 13.923,30.833 GET m.nTableSH37 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(37) ;
	VALID VTBBOTT(37)
@ 13.923,40.500 GET m.nTableSH47 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(47) ;
	VALID VTBBOTT(47)
@ 13.923,50.000 GET m.nTableSH57 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(57) ;
	VALID VTBBOTT(57)
@ 13.923,59.667 GET m.nTableSH67 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(67) ;
	VALID VTBBOTT(67)
@ 14.769,69.333 SAY mId10 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 14.769,72.833 SAY Alltrim(mpluname10)+'  '+Alltrim(mPlucode10) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 14.769,102.833 SAY mqty10 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 14.769,110.833 SAY mPrice10 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 14.769,121.667 SAY mFlag10 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 16.000,69.333 SAY mId11 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 16.000,72.833 SAY Alltrim(mpluname11)+'  '+Alltrim(mPlucode11) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 16.000,102.833 SAY mqty11 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 16.000,110.833 SAY mPrice11 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 16.000,121.667 SAY mFlag11 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 16.000,2.333 GET m.nTableSH8 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(8) ;
	VALID VTBBOTT(8)
@ 16.000,11.833 GET m.nTableSH18 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(18) ;
	VALID VTBBOTT(18)
@ 16.000,21.333 GET m.nTableSH28 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(28) ;
	VALID VTBBOTT(28)
@ 16.000,30.833 GET m.nTableSH38 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(38) ;
	VALID VTBBOTT(38)
@ 16.000,40.500 GET m.nTableSH48 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(48) ;
	VALID VTBBOTT(48)
@ 16.000,50.000 GET m.nTableSH58 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(58) ;
	VALID VTBBOTT(58)
@ 16.000,59.667 GET m.nTableSH68 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(68) ;
	VALID VTBBOTT(68)
@ 17.231,69.333 SAY mId12 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 17.231,72.833 SAY Alltrim(mpluname12)+'  '+Alltrim(mPlucode12) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 17.231,102.833 SAY mqty12 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 17.231,110.833 SAY mPrice12 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 17.231,121.667 SAY mFlag12 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 18.077,2.333 GET m.nTableSH9 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(9) ;
	VALID VTBBOTT(9)
@ 18.077,11.833 GET m.nTableSH19 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(19) ;
	VALID VTBBOTT(19)
@ 18.077,21.333 GET m.nTableSH29 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(29) ;
	VALID VTBBOTT(29)
@ 18.077,30.833 GET m.nTableSH39 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(39) ;
	VALID VTBBOTT(39)
@ 18.077,40.500 GET m.nTableSH49 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(49) ;
	VALID VTBBOTT(49)
@ 18.077,50.000 GET m.nTableSH59 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(59) ;
	VALID VTBBOTT(59)
@ 18.077,59.667 GET m.nTableSH69 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(69) ;
	VALID VTBBOTT(69)
@ 18.462,69.333 SAY mId13 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 18.462,72.833 SAY Alltrim(mpluname13)+'  '+Alltrim(mPlucode13) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 18.462,102.833 SAY mqty13 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 18.462,110.833 SAY mPrice13 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 18.462,121.667 SAY mFlag13 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 19.692,69.333 SAY mId14 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 19.692,72.833 SAY Alltrim(mpluname14)+'  '+Alltrim(mPlucode14) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 19.692,102.833 SAY mqty14 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 19.692,110.833 SAY mPrice14 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 19.692,121.667 SAY mFlag14 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 20.154,2.333 GET m.nTableSH10 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(10) ;
	VALID VTBBOTT(10)
@ 20.154,11.833 GET m.nTableSH20 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(20) ;
	VALID VTBBOTT(20)
@ 20.154,21.333 GET m.nTableSH30 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(30) ;
	VALID VTBBOTT(30)
@ 20.154,30.833 GET m.nTableSH40 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(40) ;
	VALID VTBBOTT(40)
@ 20.154,40.500 GET m.nTableSH50 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(50) ;
	VALID VTBBOTT(50)
@ 20.154,50.000 GET m.nTableSH60 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(60) ;
	VALID VTBBOTT(6)
@ 20.154,59.667 GET m.nTableSH70 ;
	PICTURE "@*VN .         ." ;
	SIZE 1.923,7.143,0.154 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN ffHelp_Fd .and. Empty(mqty15)  .and. WTBBOTT(70) ;
	VALID VTBBOTT(70)
@ 20.923,69.333 SAY mId15 ;
	SIZE 1.000,2.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 20.923,72.833 SAY Alltrim(mpluname15)+'  '+Alltrim(mPlucode15) ;
	SIZE 1.000,37.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 20.923,102.833 SAY mqty15 ;
	SIZE 1.000,5.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(0,0,0,192,192,192)
@ 20.923,110.833 SAY mPrice15 ;
	SIZE 1.000,8.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 20.923,121.667 SAY mFlag15 ;
	SIZE 1.000,3.500 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(0,0,0,192,192,192)
@ 23.077,2.667 SAY Upper(Alltrim(m.nfTabshow))+'  ==> '+Alltrim(m.Tabledesc) ;
	SIZE 1.000,26.556 ;
	FONT "MS Sans Serif", 12 ;
	STYLE "B" ;
	COLOR RGB(0,0,128,192,192,192)
@ 23.077,69.167 SAY ''+SayTxtPlus() ;
	SIZE 1.000,14.556 ;
	FONT "MS Sans Serif", 14 ;
	COLOR RGB(0,0,0,192,192,192)
@ 23.077,86.167 SAY Iif(Empty(m.nfTotal),'',Transform(m.nfTotal,mps4sum)) ;
	SIZE 1.000,25.000 ;
	FONT "MS Sans Serif", 14 ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 25.154,3.000 SAY m.cfSaleshow+Iif(Empty(m.Refno),'',' Ref. '+m.Refno) ;
	SIZE 1.000,47.714 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	COLOR RGB(128,0,128,192,192,192)
@ 26.692,3.000 SAY m.cfMemshow ;
	SIZE 1.000,40.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	COLOR RGB(128,0,128,192,192,192)
@ 26.692,51.667 SAY Alltrim(m.cfDisper)+' '+Alltrim(m.cfDisbaht)+' '+Alltrim(m.cfChgper)+' '+Alltrim(m.cfChgbaht) ;
	SIZE 1.000,61.571 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 27.692,104.833 SAY m.cfChange ;
	SIZE 1.000,16.000 ;
	FONT "MS Sans Serif", 10 ;
	STYLE "B" ;
	COLOR RGB(128,0,0,192,192,192)
@ 27.846,20.833 SAY m.cfCouponshow ;
	SIZE 1.000,7.667 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(255,0,0,192,192,192)
@ 27.846,29.500 SAY m.nfCoupon ;
	SIZE 1.000,10.000 ;
	FONT "MS Sans Serif", 8 ;
	PICTURE "@BZ 999,999.99" ;
	COLOR RGB(255,0,0,192,192,192)
@ 27.846,40.500 SAY m.cfCreditshow ;
	SIZE 1.000,8.500 ;
	FONT "MS Sans Serif", 8 ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 27.846,49.833 SAY m.nfCredit ;
	SIZE 1.000,10.500 ;
	FONT "MS Sans Serif", 8 ;
	PICTURE "@BZ &mps4sum" ;
	COLOR RGB(255,0,0,192,192,192)
@ 27.846,61.667 SAY m.cfDebtshow ;
	SIZE 1.000,9.333 ;
	FONT "MS Sans Serif", 8 ;
	COLOR RGB(255,0,0,192,192,192)
@ 27.846,70.167 SAY m.nfDebt ;
	SIZE 1.000,10.167 ;
	FONT "MS Sans Serif", 8 ;
	PICTURE "@BZ &mps4sum" ;
	COLOR RGB(255,0,0,192,192,192)
@ 27.846,81.500 SAY m.cfCashsw ;
	SIZE 1.000,10.333 ;
	FONT "MS Sans Serif", 8 ;
	PICTURE "@J" ;
	COLOR RGB(255,0,0,192,192,192)
@ 27.846,92.833 SAY m.nfCash ;
	SIZE 1.000,11.167 ;
	FONT "MS Sans Serif", 8 ;
	PICTURE "@BZ &mps4sum" ;
	COLOR RGB(255,0,0,192,192,192)
@ 29.538,2.167 GET m.B_Possale ;
	PICTURE "@*BHN " + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) + ";" + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) + ";" + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) + ";" + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) + ";" + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) + ";" + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) ;
	SIZE 3.231,8.500,0.167 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	WHEN m.mShow=1 ;
	VALID _2up0eg0lo() ;
	DISABLE
@ 30.077,58.000 SAY m.cfScnshow ;
	SIZE 1.000,21.857 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	COLOR RGB(0,0,0,192,192,192)
@ 32.077,102.833 SAY m.cfCashshow ;
	SIZE 1.000,14.143 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	COLOR RGB(0,0,0,192,192,192)
@ 32.846,2.167 GET m.H1_Possale ;
	PICTURE "@*HN CODE;พนักงาน;สมาชิก;ลด %;ลดบาท;ของแถม" ;
	SIZE 1.154,7.286,0.143 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN .F.
@ 33.462,102.833 SAY 'Date:'+m.nfDateshow ;
	SIZE 1.000,14.714 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	COLOR RGB(0,0,0,192,192,192)
@ 34.308,2.167 GET m.C_Possale ;
	PICTURE "@*BHN " + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) + ";" + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) + ";" + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) + ";" + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) + ";" + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) + ";" + ;
		(LOCFILE("empty.bmp","BMP|ICO|PCT|ICN","Where is empty?")) ;
	SIZE 3.231,8.500,0.167 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	WHEN m.mShow=1 ;
	VALID _2up0eg0ma() ;
	DISABLE
@ 34.846,103.000 SAY Iif(m.Tabledesc='เก็บเงิน','No:'+m.nfNoshow,'') ;
	SIZE 1.000,13.714 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	COLOR RGB(0,0,128,192,192,192)
@ 36.231,102.833 SAY m.showword ;
	SIZE 1.000,18.429 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	COLOR RGB(128,0,128,192,192,192)
@ 37.615,2.167 GET m.H2_Possale ;
	PICTURE "@*HN LOCK;ลิ้นชัก;แบบเต็ม;เครดิต;เงินเชื่อ;เงินสด" ;
	SIZE 1.154,7.286,0.143 ;
	DEFAULT 1 ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	WHEN .F.
@ 37.692,102.833 GET m.event_run ;
	SIZE 1.000,18.286 ;
	DEFAULT " " ;
	FONT "MS Sans Serif", 8 ;
	STYLE "B" ;
	PICTURE "@K xxxxxxxxxxxxxxxxxxxxxxxxx" ;
	WHEN m.mShow=0 .and. EventSet() ;
	VALID eventvalid() ;
	COLOR ,RGB(128,0,128,255,255,255)

IF NOT WVISIBLE("foodsale")
	ACTIVATE WINDOW foodsale
ENDIF

READ CYCLE ;
	VALID ReadVaPos() ;
	WHEN WFoodSale() .and. OpTableSH() ;
	ACTIVATE EventAcPos() ;
	DEACTIVATE EventDec() ;
	SHOW _2up0eg0md()

RELEASE WINDOW foodsale
SELECT (m.currarea)


#REGION 0

SET READBORDER &rborder

IF m.talkstat = "ON"
	SET TALK ON
ENDIF
IF m.compstat = "ON"
	SET COMPATIBLE ON
ENDIF


*       *********************************************************
*       *                                                         
*       *              FDSALE3/Windows Cleanup Code               
*       *                                                         
*       *********************************************************
*

#REGION 1
Do SetEnterNr In \Pos\Security\Prog\Sec4Prog.Prg



*       *********************************************************
*       *                                                         
*       *  FDSALE3/Windows Supporting Procedures and Functions    
*       *                                                         
*       *********************************************************
*

#REGION 1
Function WFoodSale
Do WhenPosWin
Do BorderSay With 'FoodSale',''
Do ShPSBott With 0 In KeySet
Return


************
Procedure BorderSay &&  แสดง 2 กรอบ แบบนูน
Parameter cfWindow,cfMess2Win
************
Private nfWClrSay,nfWClrStp,nfPosiRow,nfPosiCol
nfWClrSay = 0.5
nfWClrStp = 0.3
If WCols(cfWindow) > 80
	nfPosiRow =	Wrows(cfWindow)-3.00
Else
	nfPosiRow =	Wrows(cfWindow)-6.75
Endif
nfPosiCol = WCols(cfWindow)-13
nfPosi21  = 16.3
nfPosi20  = 4.8+4.9


*** กรอบนอก
@ nfWClrSay,nfWClrSay TO nfWClrSay,Wcols(cfWindow)-nfWClrSay PEN 1,8 STYLE "1" COLOR RGB(128,128,128,128,128,128)  && 1
@ nfWClrSay,nfWClrSay TO Wrows(cfWindow)-nfWClrSay,nfWClrSay PEN 1,8 COLOR RGB(128,128,128,128,128,128)  && 1
@ nfWClrSay,Wcols(cfWindow)-nfWClrSay TO Wrows(cfWindow)-nfWClrSay,Wcols(cfWindow)-nfWClrSay PEN 1,8 STYLE "1" ;
	COLOR RGB(255,255,255,255,255,255)  && 2
@ Wrows(cfWindow)-nfWClrSay,nfWClrSay TO Wrows(cfWindow)-nfWClrSay,Wcols(cfWindow)-nfWClrSay PEN 1,8 COLOR RGB(255,255,255,255,255,255)  && 2
*** กรอบใน
@ nfWClrSay+nfWClrStp,nfWClrSay+nfWClrStp TO nfWClrSay+nfWClrStp,Wcols(cfWindow)-nfWClrSay-nfWClrStp PEN 1,8 STYLE "1" COLOR RGB(255,255,255,255,255,255)  && 2
@ nfWClrSay+nfWClrStp,nfWClrSay+nfWClrStp TO Wrows(cfWindow)-nfWClrSay-nfWClrStp,nfWClrSay+nfWClrStp PEN 1,8 COLOR RGB(255,255,255,255,255,255)  && 2
@ nfWClrSay+nfWClrStp,Wcols(cfWindow)-nfWClrSay-nfWClrStp TO Wrows(cfWindow)-nfWClrSay-nfWClrStp,Wcols(cfWindow)-nfWClrSay-nfWClrStp PEN 1,8 STYLE "1" COLOR RGB(128,128,128,128,128,128)  && 1
@ Wrows(cfWindow)-nfWClrSay-nfWClrStp,nfWClrSay+nfWClrStp TO Wrows(cfWindow)-nfWClrSay-nfWClrStp,Wcols(cfWindow)-nfWClrSay-nfWClrStp PEN 1,8 COLOR RGB(128,128,128,128,128,128)  && 1


*** กรอบใน-2
@ Wrows(cfWindow)-nfWClrSay-nfWClrStp-nfPosi21,nfWClrSay+nfWClrStp TO Wrows(cfWindow)-nfWClrSay-nfWClrStp-nfPosi21,Wcols(cfWindow)-nfWClrSay-nfWClrStp PEN 1,8 COLOR RGB(255,255,255,255,255,255)  && 1
@ Wrows(cfWindow)-nfWClrSay-(2*nfWClrStp)-nfPosi21,nfWClrSay+nfWClrStp TO Wrows(cfWindow)-nfWClrSay-(2*nfWClrStp)-nfPosi21,Wcols(cfWindow)-nfWClrSay-nfWClrStp PEN 1,8 COLOR RGB(128,128,128,128,128,128)  && 1
*** ลบช่อง
@ Wrows(cfWindow)-nfWClrSay-(2*nfWClrStp)-nfPosi21+0.1,nfWClrSay+nfWClrStp Clear To Wrows(cfWindow)-nfWClrSay-nfWClrStp-nfPosi21,nfWClrSay+nfWClrStp+2
@ Wrows(cfWindow)-nfWClrSay-(2*nfWClrStp)-nfPosi21+0.1,Wcols(cfWindow)-nfWClrSay-nfWClrStp Clear To Wrows(cfWindow)-nfWClrSay-nfWClrStp-nfPosi21,Wcols(cfWindow)-nfWClrSay-nfWClrStp+0.1

*** กรอบใน-3
@ Wrows(cfWindow)-nfWClrSay-nfWClrStp-nfPosi20,nfWClrSay+nfWClrStp TO Wrows(cfWindow)-nfWClrSay-nfWClrStp-nfPosi20,Wcols(cfWindow)-nfWClrSay-nfWClrStp PEN 1,8 COLOR RGB(128,128,128,128,128,128)  && 1
@ Wrows(cfWindow)-nfWClrSay-(2*nfWClrStp)-nfPosi20,nfWClrSay+nfWClrStp TO Wrows(cfWindow)-nfWClrSay-(2*nfWClrStp)-nfPosi20,Wcols(cfWindow)-nfWClrSay-nfWClrStp PEN 1,8 COLOR RGB(255,255,255,255,255,255)  && 1
*** ลบช่อง
@ Wrows(cfWindow)-nfWClrSay-(2*nfWClrStp)-nfPosi20+0.1,nfWClrSay+nfWClrStp Clear To Wrows(cfWindow)-nfWClrSay-nfWClrStp-nfPosi20,nfWClrSay+nfWClrStp+2
@ Wrows(cfWindow)-nfWClrSay-(2*nfWClrStp)-nfPosi20+0.1,Wcols(cfWindow)-nfWClrSay-nfWClrStp Clear To Wrows(cfWindow)-nfWClrSay-nfWClrStp-nfPosi20,Wcols(cfWindow)-nfWClrSay-nfWClrStp+0.1
*** คำพูด
If !Empty(cfMess2Win)
	@ nfPosiRow,nfPosiCol TO nfPosiRow+1.984,nfPosiCol+10.857 PATTERN 1 PEN 2, 8 STYLE "16" COLOR RGB(255,255,255,0,0,255)
	@ nfPosiRow+0.154,nfPosiCol+2.000 SAY cfMess2Win FONT "MS Sans Serif", 14 STYLE "BT" COLOR RGB(255,255,255,,,,)
Endif
Return









*       *********************************************************
*       *                                                         
*       * _2UP0EG0LO           m.B_Possale VALID                  
*       *                                                         
*       * Function Origin:                                        
*       *                                                         
*       * From Platform:       Windows                            
*       * From Screen:         FDSALE3,     Record Number:  165   
*       * Variable:            m.B_Possale                        
*       * Called By:           VALID Clause                       
*       * Object Type:         Push Button                        
*       * Snippet Number:      1                                  
*       *                                                         
*       *********************************************************
*
FUNCTION _2up0eg0lo     &&  m.B_Possale VALID
#REGION 1
Do BOTOfKey With 1,1 In SetBotPs.Prg

*       *********************************************************
*       *                                                         
*       * _2UP0EG0MA           m.C_Possale VALID                  
*       *                                                         
*       * Function Origin:                                        
*       *                                                         
*       * From Platform:       Windows                            
*       * From Screen:         FDSALE3,     Record Number:  170   
*       * Variable:            m.C_Possale                        
*       * Called By:           VALID Clause                       
*       * Object Type:         Push Button                        
*       * Snippet Number:      2                                  
*       *                                                         
*       *********************************************************
*
FUNCTION _2up0eg0ma     &&  m.C_Possale VALID
#REGION 1
Do BOTOfKey With 1,2 In SetBotPs.Prg

*       *********************************************************
*       *                                                         
*       * _2UP0EG0MD           Read Level Show                    
*       *                                                         
*       * Function Origin:                                        
*       *                                                         
*       *                                                         
*       * From Platform:       Windows                            
*       * From Screen:         FDSALE3                            
*       * Called By:           READ Statement                     
*       * Snippet Number:      3                                  
*       *                                                         
*       *********************************************************
*
FUNCTION _2up0eg0md     && Read Level Show
PRIVATE currwind
STORE WOUTPUT() TO currwind
*
* Show Code from screen: FDSALE3
*
#REGION 1
IF SYS(2016) = "FOODSALE" OR SYS(2016) = "*"
	ACTIVATE WINDOW foodsale SAME
	@ 2.462,72.833 SAY Iif(Empty(mFlag1),'','รายละเอียด') ;
		SIZE 1.000,32.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 2.462,102.833 SAY Iif(Empty(mFlag1),'','จำนวน') ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 2.462,110.833 SAY Iif(Empty(mFlag1),'','จำนวนเงิน') ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 3.692,69.333 SAY mId1 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 3.692,72.833 SAY Alltrim(mpluname1)+'  '+Alltrim(mPlucode1) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 3.692,102.833 SAY mqty1 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 3.692,110.833 SAY mPrice1 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 3.692,121.667 SAY mFlag1 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 4.923,69.333 SAY mId2 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 4.923,72.833 SAY Alltrim(mpluname2)+'  '+Alltrim(mPlucode2) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 4.923,102.833 SAY mqty2 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 4.923,110.833 SAY mPrice2 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 4.923,121.667 SAY mFlag2 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 6.154,69.333 SAY mId3 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 6.154,72.833 SAY Alltrim(mpluname3)+'  '+Alltrim(mPlucode3) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 6.154,102.833 SAY mqty3 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 6.154,110.833 SAY mPrice3 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 6.154,121.667 SAY mFlag3 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 7.385,69.333 SAY mId4 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 7.385,72.833 SAY Alltrim(mpluname4)+'  '+Alltrim(mPlucode4) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 7.385,102.833 SAY mqty4 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 7.385,110.833 SAY mPrice4 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 7.385,121.667 SAY mFlag4 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 8.615,69.333 SAY mId5 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 8.615,72.833 SAY Alltrim(mpluname5)+'  '+Alltrim(mPlucode5) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 8.615,102.833 SAY mqty5 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 8.615,110.833 SAY mPrice5 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 8.615,121.667 SAY mFlag5 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 9.846,69.333 SAY mId6 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 9.846,72.833 SAY Alltrim(mpluname6)+'  '+Alltrim(mPlucode6) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 9.846,102.833 SAY mqty6 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 9.846,110.833 SAY mPrice6 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 9.846,121.667 SAY mFlag6 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 11.077,69.333 SAY mId7 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 11.077,72.833 SAY Alltrim(mpluname7)+'  '+Alltrim(mPlucode7) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 11.077,102.833 SAY mqty7 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 11.077,110.833 SAY mPrice7 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 11.077,121.667 SAY mFlag7 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 12.308,69.333 SAY mId8 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 12.308,72.833 SAY Alltrim(mpluname8)+'  '+Alltrim(mPlucode8) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 12.308,102.833 SAY mqty8 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 12.308,110.833 SAY mPrice8 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 12.308,121.667 SAY mFlag8 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 13.538,69.333 SAY mId9 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 13.538,72.833 SAY Alltrim(mpluname9)+'  '+Alltrim(mPlucode9) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 13.538,102.833 SAY mqty9 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 13.538,110.833 SAY mPrice9 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 13.538,121.667 SAY mFlag9 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 14.769,69.333 SAY mId10 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 14.769,72.833 SAY Alltrim(mpluname10)+'  '+Alltrim(mPlucode10) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 14.769,102.833 SAY mqty10 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 14.769,110.833 SAY mPrice10 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 14.769,121.667 SAY mFlag10 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 16.000,69.333 SAY mId11 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 16.000,72.833 SAY Alltrim(mpluname11)+'  '+Alltrim(mPlucode11) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 16.000,102.833 SAY mqty11 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 16.000,110.833 SAY mPrice11 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 16.000,121.667 SAY mFlag11 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 17.231,69.333 SAY mId12 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 17.231,72.833 SAY Alltrim(mpluname12)+'  '+Alltrim(mPlucode12) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 17.231,102.833 SAY mqty12 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 17.231,110.833 SAY mPrice12 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 17.231,121.667 SAY mFlag12 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 18.462,69.333 SAY mId13 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 18.462,72.833 SAY Alltrim(mpluname13)+'  '+Alltrim(mPlucode13) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 18.462,102.833 SAY mqty13 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 18.462,110.833 SAY mPrice13 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 18.462,121.667 SAY mFlag13 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 19.692,69.333 SAY mId14 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 19.692,72.833 SAY Alltrim(mpluname14)+'  '+Alltrim(mPlucode14) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 19.692,102.833 SAY mqty14 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 19.692,110.833 SAY mPrice14 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 19.692,121.667 SAY mFlag14 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 20.923,69.333 SAY mId15 ;
		SIZE 1.000,2.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 20.923,72.833 SAY Alltrim(mpluname15)+'  '+Alltrim(mPlucode15) ;
		SIZE 1.000,37.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 20.923,102.833 SAY mqty15 ;
		SIZE 1.000,5.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 20.923,110.833 SAY mPrice15 ;
		SIZE 1.000,8.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 20.923,121.667 SAY mFlag15 ;
		SIZE 1.000,3.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 23.077,2.667 SAY Upper(Alltrim(m.nfTabshow))+'  ==> '+Alltrim(m.Tabledesc) ;
		SIZE 1.000,26.556, 0.000 ;
		FONT "MS Sans Serif", 12 ;
		STYLE "B" ;
		COLOR RGB(0,0,128,192,192,192)
	@ 23.077,69.167 SAY ''+SayTxtPlus() ;
		SIZE 1.000,14.556, 0.000 ;
		FONT "MS Sans Serif", 14 ;
		COLOR RGB(0,0,0,192,192,192)
	@ 23.077,86.167 SAY Iif(Empty(m.nfTotal),'',Transform(m.nfTotal,mps4sum)) ;
		SIZE 1.000,25.000, 0.000 ;
		FONT "MS Sans Serif", 14 ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 25.154,3.000 SAY m.cfSaleshow+Iif(Empty(m.Refno),'',' Ref. '+m.Refno) ;
		SIZE 1.000,47.714, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		COLOR RGB(128,0,128,192,192,192)
	@ 26.692,3.000 SAY m.cfMemshow ;
		SIZE 1.000,40.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		COLOR RGB(128,0,128,192,192,192)
	@ 26.692,51.667 SAY Alltrim(m.cfDisper)+' '+Alltrim(m.cfDisbaht)+' '+Alltrim(m.cfChgper)+' '+Alltrim(m.cfChgbaht) ;
		SIZE 1.000,61.571, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 27.692,104.833 SAY m.cfChange ;
		SIZE 1.000,16.000, 0.000 ;
		FONT "MS Sans Serif", 10 ;
		STYLE "B" ;
		COLOR RGB(128,0,0,192,192,192)
	@ 27.846,20.833 SAY m.cfCouponshow ;
		SIZE 1.000,7.667, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(255,0,0,192,192,192)
	@ 27.846,29.500 SAY m.nfCoupon ;
		SIZE 1.000,10.000, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		PICTURE "@BZ 999,999.99" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 27.846,40.500 SAY m.cfCreditshow ;
		SIZE 1.000,8.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 27.846,49.833 SAY m.nfCredit ;
		SIZE 1.000,10.500, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		PICTURE "@BZ &mps4sum" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 27.846,61.667 SAY m.cfDebtshow ;
		SIZE 1.000,9.333, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		COLOR RGB(255,0,0,192,192,192)
	@ 27.846,70.167 SAY m.nfDebt ;
		SIZE 1.000,10.167, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		PICTURE "@BZ &mps4sum" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 27.846,81.500 SAY m.cfCashsw ;
		SIZE 1.000,10.333, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		PICTURE "@J" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 27.846,92.833 SAY m.nfCash ;
		SIZE 1.000,11.167, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		PICTURE "@BZ &mps4sum" ;
		COLOR RGB(255,0,0,192,192,192)
	@ 30.077,58.000 SAY m.cfScnshow ;
		SIZE 1.000,21.857, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 32.077,102.833 SAY m.cfCashshow ;
		SIZE 1.000,14.143, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 33.462,102.833 SAY 'Date:'+m.nfDateshow ;
		SIZE 1.000,14.714, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		COLOR RGB(0,0,0,192,192,192)
	@ 34.846,103.000 SAY Iif(m.Tabledesc='เก็บเงิน','No:'+m.nfNoshow,'') ;
		SIZE 1.000,13.714, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		COLOR RGB(0,0,128,192,192,192)
	@ 36.231,102.833 SAY m.showword ;
		SIZE 1.000,18.429, 0.000 ;
		FONT "MS Sans Serif", 8 ;
		STYLE "B" ;
		COLOR RGB(128,0,128,192,192,192)
ENDIF
IF NOT EMPTY(currwind)
	ACTIVATE WINDOW (currwind) SAME
ENDIF