INPUT指令
说明: 1. 当程序执行到INPUT指令时,会将控制权交给用户,让用户输入数据。 2. 用户输入完字段的数据,会将数据回传给程序中的变量接收。 3. 只要执行到INPUT的指令,程序会将每个字段Default为NULL。
反之不需要将每个字段的值都变为NULL的话,需添加(WITHOUT DEFAULTS)
范例(cxrq005):
1、首先在MAIN函数前定义客制变量,用来接收用户数据;
#add-point:自定義模組變數-客製(Module Variable) name="global.variable_customerization"
TYPE type_g_input RECORD
xrsduc010 STRING,
xrsduc010_desc STRING,
xrsduc010_desc_1 STRING
END RECORD
DEFINE g_input type_g_input
#end add-point
以上这些变量,均对应规格上的控件代号进行定义;
2、在cxrq005 _ui_dialog()函数中的DIALOG ATTRIBUTES(UNBUFFERED,FIELD ORDER FORM)领域下自定义INPUT;
DIALOG ATTRIBUTES(UNBUFFERED,FIELD ORDER FORM)
#add-point:input段落 name="ui_dialog.input"
INPUT g_input.xrsduc010 FROM xrsduc010 ATTRIBUTE
好文阅读
发表评论