生产模板使用说明.docx

资源描述

生产模板使用说明.docx

《生产模板使用说明.docx》由会员分享，可在线阅读，更多相关《生产模板使用说明.docx（19页珍藏版）》请在冰豆网上搜索。

生产模板使用说明.docx

生产模板使用说明

一、FORM级触发器

1、WHEN-NEW-FORM-INSTANCE复制到新建的模块中

DECLARE

WL_WIN_TITLEVARCHAR2（100）;

BEGIN

--一级关联，若该功能是被其他功能关联调用，则屏蔽本模块的“关联”共能

IF:

PARAMETER.WC_USE_ID='1'THEN

SHOW_BTN_OFF（'FUNCTION'）;

ENDIF;

--最大化窗口

MAX_WIN;

--居中窗口（对于小窗口使用，使该功能居中显示）

--SHOW_WINDOW_CENTERED（'TEST_WIN'）;

--用于关联窗口调用的关联窗口名称

PARAMETER.WC_FORM_COD:

='PP_COMMON';

--封闭工具条上的无用按钮

--SET_QUERY_BUT;

--取该功能的程序名称和标题名称

SELECTMAX（ITEM_LABEL0）,

MAX（ITEM_LABEL0）||'（'||ITEM_OBJECT||'）'||'------['||:

GLOBAL.OPER_NAM||']'INTO:

PARAMETER.WC_FORM_NAM,WL_WIN_TITLE

FROMS_MNU_ITEMS

WHEREITEM_OBJECT=UPPER（:

PARAMETER.WC_FORM_COD）;

--当该功能是被其他程序调用时，不用上面语句，用下面的两条语句

--:

PARAMETER.WC_FORM_NAM:

='';

--WL_WIN_TITLE:

PARAMETER.WC_FORM_NAM||'（'||ITEM_OBJECT||'）'||'------['

||:

GLOBAL.OPER_NAM||']';

--设置窗口的标题（规则：

功能模块名称（FORM名称）------[操作员]）

set_window_property（'TEST_WIN',TITLE,WL_WIN_TITLE）;

END;

2、WHEN-WINDOW-ACTIVATED引用到新建的模块中

作用：

关闭本功能“关联”的活动窗口

3、ON-ERROR引用到新建的模块中

作用：

转换程序中的不友好的错误信息提示（英文中文）

4、ON-MESSAGE引用到新建的模块中

作用：

转换程序中的不友好的信息提示（英文中文）

5、KEY-HELP引用到新建的模块中

作用：

按F1键，弹出该共能的帮助文档

二、警告

引用到新建的程序中

名称

标题

信息

警告风格

按钮1

按钮2

按钮3

缺省按钮

E_01_ALT

错误信息

停止

按钮1

C_02_ALT

警告信息

是否保存输入的数据

警告

继续

放弃

按钮1

C_03_ALT

警告信息

是否保存输入的数据

警告

保存

退出

取消

按钮1

N_01_ALT

提示信息

提示

按钮1

三、附加的程序库

1、PP_LIBRARY项目组级程序库

2、COMLIB部门级程序库

附加程序库就是附加动态链接库，里面存放着一些常用的外部函数，附加上程序库后，在设计中就可以应用这些函数。

附加程序库中内容祥见《程序单元库》。

使用方法：

选择所有附加的程序库，会出现提示“要删除此路径吗？

”，选择“是”是相对引用，

选择“否”是绝对引用。

相对引用的情况下，程序库和程序的相对位置不变，不影响

程序运行，一般采用“相对引用”。

绝对引用的情况下，要求程序库存放的路径不能变，

否则会影响程序的运行。

四、数据块

1、TOOLBAR_BLK引用到新建的程序中

包括：

增加（A）、删除（D）、查询（Q）、编辑（E）、打印（P）、提交（S）、

退出（C）、上页（U）、下页（N）、帮助（H）、关联（F）、疑难（Y）。

2、CTL_BLK复制到新建的程序中

⑴PRE_TEXT_ITEM

作用：

用于改变当前项的显示属性（显示属性类：

current_item_att），用户可以根据需要去选择

不同的显示属性类。

declare

wl_fieldvarchar2（60）;

begin

wl_field:

system.current_block||'.'||:

system.current_item;

set_item_property（wl_field,visual_attribute,'current_item_att'）;

end;

⑵POSE_TEXT_ITEM

作用：

用于改变非当前项的显示属性。

declare

wl_fieldvarchar2（60）;

begin

wl_field:

system.current_block||'.'||:

system.current_item;

--对于单记录块，屏幕字段（前景色是蓝色）

set_item_property（wl_field,visual_attribute,'SCR_TXT_ATT'）;

--对于单记录块，数据库字段（前景色是黑色）

--set_item_property（wl_field,visual_attribute,'NORMAL_TEXT_ATT'）;

