Truncate extra decimal places for dBASE compatibility
SET PCPICTURE ON | OFF | (<expL>)
@...SAY, APPEND, CEILING(), CHANGE, CREATE SCREEN, DB_FOXPLUSBUGS, DB_FOXPROKEYS, DB_SAMBA, EDIT, EDITFIELD(), FILETYPE(), FLOOR(), FMT(), INDEXEXT(), MODIFY SCREEN, ROUND(), SET CLIPPER, SET CLIPPER5, SET COMPATIBLE, SET EDITFIELD, SET FILECASE, SET FILETYPE, SET FORMAT, SET INDEXEXT, SET MEMOEXT, SET PCEDIT, SET PCEXACT, SET PCFILTER, SET PCGRAPHICS, SET PCKEYS, SET PCLOCKING, SET PCSAYS, SET PCUNIQUE
The SET PCPICTURE command allows for dBASE compatibility with the handling of the decimal portion of numeric data in picture statements. When PCPICTURE is set ON, if a picture statement has fewer decimal places than the actual variable or field, the extra decimal places are truncated. If PCPICTURE is OFF, then the numeric data is properly rounded. This command has been added to aid in the porting of applications that use this feature. By default, PCPICTURE is OFF.
num = 34.675 set pcpicture on @ 0,0 say num picture "99.9" 34.6 set pcpicture off @ 0,0 say num picture "99.9" 34.7
Recital Server, Recital