oracle form builder动态加栏位

参考同事的代码，创建了1~99item，动态赋值

app_folder.event('WHEN-NEW-BLOCK-INSTANCE');
DECLARE
P_NUM VARCHAR(3) := '0';
CURSOR CU_COLUMN IS
 SELECT COLUMN_NAME,
  NULLABLE
   FROM ALL_TAB_COLUMNS
  WHERE TABLE_NAME = upper('WST_INV_TRN_INTER_TMP')
  ORDER BY COLUMN_ID; --莉l  
BEGIN
IF UPPER(:PARAMETER.P_TABLE_DELE) ='SHOW' THEN
SET_ITEM_PROPERTY('WST_IMPORT_BUTTON_B.DELE',ENABLED,PROPERTY_TRUE);
SET_ITEM_PROPERTY(&