end;

⑶KEY-UP、KEY-DOWN

BEGIN

NULL;--封闭键盘上的向上箭头/向下箭头，避免记录上滚/下滚

END;

3、排序数据块

作用：

用于对多记录的数据块进行排序。

命名规则：

块

块名

项名

多记录数据块

表名（或视图名）_BLK

字段名称

相应的排序块

表名（或视图名）

字段名称

使用方法：

在排序数据块建立块级触发器WHEN-BUTTON-PRESSED写下下面的代码

begin

f_util.sort_button_pressed（'多记录数据块块名'）;

end;

五、画布

1、TOOLBAR_CAN引用到新建的程序中

作用：

存放工具条的画布

2、MAIN_CAN引用到新建的程序中

作用：

存放应用功能对象的画布，有两种规格

属性类：

WINDOW_LARGE_CLA795*541大窗口

WINDOW_SMALL_CLA494*371小窗口

六、编辑器

STD_EDT类型：

用户命名的编辑器标题：

应用编辑器

使用方法：

在需要使用编辑器的项上根据情况，在不同的触发器上编写以下代码，调用编辑器。

（双击WHEN-MOUSE-DOUBLECLICK）

法一：

begin

edit_textitem;

end;

法二：

--编辑器属性‘标题：

编辑器--货物描述’

‘宽度：

210’

‘高度：

150’

‘显示垂直滚动条：

是’

--应用编辑器

declare

valvarchar2（200）;--临时变量，用于存放编辑内容，长度同数据项的长度

ed_okboolean;

begin

val:

b_cancel_sheet.cargo_desc;--块b_cancel_sheet项cargo_desc

--编辑器名edit_cargo_desc--定义编辑器显示的位置（200，200）

show_editor（'edit_cargo_desc',val,200,200,val,ed_ok）;

--接收编辑器内的内容

b_cancel_sheet.cargo_desc:

=val;

end;

七、对象组

对象组名称

包含的对象

对象类别

使用

方法

说明

必须引用的对象

WHEN-WINDOW-ACTIVATED

ON-ERROR

ON-MESSAGE

KEY-HELP

FORM级触发器

引用

E_01_ALT

C_02_ALT

C_03_ALT

N_01_ALT

警告

TOOLBAR_BLK

工具条数据块

引用

TOOLBAR_CAN

画布

STD_EDT

编辑器

WC_FORM_COD

WC_FORM_NAM

WC_USE_ID

参数

PROC_TOOLBAR_HELP

PROC_TOOLBAR_FUNCTION

PROC_TOOLBAR_QUESTION

工具条用程序单元

SET_QUERY_BUT

排序用程序单元

所有的属性类

属性类

所有的视觉属性

视觉属性

TEST_WIN

窗口

必须复制的对象

WHEN-NEW-FORM-INSTANCE

FORM级触发器

复制

CTL_BLK

控制块

MAIN_CAN

主画布

PROC_VALIDATION

无操作

PROC_TOOLBAR_INSERT

PROC_TOOLBAR_DELETE

PROC_TOOLBAR_QUERY

PROC_TOOLBAR_UPDATE

PROC_TOOLBAR_PRINT

PROC_TOOLBAR_SAVE

PROC_TOOLBAR_EXIT

工具条用程序单元

SET_QUERY_BUT

屏蔽工具条按钮

班次的开始结束时间

PROC_CLASS_TIM

引用

班次选择

PROC_CLASS_SELECT

PROC_CLASS_SELECT_LOV

程序单元

引用

CLASS_ID_LOV

LOV

CLASS_ID_REC

记录组

WC_CLASS_ID

参数

生效时间段显示

FUNC_DATE

程序单元

引用

记录组和LOV

常用的LOV和记录组

复制

根据需要复制

八、参数

参数名称

类型

使用方法

说明

WC_FORM_COD

VARCHAR2（10）

引用

FORM的英文名称

WC_FORM_NAM

VARCHAR2（100）

引用

FORM对应的功能名称

WC_USE_ID

VARCHAR2

（1）

引用

关联按钮的屏蔽

九、弹出式菜单复制到新建的程序中

DECLARE

WL_FORM_NAMVARCHAR2（20）;

WL_OPER_TYPVARCHAR2

（2）;

BEGIN

WL_FORM_NAM:

='PPSI1745';

ifid_null（find_form（WL_FORM_NAM））then

--È¡¸Ã¹¦ÄÜµÄ³ÌÐòÃû³ÆºÍ²Ù×÷È¨ÏÞ（Í¨¹ý°´Å¥»òµ¯³öÊ½²Ëµ¥µ÷ÓÃ）

BEGIN

SELECTMAX（ITEM_LABEL0）,MAX（USE_ID）

INTO:

