Download P 4 - a2

Transcript
|
|
|ordListClear()
|Set( _SET_PATH, cPathspec
|
|
[,
cPathspec1 ...
]
)
|
|
|ordListAdd( cIndex )
|ordListAdd( cIndex1 )
|...
|SET PRINTER ON
| OFF | xlToggle|
|
|
|Set( _SET_PRINTER, "ON"
|
|SET INTENSITY ON
| OFF |
xlToggle
|
| "OFF" | lToggle
)
|
|
|SET PRINTER TO
|
|
|Set( _SET_INTENSITY, "ON"
| "OFF" |
lToggle )
|
|
|Set( _SET_PRINTFILE, "" )
|
|
|SET KEY nInkeyCode
[TO]|
|
|SET PRINTER TO
|
|SetKey( nInkeyCode, NIL )
|
[xcDevice|xcFile [ADDITIVE]]|
|
|Set( _SET_PRINTFILE, cDevice|cFile, lAdditive )
|
|
|SET KEY nInkeyCode TO
[idProcedure]|
|
|SET RELATION TO
|
|
|SetKey( nInkeyCode, { |p, l, v| idProcedure(p, l, v)} )
|
|
|dbclearrelation()
|
|
|SET MARGIN TO
|
|
|SET RELATION TO
[expKey1
]|
] [, [TO]
INTO xcAlias1
expKey2 INTO xcAlias2 ...
|
|Set( _SET_MARGIN, 0 )
|
|
|
|SET MARGIN TO
|dbClearRel()
|
[nPageOffset]|
|
|dbSetRelation( cAlias1, {||expKey1},
|
|Set( _SET_MARGIN, nPageOffset )
|
["expKey1"]
)
|
["expKey1"]
)
|
|
|dbSetRelation( cAlias2, {||expKey2},
|
|SET MESSAGE TO
|
|
|SET RELATION TO
|
|Set( _SET_MESSAGE, 0 )
[ [TO]
֒→ ,
|
|
|
[nRow [CENTER | CENTRE]]|
|
)
|
["expKey1"]
)
|
|
|dbSetRelation( cAlias2, {||expKey2},
|SET SCOREBOARD ON
|
|
| OFF | xlToggle|
|
|Set( _SET_MCENTER, lCenter )
|Set( _SET_SCOREBOARD, "ON"
|
|
| "OFF" | lToggle
|
[nIndex]|
|SET SOFTSEEK ON
|
| OFF | xlToggle|
|
|ordSetFocus( nIndex )
|Set( _SET_SOFTSEEK, "ON"
|
|
| "OFF" | lToggle
|
|SET PATH TO
|SET TYPEAHEAD TO nKeyboardSise
|
|
|
|
|Set( _SET_PATH, "" )
|Set( _SET_TYPEAHEAD, nKeyboardSise )
|
[xcPathspec [,
["expKey1"]
|
|Set( _SET_MESSAGE, nRow )
|
|SET PATH TO
]
|dbSetRelation( cAlias1, {||expKey1},
|
|SET ORDER TO
]
INTO xcAlias1 ←֓
ADDITIVE
|
|
|Set( _SET_MCENTER, .F. )
|SET MESSAGE TO
[expKey1
expKey2 INTO xcAlias2 ...
|
cPathspec1 ...
1274
] ]|
|
|SET UNIQUE ON
| OFF | xlToggle|
1275
)
|
)
|