文件名
语法
AddNewIcon(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN): INTEGER
参数
w - 窗口句柄
pc - ProfileConfigEventRec
返回
无
副作用
无
说明
当用户单击“添加图标”按钮或用户从图标条预览添加一个新图标时调用它。
调用的对话框窗体
无
文件名
语法
AddNewMenu(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN):INTEGER
参数
w - 窗口句柄
pc - ProfileConfigEventRec
返回
无
副作用
无
说明
当用户单击“添加菜单”按钮或用户从菜单条预览添加一个新菜单时调用它。
调用的对话框窗体
无
文件名
语法
AddNewRowToLastMenuColumn(VAL column: INTEGER, VAL menu_number: INTEGER, REF menuList: LIST OF MenuBarRecord)
参数
column - 插入<新行>的列
menuNumber - 要添加的菜单项个数
menuList - 要向其添加项的菜单列表
返回
整数
副作用
无
说明
只有在前一列的最后一行不是新行时,在前一列的最后一行后插入一个新行。
调用的对话框窗体
无
文件名
语法
AddOrEditIconForList(VAL w: Window, REF pc: ProfileConfigEventRec, VAL mode: STRING, VAL fromPreview: BOOLEAN )
参数
w - 窗口句柄
pc - ProfileConfigEventRec
mode - 添加或编辑
返回
无
副作用
无
说明
本过程向图标条列表添加一个图标。当用户正在添加一个新的概要文件时调用本过程,所以 profile_id 和 modify_datetimes 仍是未知的。
调用的对话框窗体
无
文件名
语法
AddOrEditMenuColumnFromPreview(VAL w: WINDOW, VAL viewMenuData: ViewMenuItemEventRec): INTEGER
参数
w - 窗口句柄
viewMenuData - viewMenuItemEventRec
返回
无
副作用
无
说明
当从预览添加一个菜单列时调用它。
调用的对话框窗体
无
文件名
语法
AddToMenuList(VAL menuText: STRING, VAL menuNumber: INTEGER, REF menuList: LIST OF MenuBarRecord)
参数
menuText - 要添加的菜单项文本
menuNumber - 要添加的菜单项个数
menuList - 要向其添加项的菜单列表
返回
menuList - 更新过的菜单项列表
副作用
无
说明
本函数向菜单列表添加一个菜单项。
调用的对话框窗体
无
文件名
语法
AddToProfileAssignList(VAL w: Window, REF AssignList: LIST OF ProfileAssignRecord, REF profile_assign: ProfileAssignRecord)
参数
w - 窗口句柄
AssignList - 概要文件分配记录列表
profile_assign - 概要文件分配记录
返回
无
副作用
无
说明
本过程接受概要文件分配,如果用户或组已经有了其它概要文件,本过程将提示用户如果选择“确认”,它将用此概要文件代替用户或组的概要文件。如果用户选择“确认”,将把该分配添加到 AssignList。如果用户或组没有概要文件分配,将把该分配添加到 AssignList。当添加或更新概要文件时,AssignList 中的概要文件分配在数据库中被插入/更新。
调用的对话框窗体
无
文件名
语法
BrowseIconFile(VAL w: WINDOW, VAL icon: IconBarRecord)
参数
icon - 图表条记录
返回
icon
副作用
无
说明
本例行程序获得与图标相联系的文件名。
调用的对话框窗体
无
文件名
语法
ClearEntityFields(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程清除“概要文件配置事件记录”中的实体变量,并清除“概要文件编辑器”上的所有实体框。
调用的对话框窗体
无
文件名
语法
ClearIconFields(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程清除“概要文件配置事件记录”中的图标字段和图标变量。
调用的对话框窗体
无
文件名
语法
ClearMenuFields(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程清除“概要文件配置事件记录”中的菜单变量,并且清除“概要文件编辑器”上的所有菜单框。
调用的对话框窗体
无
文件名
语法
ClearProfileFields(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程清除“概要文件配置事件记录”中的概要文件变量,并且清除“概要文件编辑器”上的所有概要文件框。
调用的对话框窗体
无
文件名
语法
ClearSystemActionFields(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 概要文件编辑器的窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程清除“概要文件配置事件记录”上与变量有关的系统操作。它还清除操作字段。
调用的对话框窗体
无
文件名
语法
CopyProfile(REF profile: ProfileRecord, VAL profile_name: STRING): INTEGER
参数
profile - 概要文件记录
profile_name - 概要文件名
返回
整数
副作用
无
说明
本函数接受提供的概要文件,并将它以给定的概要文件名复制到一个新的概要文件。概要文件实体关系、图标和菜单也被复制。因为用户和组只能有一个分配的概要文件,并且只有一个概要文件能作为系统的缺省概要文件,所以不复制系统、组和用户分配。
调用的对话框窗体
无
文件名
语法
DeleteIconPosition(VAL w: WINDOW, REF pc: profileConfigEventRec, VAL fromPreview: BOOLEAN)
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
当用户单击删除“图标”按钮或用户从图标条预览删除一个图标时调用它。
调用的对话框窗体
无
文件名
语法
DeleteMenuPosition(VAL w: WINDOW, REF pc: profileConfigEventRec, VAL fromPreview: BOOLEAN): INTEGER
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
当用户单击删除“菜单”按钮或用户从菜单条预览删除一个菜单时调用它。
调用的对话框窗体
无
文件名
语法
FillEntityFields(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程在实体列表中检索当前选定行。它设置 pc.entity 和 pc.entityActionList。它还用那些值填充实体字段。
调用的对话框窗体
无
文件名
语法
FillEntityList(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程清除实体列表控件并在控件中插入所有实体。根据实体数量,它启用或禁用按钮并调用一个函数来填充实体字段。
调用的对话框窗体
无
文件名
语法
FillIconBarForProfile(VAL w: Window, REF pc: ProfileConfigEventRec)
参数
无
返回
无
副作用
无
说明
当选择了一个概要文件,或在前面已经选定一个概要文件后用户变换到该菜单页时,本例行程序填充菜单列表。
调用的对话框窗体
无
文件名
语法
FillIconFields(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程在图标列表中检索当前选定行。它设置 pc.icon。它还用那些值填充图标字段。
调用的对话框窗体
无
文件名
语法
FillIconList(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程清除图表列表控件并在控件中插入所有图标。根据图标数量,它启用或禁用按钮并调用一个函数来填充图标字段。
调用的对话框窗体
无
文件名
语法
FillIconPositionComboBox( VAL w: WINDOW )
参数
w - 概要文件编辑器的窗口句柄
返回
无
副作用
无
说明
本过程填充用在“概要文件配置”对话框“工具条按钮”标签上的图标位置(ICON_POSITION)组合框。
调用的对话框窗体
无
文件名
语法
FillMenuFields(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w:窗口句柄
pc:概要文件配置事件记录
返回
无
副作用
无
说明
本过程在菜单项列表中检索当前选定行。它设置 pc.menu。它还用那些值填充菜单字段。
调用的对话框窗体
无
文件名
语法
FillMenuForProfile(VAL w: Window, REF pc: ProfileConfigEventRec)
参数
无
返回
无
副作用
无
说明
当选择了一个概要文件,或在前面已经选定一个概要文件后用户变换到该菜单页时,本例行程序填充菜单列表。
调用的对话框窗体
无
文件名
语法
FillMenuList(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程清除菜单列表控件并在控件中插入所有菜单项。根据菜单项数量,它启用或禁用按钮并调用一个函数来填充菜单字段。
调用的对话框窗体
无
文件名
语法
FillProfileFields(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程获得当前选定概要文件的数据,填充“概要文件配置事件记录”上的概要文件变量,还填充“概要文件编辑器”上的概要文件框。
调用的对话框窗体
无
文件名
语法
FillProfileList(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程将清除概要文件列表控件并插入当前概要文件列表。然后它将根据列表中有多少概要文件启用或禁用按钮,并调用一个函数来填充概要文件框。
调用的对话框窗体
无
文件名
语法
FillSystemActionFields(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w -“概要文件编辑器”的窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程获得当前选定的系统操作,填充 pc 记录上的相关系统操作变量,并设置“概要文件编辑器”上的系统操作框。
调用的对话框窗体
无
文件名
语法
FillSystemActionListBox(VAL w: Window, VAL fieldname: STRING, REF profile: ProfileRecord, VAL profileEntityList: LIST OF entityRecord)
参数
w - 概要文件编辑器的窗口句柄
fieldname - 需要填充的控件
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程获得概要文件并用概要文件的系统操作填充框。
调用的对话框窗体
无
文件名
语法
FillSystemActionsList(VAL w: Window, REF pc: ProfileConfigEventRec )
参数
w -“概要文件编辑器”的窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本过程获得当前选定的系统操作,填充 pc 记录上的相关系统操作变量,并设置“概要文件编辑器”上的系统操作框。
调用的对话框窗体
无
文件名
语法
HasProfileRights(VAL rights:INTEGER): BOOLEAN
参数
rights - 用户的 security_mask 整数
返回
如果用户有足够的权限则返回 TRUE,否则返回 FALSE
副作用
无
说明
本函数检查传入的 security_mask 是否允许用户使用“概要文件编辑器”。只有当“概要文件编辑器”由它本身启动时才使用本函数。
调用的对话框窗体
无
文件名
语法
LoadIconForProfile ( VAL w: WINDOW, VAL profile: ProfileRecord, REF ToolBarList: LIST OF $ToolbarNodeRecord)
参数
整数 - 要为其创建图表条的概要文件标识
List of $ToolbarNodeRecord - 此概要文件的图标列表
返回
ToolBarList - $ToolbarNodeRecord 列表
副作用
无
说明
本函数将装入传入的给定概要文件的工具条。最后的列表是该概要文件图标的说明。
调用的对话框窗体
无
文件名
语法
LoadMenuForProfile ( VAL w: WINDOW, VAL profile: ProfileRecord, REF menuTextList: List of STRING)
参数
ProfileRecord - 要为其创建菜单条的概要文件
LIST OF STRING - 此概要文件的菜单字符串列表
返回
字符串列表
副作用
无
说明
本函数将装入传入的给定概要文件的菜单条。
调用的对话框窗体
无
文件名
语法
Profile_Configuration
参数
无
返回
无
副作用
无
说明
本过程启动“概要文件编辑器”。
调用的对话框窗体
无
文件名
语法
Profile_Main(VAL Args: LIST OF STRING)
参数
Args - 字符串列表(在命令行上传入)
返回
无
副作用
无
说明
本过程将允许用户注册到数据库、初始化一些全局变量,并启动“概要文件编辑器”,如果他们有权限进行这些操作的话。
调用的对话框窗体
无
文件名
语法
ProfileConfigurationEvent(REF pc: ProfileConfigEventRec)
参数
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本事件启动“概要文件编辑器”。它允许用户添加、更新、删除概要文件;添加、更新、删除实体;添加、更新、删除系统操作;添加、更新、删除概要文件的图标;添加、更新、删除概要文件的菜单。
调用的对话框窗体
无
文件名
语法
ProfileCopyEvent(REF profile_name: STRING)
参数
profile_name - 初始概要文件名的字符串
返回
新的 profile_name
副作用
无
说明
本过程将允许用户为他们要复制的概要文件输入新的概要文件名。
调用的对话框窗体
无
文件名
语法
RemoveFmProfileAssignList( VAL profile_id: INTEGER, REF AssignList: LIST OF ProfileAssignRecord, VAL profile_assign: ProfileAssignRecord )
参数
profile_id - 代表概要文件类型的整数..用户或组
AssignList - 概要文件分配记录列表
profile_assign - 概要文件分配记录
返回
无
副作用
无
说明
本过程接受概要文件分配并从 AssignList 和列表框中移去它。
调用的对话框窗体
无
文件名
语法
ReSortIconMCLB(VAL w: WINDOW, REF iconList: LIST OF IconBarEventRecord)
参数
iconList - 图标列表
返回
无
副作用
无
说明
当用户向列表添加一个新图标或更改一个现存图标的图标位置时,本过程排序图标 MCLB。
调用的对话框窗体
无
文件名
语法
ReSortMenuMCLB(VAL w: WINDOW, REF menuList: LIST OF MenuBarEventRecord)
参数
iconList - 图标列表
返回
无
副作用
无
说明
当用户向列表添加一个新菜单或更改一个现存菜单的菜单位置时,本过程排序菜单 MCLB。
调用的对话框窗体
无
文件名
语法
SaveIcon(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
当用户单击“保存图标”按钮或用户从图标条预览保存一个图标时调用它。
调用的对话框窗体
无
文件名
语法
SaveMenu(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
当用户单击“保存菜单”按钮或用户从菜单条预览保存一个菜单时调用它。
调用的对话框窗体
无
文件名
语法
SetIconButtons(VAL w: WINDOW)
参数
w - 窗口句柄
返回
无
副作用
无
说明
设置“图标”对话框标签上的按钮。
调用的对话框窗体
无
文件名
语法
SetMenuButtons(VAL w: WINDOW)
参数
w:窗口句柄
返回
无
副作用
无
说明
设置“菜单”对话框标签上的按钮。
调用的对话框窗体
无
文件名
语法
SetMenuColumnRow (REF menu: MenuBarEventRecord)
参数
menu - 菜单条事件记录
返回
无
副作用
无
说明
本过程根据 menu.menu_number 设置菜单记录上的 menu.column 和 menu.row变量。
调用的对话框窗体
无
文件名
语法
SetMenuNumber (REF menu: MenuBarRecord, REF column: Integer, REF row: Integer )
参数
menu - 菜单条记录
column - 整数
row - 整数
返回
整数
副作用
无
说明
本过程根据 menu.menu_number 设置列和行变量。
调用的对话框窗体
无
文件名
语法
SetProfileButtons(VAL w: WINDOW)
参数
w - 窗口句柄
返回
无
副作用
无
说明
设置“概要文件”标签上的按钮。
调用的对话框窗体
无
文件名
语法
SetRightForAction( REF action: SystemActionsRecord , REF rightsList: LIST OF RightsRecord): INTEGER
参数
action - 系统操作记录
rightsList - 该操作的权限记录列表
返回
action - 系统操作记录
副作用
无
说明
本函数设置操作记录上的 right_required 字段以设置所有必需的权限。
调用的对话框窗体
无
文件名
语法
ShiftIconsRight(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN)
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
把所有图标向右移动一个位置。
调用的对话框窗体
无
文件名
语法
ShiftMenu(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN)
参数
w - 窗口句柄
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
向右移动菜单列或向下移动菜单行。如果用户选择移动带第 0 行的列,则所有列都将向右移动。如果选择不带第 0 行的列,则该列的行将向下移动。
调用的对话框窗体
无
文件名
语法
SortIconList(REF iconList: LIST OF IconBarEventRecord)
参数
iconList - 图标记录列表
返回
无
副作用
无
说明
排序图标列表。
调用的对话框窗体
无
文件名
语法
SortMenuList(REF menuList: LIST OF MenuBarEventRecord)
参数
menuList - 菜单记录列表
返回
无
副作用
无
说明
本函数将菜单重新排序。
调用的对话框窗体
无
文件名
语法
ValidateAction (VAL w: Window, REF action: SystemActionsRecord, REF RightsList: LIST OF RightsRecord): INTEGER
参数
w - 窗口句柄
action - 系统操作记录
rightsList - 此操作的权限记录列表
返回
action - 系统操作记录
副作用
无
说明
本函数设置供添加或更新的操作记录。
调用的对话框窗体
无
文件名
语法
ValidateEntity(VAL w: Window, REF entity: EntityRecord): INTEGER
参数
w - 窗口句柄
entity - 实体记录
返回
无
副作用
无
说明
本函数设置供添加或更新的实体记录。
调用的对话框窗体
无
文件名
语法
ValidateIcon( VAL w: Window, REF icon: IconBarRecord): Integer
参数
w - 窗口句柄
icon - 图标条记录
返回
icon - 图标条记录
副作用
无
说明
本函数设置供添加或更新的图标记录。
调用的对话框窗体
无
文件名
语法
ValidateMenu(VAL w: Window ,REF menu: MenuBarRecord, VAL fromPreview: Boolean,VAL mode: STRING): INTEGER
参数
w - 窗口句柄
menu - 菜单条记录
fromPreview - 从预览菜单条对话框调用
返回
menu - 菜单条记录
副作用
无
说明
本函数设置供添加或更新的菜单记录。
调用的对话框窗体
无
文件名
语法
ValidateProfile(VAL w: Window, REF profile: ProfileRecord): INTEGER
参数
w - 窗口句柄
profile - 概要文件记录
返回
成功则返回 1,失败则返回 0
副作用
无
说明
本函数设置供添加或更新的概要文件记录。
调用的对话框窗体
无
文件名
语法
ViewIconBarEvent(REF pc: ProfileConfigEventRec)
参数
profile - 概要文件记录
返回
无
副作用
无
说明
本事件启动一个带有选定概要文件图标的对话框。如果对图标条作了更改,对话框将反映这些更改。
调用的对话框窗体
无
文件名
语法
ViewIconItemEvent(REF pc: profileConfigEventRec)
参数
profile - 概要文件记录
返回
无
副作用
无
说明
本事件启动一个带有选定概要文件图标的对话框。如果对图标条作了更改,对话框将反映这些更改。
调用的对话框窗体
无
文件名
语法
ViewMenuBarEvent(REF pc: ProfileConfigEventRec)
参数
pc - 概要文件配置事件记录
返回
无
副作用
无
说明
本事件启动一个带有选定概要文件菜单的对话框。如果对菜单作了更改,对话框将反映这些更改。
调用的对话框窗体
无
文件名
语法
ViewMenuItemEvent(REF ViewMenuData: ViewMenuItemEventRec)
参数
ViewMenuData - 查看菜单项事件记录
返回
无
副作用
无
说明
本事件启动一个带有选定概要文件菜单的对话框。如果对菜单条作了更改,对话框将反映这些更改。
调用的对话框窗体
无
文件名
语法
AddOrEditMenuForList(VAL w: Window, REF pc: ProfileConfigEventRec, VAL mode: STRING, VAL fromPreview: BOOLEAN )
参数
w - 窗口句柄
pc - 概要文件配置事件记录
mode - 添加或编辑
返回
无
副作用
无
说明
本函数向菜单条列表添加一个菜单项。当用户正在添加一个新的概要文件时调用本函数,所以 profile_id 和 modify_datetimes 仍是未知的。
调用的对话框窗体
无