将字体从大写更改为小写

来自ArcoWiki
跳转至: 导航搜索
DMIS Intrinsic Functions

From 3.6 it has been implemented the Standard DMIS Intrinsic functions to convert to Lower and Upper case the strings to be sent to output or written to a file.
The functions are per the standard as per the following example:

DECL/CHAR,100,ORIGINAL,UPPER_CASE,LOWER_CASE,TMP
ORIGINAL=ASSIGN/'This is Upper AND Lower CASE'
UPPER_CASE=ASSIGN/UPC(ORIGINAL)
LOWER_CASE=ASSIGN/LWC(ORIGINAL)

V(TEXT)=VFORM/ALL
DISPLY/TERM,V(TEXT)
TMP=ASSIGN/CONCAT('This is the original: ',ORIGINAL)
TEXT/OUTFIL,TMP
TEXT/OUTFIL,' '
TMP=ASSIGN/CONCAT('This is the UPPER CASE version: ',UPPER_CASE)
TEXT/OUTFIL,TMP
TEXT/OUTFIL,' '
TMP=ASSIGN/CONCAT('This is the lower case version: ',LOWER_CASE)
TEXT/OUTFIL,TMP
TEXT/OUTFIL,' '
DISPLY/OFF