profedit.kb 的例行程序


AddNewIcon

文件名

profedit.kb

语法

AddNewIcon(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN): INTEGER

参数

w - 窗口句柄

pc - ProfileConfigEventRec

返回

副作用

说明

当用户单击“添加图标”按钮或用户从图标条预览添加一个新图标时调用它。

调用的对话框窗体


AddNewMenu

文件名

profedit.kb

语法

AddNewMenu(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN):INTEGER

参数

w - 窗口句柄

pc - ProfileConfigEventRec

返回

副作用

说明

当用户单击“添加菜单”按钮或用户从菜单条预览添加一个新菜单时调用它。

调用的对话框窗体


AddNewRowToLastMenuColumn

文件名

profedit.kb

语法

AddNewRowToLastMenuColumn(VAL column: INTEGER, VAL menu_number: INTEGER, REF menuList: LIST OF MenuBarRecord)

参数

column - 插入<新行>的列

menuNumber - 要添加的菜单项个数

menuList - 要向其添加项的菜单列表

返回

整数

副作用

说明

只有在前一列的最后一行不是新行时,在前一列的最后一行后插入一个新行。

调用的对话框窗体


AddOrEditIconForList

文件名

profedit.kb

语法

AddOrEditIconForList(VAL w: Window, REF pc: ProfileConfigEventRec, VAL mode: STRING, VAL fromPreview: BOOLEAN )

参数

w - 窗口句柄

pc - ProfileConfigEventRec

mode - 添加或编辑

返回

副作用

说明

本过程向图标条列表添加一个图标。当用户正在添加一个新的概要文件时调用本过程,所以 profile_id 和 modify_datetimes 仍是未知的。

调用的对话框窗体


AddOrEditMenuColumnFromPreview

文件名

profedit.kb

语法

AddOrEditMenuColumnFromPreview(VAL w: WINDOW, VAL viewMenuData: ViewMenuItemEventRec): INTEGER

参数

w - 窗口句柄

viewMenuData - viewMenuItemEventRec

返回

副作用

说明

当从预览添加一个菜单列时调用它。

调用的对话框窗体


AddToMenuList

文件名

profedit.kb

语法

AddToMenuList(VAL menuText: STRING, VAL menuNumber: INTEGER, REF menuList: LIST OF MenuBarRecord)

参数

menuText - 要添加的菜单项文本

menuNumber - 要添加的菜单项个数

menuList - 要向其添加项的菜单列表

返回

menuList - 更新过的菜单项列表

副作用

说明

本函数向菜单列表添加一个菜单项。

调用的对话框窗体


AddToProfileAssignList

文件名

profedit.kb

语法

AddToProfileAssignList(VAL w: Window, REF AssignList: LIST OF ProfileAssignRecord, REF profile_assign: ProfileAssignRecord)

参数

w - 窗口句柄

AssignList - 概要文件分配记录列表

profile_assign - 概要文件分配记录

返回

副作用

说明

本过程接受概要文件分配,如果用户或组已经有了其它概要文件,本过程将提示用户如果选择“确认”,它将用此概要文件代替用户或组的概要文件。如果用户选择“确认”,将把该分配添加到 AssignList。如果用户或组没有概要文件分配,将把该分配添加到 AssignList。当添加或更新概要文件时,AssignList 中的概要文件分配在数据库中被插入/更新。

调用的对话框窗体


BrowseIconFile

文件名

profedit.kb

语法

BrowseIconFile(VAL w: WINDOW, VAL icon: IconBarRecord)

参数

icon - 图表条记录

返回

icon

副作用

说明

本例行程序获得与图标相联系的文件名。

调用的对话框窗体


ClearEntityFields

文件名

profedit.kb

语法

