cntr_gl.kb 的例行程序


ChangePOCField

文件名

cntr_gl.kb

语法

ChangePOCField( VAL wHdl: WINDOW, VAL nameField: STRING, VAL phoneField: STRING, VAL nextField: STRING, REF thisDisplay: BrowsePeopleListRec )

参数

wHdl - 父窗口句柄

nameField - POC 名的对话框控件名

phoneField - POC 电话的对话框控件名

nextField - 控件要设置到的下一字段

thisDisplay - 包含与当前合同相关的人员信息的

BrowsePeople 实例数据记录

返回

表示成功或失败的整数

副作用

说明

该例行程序控制 POC 名和电话字段。如果查找到匹配的记录,将使用正确的人员信息来填充姓名和电话字段。如果没有查找到匹配记录,则两个字段都会被清除。

调用的对话框窗体


ContractAsset

文件名

cntr_gl.kb

语法

ContractAsset ( VAL contract_id: INTEGER , REF whdl: WINDOW)

参数

contract_id - 合同标识

wHdl - 父窗口句柄

返回

副作用

说明

该过程返回与合同相关联的资产列表。该过程由“合同”使用。

调用的对话框窗体


ConvertMaintCostVal

文件名

cntr_gl.kb

语法

ConvertMaintCostVal( REF mList: LIST OF ContractMaintenance, VAL convertType: INTEGER )

参数

mList - 合同维护记录列表

convertType - 维护成本转换

返回

副作用

说明

该过程根据转换选择转换维护成本。

调用的对话框窗体


FindButtonProcessing

文件名

cntr_gl.kb

语法

FindButtonProcessing( VAL w: WINDOW, REF ContractInstanceData: ContractFindEventInstRec, REF thisK: ContractRec, REF currentPoc: BrowsePeopleListRec )

参数

w - 父窗口句柄

ContractInstanceData - 用于处理合同的实例数据

thisK - 合同记录

currentPoc - 浏览人员列表记录(联系点信息)

返回

表示成功或失败的整数

副作用

说明

当用户在合同查找事件中选择查找按钮时,会利用该函数。将返回与输入的搜索标准相匹配的合同列表。

调用的对话框窗体


GetContractFields

文件名

cntr_gl.kb

语法

GetContractFields( VAL w: WINDOW, REF contract: ContractRec, REF poc: BrowsePeopleListRec )

参数

w - 父窗口句柄

contract - 合同记录

poc - 联系点信息记录

返回

副作用

说明

该过程将对话框控件中的值读入合同和人员记录。

调用的对话框窗体


GetContractPOC

文件名

cntr_gl.kb

语法

GetContractPOC( VAL w: WINDOW, VAL thisK: ContractRec, REF poc: BrowsePeopleListRec )

参数

w - 父窗口句柄

thisK - 合同记录

poc - 浏览包含联系点信息的人员列表记录

返回

副作用

说明

该过程用于获取联系点记录。

调用的对话框窗体


GetFileAssocFromINI

文件名

cntr_gl.kb

语法

参数

返回

副作用

说明

调用的对话框窗体


GetKAddress

文件名

cntr_gl.kb

语法

GetKAddress( VAL w: WINDOW, REF thisK: ContractRec )

参数

w - 父窗口句柄

thisK - 合同记录

返回

副作用

说明

该过程获取与合同相关联的地址的列表并将 AddressMCLB 植入它们。

调用的对话框窗体


GetKMaintenance

文件名

cntr_gl.kb

语法

GetKMaintenance( VAL w: WINDOW, REF thisK: ContractRec )

参数

w - 父窗口句柄

thisK - 合同记录

返回

副作用

说明

该过程获取合同维护记录列表并将其插入合同记事簿上的 Maintenance_MCLB。

调用的对话框窗体


GetLocationFields

文件名

cntr_gl.kb

语法

参数

返回

副作用

说明

调用的对话框窗体


GetLocType

文件名

cntr_gl.kb

语法

参数

返回

副作用

说明

调用的对话框窗体


InitializeContractFindFields

文件名

cntr_gl.kb

语法

InitializeContractFindFields( VAL w: WINDOW, REF currentPoc: BrowsePeopleListRec, VAL fromDifferentApplication: BOOLEAN )

参数

w - 父窗口句柄

currentPoc - 浏览人员列表记录、联系点信息

fromDifferentApplication - 如果来自合同之外的应用程序则为 TRUE;如果来自合同,则为 FALSE

返回

副作用

说明

该过程将“合同”对话框上的所有字段设置成未知的值。

调用的对话框窗体


InitializeViewContractVariables

文件名

cntr_gl.kb

语法

InitializeViewContractVariables

参数

返回

副作用

说明

该过程用于从窗口和数据库中删除合同/资产关联。

调用的对话框窗体

cntr.dfc[klocation]


InitializeWWContract

文件名

cntr_gl.kb

语法

InitializeWWContract

参数

返回

副作用

说明

该过程将填充 contract_MCLB 并执行发生在 $MsgCreate 中的其他例行程序。