GLOBAL.FORM_NAM,WL_OPER_TYP

FROMS_MNU_ALL

WHEREAUTH_COD=:

GLOBAL.AUTH_CODAND

ITEM_OBJECT=WL_FORM_NAM;

Exception

whenno_data_foundthen--Ã»ÓÐÕÒµ½Êý¾Ý

WL_OPER_TYP:

PARAMETER.WC_OPER_TYP;

END;

GLOBAL.FORM_COD:

=WL_FORM_NAM;

OPEN_MY_FORM6（'PPSI1745','WC_FUNC_COD','Öµ1',

'WC_ITEM_COD','Öµ2',

'WC_FORM_COD',WL_FORM_NAM,

'WC_OPER_TYP',WL_OPER_TYP,

'WC_USE_ID','1',

NULL,NULL）;

else

--Èô¸Ã´°¿ÚÒÑ´ò¿ª£¬Ôò°Ñ½¹µã×ªÒÆµ½¸Ã´°¿ÚÉÏ

go_form（WL_FORM_NAM）;

endif;

END;

十、程序单元

程序单元类似于用户自定义函数，在此你可以编写程序单元，在编写应用脚本时可以引用。

对应的程序单元

使用方法

说明

PROC_TOOLBAR_INSERT

复制

增加

遇到特殊的情况需要在相应的按钮上，根据该模块的业务情况编写代码，此时的按钮对应的程序单元应该“复制”，而不是“引用”

一般情况下，复制到新程序中，不需要改代码

PROC_TOOLBAR_DELETE

复制

删除

PROC_TOOLBAR_QUERY

复制

查询

PROC_TOOLBAR_UPDATE

复制

修改

PROC_TOOLBAR_PRINT

复制

打印

PROC_TOOLBAR_SAVE

复制

提交

PROC_TOOLBAR_EXIT

复制

退出

PROC_TOOLBAR_HELP

引用

帮助

不能修改代码，只能引用

PROC_TOOLBAR_FUNCTION

引用

关联

PROC_TOOLBAR_QUESTION

引用

疑难

PROC_VALIDATION

复制

当最关闭程序的过程中需要特殊控制的，可以修改此代码

SET_QUERY_BUT

复制

在查询、打印和统计模块中，用于封闭不需要的工具条按钮

SET_BLOCK_ORDER

引用

在多记录块中，用于对字段排序

十一、属性类

属性类是属性的集合。

它用于将多个属性集合到同一个对象中，然后我们可以将该属性类赋给给某对象，此时对象会基础

该属性类的属性设置，从而建立符合自己要求的界面和功能标准。

cb_date日期按钮（带上下箭头）

toolbar_btn_cla工具条按钮

func_btn_cla功能按钮

button_cla标签按钮

display_format_cla显示项（单记录）

display_item_cla显示项（单记录）

display_items_cla显示项（多记录）（自2002年4月1日起停止使用）

form_claFORM

oth_text_item_cla屏幕字段（单记录）

text_item_cla数据库字段（多记录）

sinage_item_cla数据库字段（单记录）

unmodt_item_cla数据库字段（单记录）（不可修改项，但可以进入）

checkbox_cla检查框

poplist_cla列表项（单记录）

poplists_cla列表项（多记录）

window_cla窗口（最大化窗口）

window_large_cla画布（最大化画布）

small_window_cla窗口（小窗口）

small_can_cla画布（小画布）

base_item_cla基本项属性（单记录可修改项字体、大小）

base_items_cla基本项属性（多记录可修改项字体、大小）

display_base_item_cla基本项属性（显示项字体、大小）

base_color_cla基本项属性（可修改项颜色）

display_base_color_cla基本项属性（显示项颜色）

十二、视觉属性

名称

前景色

背景色

填充

图案

字体

名称

字体

大小

字体

粗细

说明

current_rec_att

white

darkgreen

transparent

宋体

半粗细

当前记录、提示

currebt_item_att

中

当前项（单记录块）

list_current_att

blue

yellow

当前列表项

normal_text_att

black

white

细体

非当前项（数据字段）

disp_text_att

Gray

显示项

SCR_TXT_ATT

blue

white

非当前项（屏幕字段）

十三、窗口

test_win标题：

锦港集团样板程序主画布：

test_can水平工具条画布：

toolbar_can

子类信息：

----属性类名称：

window_cla----模块：

PP_common

十四、全局变量

序号

名称

值

说明

UNIT_COD

单位代码

UNIT_NAM

单位名称

SUBUNIT_COD

部门（科室）代码

SUBUNIT_NAM

部门（科室）名称

OPER_COD

操作员代码

OPER_NAM

操作员姓名

AUTH_COD

操作权限代码

HOME_PATH

安装路径（从注册表中读取）

COMPUTERNAME

用户计算机名

