forms开发中folder(文件夹)功能的使用.docVIP

FORMS开发中FOLDER（文件夹）功能的应用 一、模板制作：YSFOLDER.FMB 打开TEMPLATE.FMB，如果打开的是APPSTAND.FMB，以下步骤省略： 1、FORM级触发器： 在WHEN-NEW-FORM-INSTANCE后面添加以下代码： --定义文件夹数据块 app_folder.define_folder_block object_name DETAILBLOCK _FOLDER , folder_block_name DETAILBLOCK, prompt_block_name DETAILBLOCK_PROMPT, folder_canvas_name DETAILBLOCK_STACKED, folder_window_name BLOCKNAME, disabled_functions ; --以上参数均为VARCHAR2,长度不得超过20个字符 增加FORM级触发器：FOLDER_ACTION， PL/SQL代码如下： app_folder.event :global.folder_action ; 增加FORM级触发器：FOLDER_RETURN_ACTION， PL/SQL代码如下： null; -- -- action code is in :global.folder_action -- affected field is in :global.folder_field -- 2、Attached Libraries： 添加文件：APPFLDR.PLL 来源：ERP安装目录下，AU目录下查找该类文件所在的目录 3、Object Groups 继承一个对象组：STANDARD_FOLDER 做法：复制APPSTAND.FMB中的同名对象，粘贴到模板对象组中，选择“Refence”（继承），路径方式选择“Remove path”（不要路经）。 结果：将会把对象组中的所有对象映射添加到相应的对象节点中。 二、模板例子的制作 修改WHEN-NEW-FORM-INSTANCE中文件夹数据块定义语句中的参数，确定对象名称（一般为form对象名称）、文件夹数据块名称、标题块名称、堆叠画布名称、窗口名称。 定义窗口（windows），win_main：继承属性WINDOW_NORMAL 定义堆叠画布（stacked canvas-views）, cv_detail_stacked：继承属性类CANVAS_STACKED 定义文件夹数据块（folder block），blk_detail：继承属性类BLOCK 触发器： KEY-EXEQRY： app_folder.event KEY-EXEQRY ; KEY-NEXT-ITEM app_folder.event KEY-NEXT-ITEM ; KEY-PREV-ITEM app_folder.event KEY-PREV-ITEM ; POST-BLOCK app_folder.event POST-BLOCK ; PRE-BLOCK app_folder.event PRE-BLOCK ; WHEN-NEW-BLOCK-INSTANCE App_folder.event WHEN-NEW-BLOCK-INSTANCE ; KEY_CLRBLK App_folder.event KEY_CLRBLK ; KEY_ENTQRY App_folder.event KEY_ENTQRY ; KEY_NXTREC App_folder.event KEY_NXTREC ; KEY_PRVREC App_folder.event KEY_PRVREC ; PRE_QUERY App_folder.event PRE_QUERY ; WHEN-NEW-RECORD-INSTANCE App_folder.event WHEN-NEW-RECORD-INSTANCE ; 定义数据项，可以是表项，也可以是非基表项，确定哪些项需要放在堆叠画布上，注意只有在堆叠画布上的项才能使用文件夹功能 注意：数据项的类型不能是：Display Item、List Item等； 可以是：Text Item、Check Box等； 如果打开folder时出现错误：“Set_Item_Property没有这样的属性”，说明erp标准程序中用到的属性在个别项中不存在，出现几次就有几个缺乏这个属性的Item；是否拥有这个属性，是由Item的类型确定的，因此有些Item类型不能用于folder功能。 确定各个项在画布中的位置 定义标题数据块（prompt block）, blk_detail_prompt：继承属性类BLOCK_D