调用的对话框窗体


KImageEvent

文件名

cntr_gl.kb

语法

KImageEvent( REF thisImage: STRING )

参数

返回

副作用

说明

该过程用于在滚动窗口中查看合同图像。

调用的对话框窗体


KLocationEvent

文件名

cntr_gl.kb

语法

KLocationEvent( REF thisK: ContractRec )

参数

返回

副作用

说明

该过程用于查看合同场所类型。

调用的对话框窗体


PopulateAssetPage

文件名

cntr_gl.kb

语法

PopulateAssetPage( VAL wHdl: WINDOW, REF ContractAssetList: ContractAssetRecordList, REF KAssetList: LIST OF InvContractRec, REF thisK: ContractRec )

参数

wHdl - 父窗口句柄

ContractAssetList - 合同资产关联记录列表

KAssetList - 库存/合同记录列表

thisK - 合同记录

返回

副作用

说明

该过程将 asset_MCLB 和与特定合同相关联的资产列表一起植入“合同”对话框。

调用的对话框窗体


ProcessDateButtons

文件名

cntr_gl.kb

语法

ProcessDateButtons( VAL w: WINDOW, VAL dateFieldToProcess: STRING )

参数

w - 父窗口句柄

dateFieldToProcess - 要输入从日历返回的日期的对话框控件名

返回

副作用

说明

该过程用于将日期放入指定的日期对话框控件。

调用的对话框窗体


ProcessExitFromPOCNameField

文件名

cntr_gl.kb

语法

ProcessExitFromPOCNameField( VAL w: WINDOW, VAL nameField: STRING, VAL phoneField: STRING, VAL nextField: STRING, REF currentPoc: BrowsePeopleListRec )

参数

w - 父窗口句柄

nameField - POC 名的对话框控件名

phoneField - POC 电话的对话框控件名

nextField - 控件要设置到的下一字段

currentPoc - 包含于浏览人员列表记录中的联系点信息

返回

副作用

说明

该过程将联系点信息填入姓名和电话字段。

调用的对话框窗体


ProcessExitFromVendorFields

文件名

cntr_gl.kb

语法

ProcessExitFromVendorFields( VAL w: WINDOW, REF thisK: ContractRec, VAL vendorFieldToProcess: STRING, REF LastVendorID: STRING, VAL NextFieldName: STRING, VAL organization_id: STRING )

参数

w - 父窗口句柄

thisK - 合同记录

vendorFieldToProcess - 选定供应商字段的对话框控件名

LastVendorID - 选定的最近一个供应商标识

NextFieldName - 要在过程结束后输入的对话框控件上的下一个字段名

返回

副作用

说明

该过程用于将正确的供应商信息放入指定的对话框控件。

调用的对话框窗体


ProcessPOCButton

文件名

cntr_gl.kb

语法

ProcessPOCButton( VAL w: WINDOW, REF viewpeople: BrowsePeopleListRec )

参数

w - 父窗口句柄

currentPoc - 浏览人员列表记录

返回

副作用

说明

该过程用于调用人员记事簿的人员搜索窗体。

调用的对话框窗体

people.dfc[peoplesearchform]


ProcessPrintButton

文件名

cntr_gl.kb

语法

ProcessPrintButton( VAL w: WINDOW, REF ContractInstanceData: ContractFindEventInstRec )

参数

w - 父窗口句柄

ContractInstanceData - 用于处理合同的实例数据

返回

表示成功或失败的整数

副作用

说明

该函数用于打印“合同”对话框信息。

调用的对话框窗体

c_prnt.dfc[printchoice]

cntr.dfc[contractnb]


ProcessSelectedPersonMessage

文件名

cntr_gl.kb

语法

ProcessSelectedPersonMessage( VAL w: WINDOW, REF viewpeople: BrowsePeopleListRec )

参数

w - 父窗口句柄

currentPoc - 浏览人员列表记录

返回

副作用

说明

该过程用于显示联系点的电话号码和全名。

调用的对话框窗体


ProcessVendorButtons

文件名

cntr_gl.kb

语法

ProcessVendorButtons( VAL w: WINDOW, REF thisVendor: VendorRecord, VAL vendorFieldToSet: STRING, VAL organization_id: STRING )

参数

w - 父窗口句柄

thisVendor - 供应商记录

vendorFieldToSet - 要植入供应商信息的供应商对话框控件的名称

organization_id - 合同的组织标识

返回

副作用

说明

该函数用于将正确的供应商信息放入指定的对话框控件。

调用的对话框窗体


ProcessViewButton

文件名

cntr_gl.kb

语法

ProcessViewButton( VAL w: WINDOW, REF ContractInstanceData: ContractFindEventInstRec )

参数

返回

副作用

说明

该过程用于查看选定的合同。

调用的对话框窗体

cntr.dfc[contractnb]


ProcessWWContractMsgAccept

文件名

cntr_gl.kb

语法

