FIELD-SYMBOLS: <fs> [<type>]为内部字段定义field-symbols .
当不输入<type>时,<fs>继承赋给它的变量的所有属性
当输入<type>时,赋给它的变量必须与<fs>同类型
例如: (说明:用户日期格式为dd.mm.yyyy)
FIELD-SYMBOLS: <f1> .
DATA: dat(8) VALUE '19950916' .
ASSIGN dat TO <f1> .
WRITE:/ <f1> .
<f1>继承dat属性,为C型,输出为: 19950916
FIELD-SYMBOLS: <f1> TYPE d.
DATA: dat(8) VALUE '19950916' .
ASSIGN dat TO <f1> .
WRITE:/ <f1> .
<f1>类型为D型,而dat为C型,类型不匹配,出现语法错误
FIELD-SYMBOLS: <f1> TYPE d.
DATA: dat(8) VALUE '19950916' .
ASSIGN dat TO <f1> TYPE 'D' .
WRITE:/ <f1> .
<f1>类型为D型,而dat为C型,类型不匹配,但TYPE ‘D’是将dat类型转换成D型再分配给<f1>
输出为:16091995