生成选择屏幕代码选择屏幕编码自动生成,编号自动+1,参考字段已经在配置中知道,因此生成选择屏幕没有问题。把选择条件字段内容都存放到一个表中,比如为selopt事件检查部分此处我们不关心,只有配置相关内容,才会涉及到。start-of-selection部分调用Function,先用程序名+变量名把选择屏幕中的内容清空concatenate'('rtmode-sscrreport')'l_selnameintol_name.(程序名)变量名assign(l_name)to<l_rangetab>.Ifsy-<l_rangetab>.,通过指针方式,修改程序内存变量,把SP$00001-SP$00…赋上值。-kind='P'.concatenate'('rtmode-sscrreport')'selopt-selnameintol_name.//用指针指向内存中的数据assign(l_name)to<l_parameter>.ifsy-subrc=0.//把内容赋值到内存中<l_parameter>=selopt-low..-kind='S'andselopt-sign<>'('rtmode-sscrreport')'selopt-selnameintol_name.//用指针指向内存中的数据assign(l_name)to<l_range>.ifsy-subrc=0.//要放入的内表concatenate'('rtmode-sscrreport')'selopt-selname'[]'into
Query生成程序思想 来自淘豆网www.taodocs.com转载请标明出处.