ProcessWWContractMsgAccept( VAL w: WINDOW, REF ContractInstanceData: ContractFindEventInstRec, REF thisK: ContractRec )

参数

w - 父窗口句柄

ContractInstanceData - 用于“处理合同”事件的实例数据

thisK - 合同记录

返回

表示成功或失败的整数

副作用

说明

该函数用于将选定的合同返回到“资产”对话框。

调用的对话框窗体


ProcessWWContractMsgCancel

文件名

cntr_gl.kb

语法

ProcessWWContractMsgCancel( VAL w: WINDOW )

参数

w - 父窗口句柄

返回

副作用

说明

该函数用于提示用户,询问他们是否想要取消他们的对话框更改。

调用的对话框窗体


ProcessWWContractMsgClose

文件名

cntr_gl.kb

语法

ProcessWWContractMsgClose( VAL w: WINDOW, REF ContractInstanceData: ContractFindEventInstRec )

参数

w - 父窗口句柄

ContractInstanceData - 用于“处理合同”事件的实例数据

返回

副作用

说明

该过程关闭“合同”对话框,并保存对话框的屏幕位置。

调用的对话框窗体


ProcessWWContractMsgCreate

文件名

cntr_gl.kb

语法

ProcessWWContractMsgCreate( VAL w: WINDOW, REF ContractInstanceData: ContractFindEventInstRec, REF thisK: ContractRec, VAL formFile: STRING, VAL formName: STRING )

参数

w - 父窗口句柄

ContractInstanceData - 用于合同查找事件的实例数据

thisK - 合同记录信息

formFile - 包含当前窗体的文件的名称

formName - 当前窗体的名称

返回

副作用

说明

该过程用于处理“处理合同”事件内的不同的消息。

调用的对话框窗体


RunKLocation

文件名

cntr_gl.kb

语法

参数

返回

副作用

说明

调用的对话框窗体


RunKLocation

文件名

cntr_gl.kb

语法

参数

返回

副作用

说明

调用的对话框窗体


SetAddressFields

文件名

cntr_gl.kb

语法

SetAddressFields( VAL w: WINDOW, VAL address: ContractAddress )

参数

w - 父窗口句柄

address - 合同地址记录

返回

副作用

说明

该过程用于设置“合同”对话框上的地址字段。

调用的对话框窗体


SetAddressType

文件名

cntr_gl.kb

语法

SetAddressType( VAL w: WINDOW, VAL aType: INTEGER )

参数

w - 父窗口句柄

aType - 地址选择

返回

副作用

说明

该过程用于设置地址类型单选按钮选项。

调用的对话框窗体


SetAddressTypeName

文件名

cntr_gl.kb

语法

SetAddressTypeName( REF thisAddress: ContractAddress )

参数

thisAddress - 合同地址记录

返回

副作用

说明

该过程用于将地址类型名称设置为“汇到”或“送到”。

调用的对话框窗体


SetContractFields

文件名

cntr_gl.kb

语法

SetContractFields( VAL w: WINDOW, REF contract: ContractRec, REF poc: BrowsePeopleListRec )

参数

w - 父窗口句柄

contract - 合同记录

poc - 浏览人员列表记录

返回

副作用

说明

该过程在“合同”对话框的“一般”标签上填充信息。

调用的对话框窗体


SetKHistory

文件名

cntr_gl.kb

语法

SetKHistory( VAL w: WINDOW, REF thisK: ContractRec )

参数

w - 父窗口句柄

thisK - 合同记录

返回

副作用

说明

该过程获取合同历史记录列表,并将 KHistoryMCLB 和该列表一起植入“合同”对话框中。

调用的对话框窗体


SetKHistoryFields

文件名

cntr_gl.kb

语法

SetKHistoryFields( VAL w: WINDOW, VAL thisH: ContractHistory )

参数

w - 父窗口句柄

thisH - 合同历史记录

返回

副作用

说明

该过程获取合同历史记录,并在对话框上填入合同历史注释信息。

调用的对话框窗体


SetLocationFields

文件名

cntr_gl.kb

语法

参数

返回

副作用

说明

调用的对话框窗体


SetMaintenanceFields

文件名

cntr_gl.kb

语法

SetMaintenanceFields( VAL w: WINDOW, VAL thisM: ContractMaintenance )

参数

w - 父窗口句柄

thisM - 合同维护记录

返回

副作用

说明

该过程设置“合同”对话框上的维护字段。

调用的对话框窗体


ViewContractEvent

文件名

cntr_gl.kb

语法

ViewContractEvent( REF thisK: ContractRec )

参数

thisK - 合同记录

返回

副作用

说明

该事件用于查看特定合同

调用的对话框窗体


ViewKLocationEvent

文件名

cntr_gl.kb

语法

ViewKLocationEvent( REF displayFile: STRING )

参数

返回

副作用

说明

该事件用于查看合同场所。

调用的对话框窗体


WriteFileAssocINI

文件名

cntr_gl.kb

语法

参数

返回

副作用

说明

调用的对话框窗体