ClearEntityFields(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程清除“概要文件配置事件记录”中的实体变量,并清除“概要文件编辑器”上的所有实体框。

调用的对话框窗体


ClearIconField

文件名

profedit.kb

语法

ClearIconFields(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程清除“概要文件配置事件记录”中的图标字段和图标变量。

调用的对话框窗体


ClearMenuFields

文件名

profedit.kb

语法

ClearMenuFields(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程清除“概要文件配置事件记录”中的菜单变量,并且清除“概要文件编辑器”上的所有菜单框。

调用的对话框窗体


ClearProfileFields

文件名

profedit.kb

语法

ClearProfileFields(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程清除“概要文件配置事件记录”中的概要文件变量,并且清除“概要文件编辑器”上的所有概要文件框。

调用的对话框窗体


ClearSystemActionFields

文件名

profedit.kb

语法

ClearSystemActionFields(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 概要文件编辑器的窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程清除“概要文件配置事件记录”上与变量有关的系统操作。它还清除操作字段。

调用的对话框窗体


CopyProfile

文件名

profedit.kb

语法

CopyProfile(REF profile: ProfileRecord, VAL profile_name: STRING): INTEGER

参数

profile - 概要文件记录

profile_name - 概要文件名

返回

整数

副作用

说明

本函数接受提供的概要文件,并将它以给定的概要文件名复制到一个新的概要文件。概要文件实体关系、图标和菜单也被复制。因为用户和组只能有一个分配的概要文件,并且只有一个概要文件能作为系统的缺省概要文件,所以不复制系统、组和用户分配。

调用的对话框窗体


DeleteIconPosition

文件名

profedit.kb

语法

DeleteIconPosition(VAL w: WINDOW, REF pc: profileConfigEventRec, VAL fromPreview: BOOLEAN)

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

当用户单击删除“图标”按钮或用户从图标条预览删除一个图标时调用它。

调用的对话框窗体


DeleteMenuPosition

文件名

profedit.kb

语法

DeleteMenuPosition(VAL w: WINDOW, REF pc: profileConfigEventRec, VAL fromPreview: BOOLEAN): INTEGER

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

当用户单击删除“菜单”按钮或用户从菜单条预览删除一个菜单时调用它。

调用的对话框窗体


FillEntityFields

文件名

profedit.kb

语法

FillEntityFields(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程在实体列表中检索当前选定行。它设置 pc.entity 和 pc.entityActionList。它还用那些值填充实体字段。

调用的对话框窗体


FillEntityList

文件名

profedit.kb

语法

FillEntityList(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程清除实体列表控件并在控件中插入所有实体。根据实体数量,它启用或禁用按钮并调用一个函数来填充实体字段。

调用的对话框窗体


FillIconBarForProfile

文件名

profedit.kb

语法

FillIconBarForProfile(VAL w: Window, REF pc: ProfileConfigEventRec)

参数

返回

副作用

说明

当选择了一个概要文件,或在前面已经选定一个概要文件后用户变换到该菜单页时,本例行程序填充菜单列表。

调用的对话框窗体


FillIconFields

文件名

profedit.kb

语法

FillIconFields(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程在图标列表中检索当前选定行。它设置 pc.icon。它还用那些值填充图标字段。

调用的对话框窗体


FillIconList

文件名

profedit.kb

语法

FillIconList(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程清除图表列表控件并在控件中插入所有图标。根据图标数量,它启用或禁用按钮并调用一个函数来填充图标字段。

调用的对话框窗体


FillIconPositionComboBox

文件名

profedit.kb

语法

FillIconPositionComboBox( VAL w: WINDOW )

参数

w - 概要文件编辑器的窗口句柄

返回

副作用

说明

本过程填充用在“概要文件配置”对话框“工具条按钮”标签上的图标位置(ICON_POSITION)组合框。

调用的对话框窗体


FillMenuFields

文件名

profedit.kb

语法

FillMenuFields(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w:窗口句柄

pc:概要文件配置事件记录

返回

副作用

说明

本过程在菜单项列表中检索当前选定行。它设置 pc.menu。它还用那些值填充菜单字段。

调用的对话框窗体


FillMenuForProfile

文件名

profedit.kb

语法

FillMenuForProfile(VAL w: Window, REF pc: ProfileConfigEventRec)

参数

返回

副作用

说明

当选择了一个概要文件,或在前面已经选定一个概要文件后用户变换到该菜单页时,本例行程序填充菜单列表。

调用的对话框窗体


FillMenuList

文件名

profedit.kb

语法

FillMenuList(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程清除菜单列表控件并在控件中插入所有菜单项。根据菜单项数量,它启用或禁用按钮并调用一个函数来填充菜单字段。

调用的对话框窗体


FillProfileFields

文件名

profedit.kb

语法

FillProfileFields(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程获得当前选定概要文件的数据,填充“概要文件配置事件记录”上的概要文件变量,还填充“概要文件编辑器”上的概要文件框。

调用的对话框窗体


FillProfileList

文件名

profedit.kb

语法

FillProfileList(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程将清除概要文件列表控件并插入当前概要文件列表。然后它将根据列表中有多少概要文件启用或禁用按钮,并调用一个函数来填充概要文件框。

调用的对话框窗体


FillSystemActionFields

文件名

profedit.kb

语法

FillSystemActionFields(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w -“概要文件编辑器”的窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程获得当前选定的系统操作,填充 pc 记录上的相关系统操作变量,并设置“概要文件编辑器”上的系统操作框。

调用的对话框窗体


FillSystemActionListBox

文件名

profedit.kb

语法

FillSystemActionListBox(VAL w: Window, VAL fieldname: STRING, REF profile: ProfileRecord, VAL profileEntityList: LIST OF entityRecord)

参数

w - 概要文件编辑器的窗口句柄

fieldname - 需要填充的控件

pc - 概要文件配置事件记录

返回

副作用

说明

本过程获得概要文件并用概要文件的系统操作填充框。

调用的对话框窗体


FillSystemActionsList

文件名

profedit.kb

语法

FillSystemActionsList(VAL w: Window, REF pc: ProfileConfigEventRec )

参数

w -“概要文件编辑器”的窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

本过程获得当前选定的系统操作,填充 pc 记录上的相关系统操作变量,并设置“概要文件编辑器”上的系统操作框。

调用的对话框窗体


HasProfileRights

文件名

profedit.kb

语法

HasProfileRights(VAL rights:INTEGER): BOOLEAN

参数

rights - 用户的 security_mask 整数

返回

如果用户有足够的权限则返回 TRUE,否则返回 FALSE

副作用

说明

本函数检查传入的 security_mask 是否允许用户使用“概要文件编辑器”。只有当“概要文件编辑器”由它本身启动时才使用本函数。

调用的对话框窗体


LoadIconsForProfile

文件名

profedit.kb

语法

LoadIconForProfile ( VAL w: WINDOW, VAL profile: ProfileRecord, REF ToolBarList: LIST OF $ToolbarNodeRecord)

参数

整数 - 要为其创建图表条的概要文件标识

List of $ToolbarNodeRecord - 此概要文件的图标列表

返回

ToolBarList - $ToolbarNodeRecord 列表

副作用

说明

本函数将装入传入的给定概要文件的工具条。最后的列表是该概要文件图标的说明。

调用的对话框窗体


LoadMenuForProfile

文件名

profedit.kb

语法

LoadMenuForProfile ( VAL w: WINDOW, VAL profile: ProfileRecord, REF menuTextList: List of STRING)

参数

ProfileRecord - 要为其创建菜单条的概要文件

LIST OF STRING - 此概要文件的菜单字符串列表

返回

字符串列表

副作用

说明

本函数将装入传入的给定概要文件的菜单条。

调用的对话框窗体


Profile_Configuration

文件名

profedit.kb

语法

Profile_Configuration

参数

返回

副作用

说明

本过程启动“概要文件编辑器”。

调用的对话框窗体


Profile_Main

文件名

profedit.kb

语法

Profile_Main(VAL Args: LIST OF STRING)

参数

Args - 字符串列表(在命令行上传入)

返回

副作用

说明

本过程将允许用户注册到数据库、初始化一些全局变量,并启动“概要文件编辑器”,如果他们有权限进行这些操作的话。

调用的对话框窗体


ProfileConfigurationEvent

文件名

profedit.kb

语法

ProfileConfigurationEvent(REF pc: ProfileConfigEventRec)

参数

pc - 概要文件配置事件记录

返回

副作用

说明

本事件启动“概要文件编辑器”。它允许用户添加、更新、删除概要文件;添加、更新、删除实体;添加、更新、删除系统操作;添加、更新、删除概要文件的图标;添加、更新、删除概要文件的菜单。

调用的对话框窗体


ProfileCopyEvent

文件名

profedit.kb

语法

ProfileCopyEvent(REF profile_name: STRING)

参数

profile_name - 初始概要文件名的字符串

返回

新的 profile_name

副作用

说明

本过程将允许用户为他们要复制的概要文件输入新的概要文件名。

调用的对话框窗体


RemoveFmProfileAssignList

文件名

profedit.kb

语法

RemoveFmProfileAssignList( VAL profile_id: INTEGER, REF AssignList: LIST OF ProfileAssignRecord, VAL profile_assign: ProfileAssignRecord )

参数

profile_id - 代表概要文件类型的整数..用户或组

AssignList - 概要文件分配记录列表

profile_assign - 概要文件分配记录

返回

副作用

说明

本过程接受概要文件分配并从 AssignList 和列表框中移去它。

调用的对话框窗体


ReSortIconMCLB

文件名

profedit.kb

语法

ReSortIconMCLB(VAL w: WINDOW, REF iconList: LIST OF IconBarEventRecord)

参数

iconList - 图标列表

返回

副作用

说明

当用户向列表添加一个新图标或更改一个现存图标的图标位置时,本过程排序图标 MCLB。

调用的对话框窗体


ReSortMenuMCLB

文件名

profedit.kb

语法

ReSortMenuMCLB(VAL w: WINDOW, REF menuList: LIST OF MenuBarEventRecord)

参数

iconList - 图标列表

返回

副作用

说明

当用户向列表添加一个新菜单或更改一个现存菜单的菜单位置时,本过程排序菜单 MCLB。

调用的对话框窗体


SaveIcon

文件名

profedit.kb

语法

SaveIcon(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

当用户单击“保存图标”按钮或用户从图标条预览保存一个图标时调用它。

调用的对话框窗体


SaveMenu

文件名

profedit.kb

语法

SaveMenu(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

当用户单击“保存菜单”按钮或用户从菜单条预览保存一个菜单时调用它。

调用的对话框窗体


SetIconButtons

文件名

profedit.kb

语法

SetIconButtons(VAL w: WINDOW)

参数

w - 窗口句柄

返回

副作用

说明

设置“图标”对话框标签上的按钮。

调用的对话框窗体


SetMenuButtons

文件名

profedit.kb

语法

SetMenuButtons(VAL w: WINDOW)

参数

w:窗口句柄

返回

副作用

说明

设置“菜单”对话框标签上的按钮。

调用的对话框窗体


SetMenuColumnRow

文件名

profedit.kb

语法

SetMenuColumnRow (REF menu: MenuBarEventRecord)

参数

menu - 菜单条事件记录

返回

副作用

说明

本过程根据 menu.menu_number 设置菜单记录上的 menu.column 和 menu.row变量。

调用的对话框窗体


SetMenuNumber

文件名

profedit.kb

语法

SetMenuNumber (REF menu: MenuBarRecord, REF column: Integer, REF row: Integer )

参数

menu - 菜单条记录

column - 整数

row - 整数

返回

整数

副作用

说明

本过程根据 menu.menu_number 设置列和行变量。

调用的对话框窗体


SetProfileButtons

文件名

profedit.kb

语法

SetProfileButtons(VAL w: WINDOW)

参数

w - 窗口句柄

返回

副作用

说明

设置“概要文件”标签上的按钮。

调用的对话框窗体


SetRightForAction

文件名

profedit.kb

语法

SetRightForAction( REF action: SystemActionsRecord , REF rightsList: LIST OF RightsRecord): INTEGER

参数

action - 系统操作记录

rightsList - 该操作的权限记录列表

返回

action - 系统操作记录

副作用

说明

本函数设置操作记录上的 right_required 字段以设置所有必需的权限。

调用的对话框窗体


ShiftIconsRight

文件名

profedit.kb

语法

ShiftIconsRight(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN)

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

把所有图标向右移动一个位置。

调用的对话框窗体


ShiftMenu

文件名

profedit.kb

语法

ShiftMenu(VAL w: WINDOW, REF pc: ProfileConfigEventRec, VAL fromPreview: BOOLEAN)

参数

w - 窗口句柄

pc - 概要文件配置事件记录

返回

副作用

说明

向右移动菜单列或向下移动菜单行。如果用户选择移动带第 0 行的列,则所有列都将向右移动。如果选择不带第 0 行的列,则该列的行将向下移动。

调用的对话框窗体


SortIconList

文件名

profedit.kb

语法

SortIconList(REF iconList: LIST OF IconBarEventRecord)

参数

iconList - 图标记录列表

返回

副作用

说明

排序图标列表。

调用的对话框窗体


SortMenuList

文件名

profedit.kb

语法

SortMenuList(REF menuList: LIST OF MenuBarEventRecord)

参数

menuList - 菜单记录列表

返回

副作用

说明

本函数将菜单重新排序。

调用的对话框窗体


ValidateAction

文件名

profedit.kb

语法

ValidateAction (VAL w: Window, REF action: SystemActionsRecord, REF RightsList: LIST OF RightsRecord): INTEGER

参数

w - 窗口句柄

action - 系统操作记录

rightsList - 此操作的权限记录列表

返回

action - 系统操作记录

副作用

说明

本函数设置供添加或更新的操作记录。

调用的对话框窗体


ValidateEntity

文件名

profedit.kb

语法

ValidateEntity(VAL w: Window, REF entity: EntityRecord): INTEGER

参数

w - 窗口句柄

entity - 实体记录

返回

副作用

说明

本函数设置供添加或更新的实体记录。

调用的对话框窗体


ValidateIcon

文件名

profedit.kb

语法

ValidateIcon( VAL w: Window, REF icon: IconBarRecord): Integer

参数

w - 窗口句柄

icon - 图标条记录

返回

icon - 图标条记录

副作用

说明

本函数设置供添加或更新的图标记录。

调用的对话框窗体


ValidateMenu

文件名

profedit.kb

语法

ValidateMenu(VAL w: Window ,REF menu: MenuBarRecord, VAL fromPreview: Boolean,VAL mode: STRING): INTEGER

参数

w - 窗口句柄

menu - 菜单条记录

fromPreview - 从预览菜单条对话框调用

返回

menu - 菜单条记录

副作用

说明

本函数设置供添加或更新的菜单记录。

调用的对话框窗体


ValidateProfile

文件名

profedit.kb

语法

ValidateProfile(VAL w: Window, REF profile: ProfileRecord): INTEGER

参数

w - 窗口句柄

profile - 概要文件记录

返回

成功则返回 1,失败则返回 0

副作用

说明

本函数设置供添加或更新的概要文件记录。

调用的对话框窗体


ViewIconBarEvent

文件名

profedit.kb

语法

ViewIconBarEvent(REF pc: ProfileConfigEventRec)

参数

profile - 概要文件记录

返回

副作用

说明

本事件启动一个带有选定概要文件图标的对话框。如果对图标条作了更改,对话框将反映这些更改。

调用的对话框窗体


ViewIconItemEvent

文件名

profedit.kb

语法

ViewIconItemEvent(REF pc: profileConfigEventRec)

参数

profile - 概要文件记录

返回

副作用

说明

本事件启动一个带有选定概要文件图标的对话框。如果对图标条作了更改,对话框将反映这些更改。

调用的对话框窗体


ViewMenuBarEvent

文件名

profedit.kb

语法

ViewMenuBarEvent(REF pc: ProfileConfigEventRec)

参数

pc - 概要文件配置事件记录

返回

副作用

说明

本事件启动一个带有选定概要文件菜单的对话框。如果对菜单作了更改,对话框将反映这些更改。

调用的对话框窗体


ViewMenuItemEvent

文件名

profedit.kb

语法

ViewMenuItemEvent(REF ViewMenuData: ViewMenuItemEventRec)

参数

ViewMenuData - 查看菜单项事件记录

返回

副作用

说明

本事件启动一个带有选定概要文件菜单的对话框。如果对菜单条作了更改,对话框将反映这些更改。

调用的对话框窗体


viwenuForList

文件名

profedit.kb

语法

AddOrEditMenuForList(VAL w: Window, REF pc: ProfileConfigEventRec, VAL mode: STRING, VAL fromPreview: BOOLEAN )

参数

w - 窗口句柄

pc - 概要文件配置事件记录

mode - 添加或编辑

返回

副作用

说明

本函数向菜单条列表添加一个菜单项。当用户正在添加一个新的概要文件时调用本函数,所以 profile_id 和 modify_datetimes 仍是未知的。

调用的对话框窗体