FORMS中 APP_FOLDER的使用

zhangjl218

在11i 版本中用户可以如下直接操作多行记录Folder块：
可以点击提示块的右边缘并拖拽来改变列的宽度
点击提示块的中间部分并拖拽到合适的位置，用来重新调整列的现实顺序；
通过点击提示块而不拖拽来对列的记录进行排序，只有最前的三列可以实现排序，第一次点击按该列的升序排列，下一次点击将按降序排列
通过右键点击提示来修改提示的信息
以上的操作也可以通过下拉式菜单或右键弹出菜单来设置。

具体用法：
一、模板制作：YSFOLDER.FMB打开TEMPLATE.FMB，如果打开的是APPSTAND.FMB，以下步骤省略：1、FORM级触发器：

1、 在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个字符

2、 增加FORM级触发器：FOLDER_ACTION， PL/SQL代码如下：

app_folder.event(:global.folder_action);

3、 增加FORM级触发器：FOLDER_RETURN_ACTION， PL/SQL代码如下：

null;

--

-- action codeis in :global.folder_action

-- affectedfield is in :global.folder_field

--

2、Attached Libraries：

       添加文件：APPFLDR.PLL

       来源：ERP安装目录下，AU目录下查找该类文件所在的目录

3、Object Groups

       继承一个对象组：STANDARD_FOLDER

       做法：复制APPSTAND.FMB中的同名对象，粘贴到模板对象组中，选择“Refence”（继承），路径方式选择“Remove path”（不要路经）。

       结果：将会把对象组中的所有对象映射添加到相应的对象节点中。

二、模板例子的制作

1、 修改WHEN-NEW-FORM-INSTANCE中文件夹数据块定义语句中的参数，确定对象名称（一般为form对象名称）、文件夹数据块名称、标题块名称、堆叠画布名称、窗口名称。

2、 定义窗口（windows），win_main：继承属性WINDOW_NORMAL

3、 定义堆叠画布（stacked canvas-views）, cv_detail_stacked：继承属性类CANVAS_STACKED

4、 定义文件夹数据块（folder block），blk_detail：继承属性类BLOCK

（1）      触发器：

·        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');

（2）     定义数据项，可以是表项，也可以是非基表项，确定哪些项需要放在堆叠画布上，注意只有在堆叠画布上的项才能使用文件夹功能

（3）     注意：数据项的类型不能是：Display Item、List Item等；

可以是：Text Item、Check Box等；

如果打开folder时出现错误：“Set_Item_Property没有这样的属性”，说明erp标准程序中用到的属性在个别项中不存在，出现几次就有几个缺乏这个属性的Item；是否拥有这个属性，是由Item的类型确定的，因此有些Item类型不能用于folder功能。

（4）      确定各个项在画布中的位置

5、 定义标题数据块（prompt block）, blk_detail_prompt：继承属性类BLOCK_DIALOG

便捷的做法：先复制文件夹数据块blk_detail，改名称，再删去新块下的全部触发器，然后除去不需要的项，修改剩下所有项的属性继承FOLDER_PROMPT_MULTRIROW，最后将各个项的default value属性值写入对应的中文或英文标题

（1）      触发器：无

（2）      标题项，来自文件夹数据块blk_detail，属性继承自FOLDER_PROMPT_MULTIROW，default value属性值写入相应的中英文标题

标题项必须和参与folder功能的数据项保持一一对应，名称必须一致

（3）      文件夹功能项（6个）：

·        FOLDER_OPEN：属性继承FOLDER_OPEN

Canvas: CV_MAIN

·        FOLDER_TITLE：属性继承DYNAMIC_TITLE

Canvas: CV_MAIN

·        ORDER_BY1、ORDER_BY2、ORDER_BY3：

属性：

继承FOLDER_ORDERBY

                                       触发器：

WHEN-BUTTON-PRESSED:

     APP_FOLDER.EVENT('TOGGLE-ORDER-BY');

Canvas: CV_DETAIL_STACKED

                            FOLDER_OPEN、FOLDER_TITLE可见，放置在堆叠画布的左上位置

（4）      确定各个项在画布上的位置

（5）      注意：在文件夹数据块中，项的初始宽度由同名的标题项的宽度确定，而且只有存在标题项的文件夹数据项才能使用文件夹功能。设计时，应该将文件夹数据块中项的宽度与标题块中项的宽度保持一致。

（6）      如果文件夹数据块在第一个窗口，可能会出现初次进入窗口标题项没有显示的现象，需要在form级触发器when-new-form-instance中，在导航到控制块之前，先将导航到标题块，例如：

…

GO_BLOCK(‘BLK_DETAIL_PROMPT’);

GO_BLOCK(‘BLOCKCONTROL’);

                     (7)Q&A

三、基于模板的开发过程

       1．模板名：XZ_FOLDER.fmb

       2．模板说明：

2.1 APP_FOLDER.DEFINE_FOLDER_BLOCK参数说明

       'XZ_FOLDER'àMODULE NAME　，表单名称

'BLK_DETAIL'àFOLDER数据块名称

'BLK_DETAIL_PROMPT'àFOLDER标题块名称

'CAVSTACK'àFOLDER数据块所在画布

'WINFOLDER'à FOLDER数据块所在画布所属的窗口

       2.2数据块

2.2.1 BLK_DETAILàFOLDER数据块

2.2.2 BLK_DETAIL_PROMPTàFOLDER标题块

              其中的：FOLDER_OPEN、FOLDER_TITLE、ORDER_BY1、ORDER_BY2、ORDER_BY3，不用动。

       2.3画布

'CAVSTACK'àFOLDER数据块所在画布,堆叠类型

              'CAVMAIN'àcontent类型， CAVSTACK堆叠在其上边。

       2.4窗口

    3修改过程

3.1修改form级触发器WHEN-NEW-FORM-INSTANCE：APP_FOLDER.DEFINE_FOLDER_BLOCK('XZ_FOLDER','BLK_DETAIL','BLK_DETAIL_PROMPT','CAVSTACK','WINFOLDER','ENABLED');

在模板xz_folder.fmb基础上开发程序时，把‘XZ_FOLDER’替换为自己的表单名即可。

3.2修改数据块BLK_DETAIL，在模板块的基础上改数据源，增删数据项

3.3修改数据块BLK_DETAIL_ PROMPT在模板块的基础上增删项,与BLK_DETAIL中的项一一对应。

3.4调整画布输出及大小格式

lingang881001

有点乱！！能不能再细致点呀 ！！！！