Informix 4gl function

mrhutoo發表於2013-10-30
ORMFunction
fgl_getenv('LOGTTY')
 
SET ISOLATION TO DIRTY     READ
SET ISOLATION TO COMMITTED READ
 
SET LOCK MODE TO WAIT
SET LOCK MODE TO WAIT 1
 
FGL_LASTKEY() = 2000    up
FGL_LASTKEY() = 2001    down
FGL_LASTKEY() = 2002    left
FGL_LASTKEY() = 2003    right
 
 
OPEN WINDOW w_name AT 15,9 WITH 2 ROWS, 60 COLUMNS ATTRIBUTE(BORDER,YELLOW)
 MENU ""
    COMMAND "A.doA" doA
    COMMAND "B.doB" doB
    COMMAND "C.doC" doC
    COMMAND "Esc"  EXIT MENU
 END MENU
 
 

來自 “ ITPUB部落格 ” ，連結：http://blog.itpub.net/24955184/viewspace-775385/，如需轉載，請註明出處，否則將追究法律責任。

相關文章