WORK_WIN

用户当前工作窗口名称

ENG_CHI_ID

提示信息设置（英文版）

CHI_ENG_ID

提示信息设置（中文版）

INI_FILE_NAME

配置文件名称

BAK_INI_FILE

备份配置文件名称

ORACLE_USER

使用单位（配置文件）

PORT_NAME

港名（配置文件）

USER_NAME

用户名（ORACLE用户名称）

USER_PASS

口令（ORACLE用户口令）

WLK_USERNAME

MSG

系统提示设置（ON-ERROR、ON-MESSAGE）

QUIT_FUNC

退出模块时，把所有关联的窗口关闭

QUIT_ALL

退出系统时，把所有打开的窗口关闭

十五、公用模块调用

1、范本代码（PPSI1745）

传入参数：

参数名称

规格

说明

WC_FUNC_COD

VARCHAR2（10）

对应范本代码中的功能代码

WC_ITEM_COD

VARCHAR2（10）

对应范本代码中的项目代码

注意：

1、用户不能更改范本代码的“功能代码”标志和“项目代码”代码标志，名称可以修改。

2、用户可以修改范本内容。

3、用户不能全部删除范本内容。

调用语句：

DECLARE

WL_FORM_NAMVARCHAR2（20）;

BEGIN

WL_FORM_NAM:

='PPSI1745';

Ifid_null（find_form（WL_FORM_NAM））then

OPEN_MY_FORM（'PPSI1745','WC_FUNC_COD','值1',

'WC_ITEM_COD','值2',

'WC_USE_ID','1'）;

else

--若该窗口已打开，则把焦点转移到该窗口上

go_form（WL_FORM_NAM）;

endif;

END;

2、关联功能（PPSI0120）

传入参数：

参数名称

规格

说明

WC_FORM_COD

VARCHAR2（10）

本功能程序名称（:

PARAMETER.WC_FORM_COD）

注意：

1、系统自动调用，不需要用户干预。

2、用户需要在“功能调用关系对照表维护（PPSI0110）”中设置功能模块之间的关联关系即可。

调用语句：

PROCEDUREPROC_TOOLBAR_FUNCTIONIS

WL_FORM_NAMVARCHAR2（10）;

BEGIN

--调用共享模块（PPSI0120）

WL_FORM_NAM:

='PPSI0120';

ifid_null（find_form（WL_FORM_NAM））then

OPEN_MY_FORM（'PPSI0120','WC_FORM_COD',:

PARAMETER.WC_FORM_COD,NULL,NULL,NULL,NULL）;else

--若该窗口已打开，则把焦点转移到该窗口上

go_form（WL_FORM_NAM）;

endif;

END;

3、疑难问题记录（PPSI9100）

传入参数：

参数名称

规格

说明

WC_FORM_COD

VARCHAR2（10）

程序名称（:

PARAMETER.WC_FORM_COD）

WC_FORM_NAM

VARCHAR2（50）

功能名称（:

PARAMETER.WC_FORM_NAM）

WC_USE_ID

VARCHAR2

（1）

注意：

1、系统自动调用，不需要用户干预。

2、用户需要在“功能调用关系对照表维护（PPSI0110）”中设置功能模块之间的关联关系即可。

调用语句：

PROCEDUREPROC_TOOLBAR_FUNCTIONIS

WL_FORM_NAMVARCHAR2（10）;

BEGIN

--调用共享模块（PPSI9100）

WL_FORM_NAM:

='PPSI9100';

Ifid_null（find_form（WL_FORM_NAM））then

OPEN_MY_FORM（'PPSI9100','WC_FORM_COD',:

PARAMETER.WC_FORM_COD,

'WC_FORM_NAM',:

PARAMETER.WC_FORM_NAM,

'WC_USE_ID','1'）;

Else

--若该窗口已打开，则把焦点转移到该窗口上

go_form（WL_FORM_NAM）;

Endif;

END;

共享程序单元

1、

PROCEDUREITEM_NULL_VALIDATION（WC_ITEM_CODVARCHAR2,

WC_ITEM_TXTVARCHAR2,

WC_MESSAGE_TXTVARCHAR2）IS

--判断某项是否为空，为空则跳转到该项

--规格：

ITEM_NULL_VALIDATION（项名，项内容，提示内容）；

ITEM_IDITEM;

BEGIN

ITEM_ID:

=FIND_ITEM（WC_ITEM_COD）;

IFWC_ITEM_TXTISNULLTHEN

MESSAGE（WC_MESSAGE_TXT）;

GO_ITEM（ITEM_ID）;

RAISEFORM_TRIGGER_FAILURE;

ENDIF;

END;

十六、公用列值

1、与船有关的

预报船

锚地船

在港船

离港船

所有船

船型

船公司

船主

代理公司

展开阅读全文