c_dbsvcs.kb 的例行程序


AddContractHistoryEntry

文件名

c_dbsvcs.kb

语法

AddContractHistoryEntry ( VAL InTran: BOOLEAN, VAL contract_id: INTEGER, VAL history_string: STRING, VAL history_notes: STRING ): INTEGER

参数

InTran - 是否在事务中

contract_id - 合同标识

history_string - 合同历史字符串

history_notes - 合同历史注释

返回

SQL 返回结果

副作用

说明

这个函数添加一条记录到 CONTRACT_HIST 表中。

调用的对话框窗体


AddInventoryHistoryEntry

文件名

c_dbsvcs.kb

语法

AddInventoryHistoryEntry ( VAL InTran: BOOLEAN, VAL contract_id: INTEGER, VAL history_notes: STRING, VAL is_inventory_id: INTEGER, VAL event_name: STRING ): INTEGER

参数

InTran - 是否在事务中

contract_id - 合同标识

history_notes - 合同历史注释

is_inventory_id - 库存清单标识

event_name - 事件名称

返回

SQL 返回结果

副作用

说明

这个函数添加一条记录到 INVENTORY_HISTORY 表中。

调用的对话框窗体


CreateSelectString

文件名

c_dbsvcs.kb

语法

CreateSelectString ( REF baseSelect: String, REF whereString: String, REF userWhere: String, REF orderBy: String ): String

参数

baseSelect - 基本 select 语句(select * from table)

whereString - 用在 select 语句中的 WHERE 子句(where a = b )

userWhere - 附加在 select 语句后面,用户指定的 WHERE 子句

order by - 用来对 select 语句排序的子句

返回

完整的 select 字符串

副作用

说明

这个通用函数根据提供的参数生成一个 select 语句。

调用的对话框窗体


DeleteContractFromAsset

文件名

c_dbsvcs.kb

语法

DeleteContractFromAsset ( VAL contract_id: INTEGER, VAL is_inventory_id: INTEGER )

参数

contract_id - 合同标识

is_inventory_id - 库存清单标识

返回

SQL 返回结果

副作用

说明

这个函数删除一个选定的合同与资产的关联。

调用的对话框窗体


DeleteHistRec

文件名

c_dbsvcs.kb

语法

DeleteHistRec ( VAL InTran: BOOLEAN, VAL DeleteRec: Inventory_HistoryRec )

参数

InTran - 是否在事务中

DeleteRec - 将删除的库存清单历史记录

返回

SQL 返回结果

副作用

说明

这个函数删除一条库存清单历史记录。

调用的对话框窗体


DeleteHistRecForContract

文件名

c_dbsvcs.kb

语法

DeleteHistRecForContract ( VAL contract_id: INTEGER )

参数

contract_id - 合同标识

返回

SQL 返回结果

副作用

说明

这个函数从基于合同标识的 INVENTORY_HISTORY 表中删除一条库存清单历史记录。

调用的对话框窗体


DeleteInvContract

文件名

c_dbsvcs.kb

语法

DeleteInvContract ( VAL InTran: BOOLEAN, REF DeleteRec: InvContractRec ): INTEGER

参数

InTran - 是否在事务中

DeleteRec - 将删除的库存清单合同记录

返回

SQL 返回结果

副作用

说明

这个函数从 INV_CONTRACT 表中删除一条库存清单合同记录。

调用的对话框窗体


DeleteMaintFeeRec

文件名

c_dbsvcs.kb

语法

DeleteMaintFeeRec ( VAL InTran: BOOLEAN, REF DeleteRec: Maintenance_FeeRec ): INTEGER

参数

InTran - 是否在事务中

DeleteRec - 将删除的维护费记录

返回

SQL 返回结果

副作用

说明

这个函数删除一条维护费记录。

调用的对话框窗体


FinishSqlWork

文件名

c_dbsvcs.kb

语法

FinishSqlWork ( VAL i: INTEGER)

参数

i - 整数(返回码)

返回

副作用

说明

通常在数据库函数调用这个函数,如果数据库函数提供一个成功代码,则这个函数承诺 SQL 数据块。否则,回退所有执行过的 SQL 命令直到到达上一个 BeginWork。

调用的对话框窗体


GetCachePos

文件名

c_dbsvcs.kb

语法

GetCachePos(VAL TBName: STRING): INTEGER

参数

TBName - 要获取列的表的名称

返回

字符串

副作用

说明

确认指定给 TBName 的列已经装入,并返回索引值以识别这个列在高速缓存中的位置。

调用的对话框窗体


GetColumnAliases

文件名

c_dbsvcs.kb

语法

GetColumnAliases ( VAL TBName, ColName: STRING )

参数

TBName - 要获取别名的表的名称

ColName - 要获取别名的列

返回

$Result - 定义的别名,或 ColName(如果没有别名)

副作用

说明

这个函数返回任何数据库列的别名。

调用的对话框窗体


GetColumnsAndTypesForTable

文件名

c_dbsvcs.kb

语法

GetColumnsAndTypesForTable ( VAL TBName: STRING, REF availColumns: LIST OF STRING, REF availTypes: LIST OF STRING)

参数

TBName - 要获取列的表的名称

availColumns - TBName 中经检索可用的列

availTypes - 所有列的类型

返回

表中列名及数据类型的列表

副作用

说明

这个函数为有需求的表从 SAI_Syscolumns 中获取列名及类型列表。

调用的对话框窗体


GetColumnsForTable

文件名

c_dbsvcs.kb

语法

GetColumnsForTable ( VAL TBName: STRING ): LIST OF STRING

参数

TBName - 要获取列的表的名称

返回

表的列名列表

副作用

说明

这个函数为有需求的表从 SAI_Syscolumns 中获取列名及类型列表。

调用的对话框窗体


GetEventList

文件名

c_dbsvcs.kb

语法

GetEventList ( REF ktypeList: LIST OF EventRec, REF EventNameList: LIST OF STRING, VAL event_owner: STRING ): INTEGER

参数

ktypeList - 事件记录列表

EventNameList - 事件名称列表

event_owner - 事件所有者

返回

SQL 返回结果

副作用

说明

这个函数返回 EVENTS 表中所有事件记录的列表。

调用的对话框窗体


GetInvContractID

文件名

c_dbsvcs.kb

语法

GetInvContractID ( VAL contract_id: INTEGER, VAL is_inventory_id: INTEGER ): INTEGER

参数

contract_id - 合同标识

is_inventory_id - 库存清单标识

返回

SQL 返回结果

副作用

说明

这个函数从 INV_CONTRACT 表中返回一个合同标识。

调用的对话框窗体


GetSAISysColSelect

文件名

c_dbsvcs.kb

语法

GetSAISysColSelect( VAL TBName: STRING): STRING

参数

TBName - 要获取列的表的名称

返回

字符串

副作用

说明

返回一个忽略表及限定符的 select 字符串。

调用的对话框窗体


GetSiteInfo

文件名

c_dbsvcs.kb

语法

GetSiteInfo

参数

返回

SiteRecord

副作用

说明

获得本地站点信息。

调用的对话框窗体


GetTMEIPNameByInventoryID

文件名

c_dbsvcs.kb

语法

GetTMEIPNameByInventoryID ( VAL is_inventory_id: INTEGER, REF network_node_name: STRING )

参数

is_inventory_id - is_inventory_id

network_node_name - TME NETWORK_NODE 表中的节点名

返回

数据库返回码

-111 - is_inventory_id 不可知

-222 - tivoli 数据源不可知而且不能尝试连接

副作用

说明

这个函数通过传入 is_inventory_id 返回 TME network_node_name。这个函数将找到 TSD EXTERNAL_MAP 表,并把它连接到 Tivoli 数据源,找到 TME NETWORK_NODE 表,断开它与 Tivoli 数据源的连接,并重新连接到当前数据源。

调用的对话框窗体


GetTMEMachInfoByAssetTag

文件名

c_dbsvcs.kb

语法

GetTMEMachInfoByAssetTag ( VAL asset_tag: STRING )

参数

asset_tag - 资产标记

返回

$Result - TMEMachineTypeNameRec 列表(如果没有记录标记为 unknown)

副作用

说明

这个函数根据给定资产的 asset_tag 为 TME 机器返回一个 Tivoli 机器类型和机器名称列表。

调用的对话框窗体


GetTMEMachInfoByInventoryID

文件名

c_dbsvcs.kb

语法

GetTMEMachInfoByInventoryID ( VAL is_inventory_id: INTEGER )

参数

is_inventory_id - 库存清单标识

返回

$Result - TMEMachineTypeNameRec 列表(如果没有记录标记为 unknown)

副作用

说明

这个函数根据给定资产的 is_inventory_id 为 TME 机器返回一个 Tivoli 机器类型和机器名称列表。

调用的对话框窗体


GetTMEMachInfoByPeopleID

文件名

c_dbsvcs.kb

语法

GetTMEMachInfoByPeopleID ( VAL people_id: INTEGER )

参数

is_inventory_id - 库存清单标识

返回

$Result - TMEMachineTypeNameRec 列表(如果没有记录标记为 unknown)

副作用

说明

这个函数根据给定资产的 people_id 为 TME 机器返回一个 Tivoli 机器类型和机器名称列表。

调用的对话框窗体


InitializeDBMSVendor

文件名

c_dbsvcs.kb

语法

InitializeDBMSVendor

参数

返回

副作用

说明

这个过程设置两个全局数据库标识符变量。g_DBMS 变量保存有 TDT 返回的值。然后再根据这个值设置 g_DBMS_VENDOR 变量。g_DBMS 变量能为每个数据库平台保存几个不同的值,这取决于数据库平台的版本数。g_DBMS_VENDOR 变量总是保存 DBMS_V_ORACLE 窗体中五个数据库供应商常量中的一个。

调用的对话框窗体


InsertHistRec

文件名

c_dbsvcs.kb

语法

InsertHistRec ( VAL InTran: BOOLEAN, REF InsertRec: Inventory_HistoryRec )

参数

InTran - 是否在事务中

InsertRec - 将被插入的库存清单历史记录

返回

SQL 返回结果

副作用

说明

这个函数插入一条记录到 INVENTORY_HISTORY 表中。

调用的对话框窗体


InsertInvContract

文件名

c_dbsvcs.kb

语法

InsertInvContract ( VAL InTran: BOOLEAN, REF InsertRec: InvContractRec ): INTEGER

参数

InTran - 是否在事务中

InsertRec - 将插入的库存合同记录

返回

SQL 返回结果

副作用

说明

这个函数插入一条新的记录到 INV_CONTRACT 表中。

调用的对话框窗体


InsertMaintFeeRec

文件名

c_dbsvcs.kb

语法

InsertMaintFeeRec ( VAL InTran: BOOLEAN, REF InsertRec: Maintenance_FeeRec): INTEGER

参数

InTran - 指示是否在事务中

InsertRec - 将插入的维护费记录

返回

SQL 返回结果

副作用

说明

这个函数插入一条记录到 MAINTENANCE_FEE 表中。

调用的对话框窗体


IsDeadlock

文件名

c_dbsvcs.kb

语法

IsDeadlock ( VAL rc: INTEGER ): BOOLEAN

参数

rc - 整数(返回码)

返回

TRUE(如果 rc 指示死锁),FALSE(其它情况)

副作用

说明

这个函数确定当前错误码是否是一个死锁。

调用的对话框窗体


IsSQLCFGEntry

文件名

c_dbsvcs.kb

语法

IsSQLCFGEntry ( VAL dataSource: STRING): BOOLEAN

参数

dataSource - 需要搜索的数据源名称

返回

TRUE(如果数据库存在)。

副作用

说明

检查数据源名称是否在 SQL 配置文件中。

调用的对话框窗体


LoadNotificationContext

文件名

c_dbsvcs.kb

语法

LoadNotificationContext ( VAL newSend: NotifySendRec )

参数

newSend - 输入通知记录

返回

副作用

说明

这个函数用初始值设置全局通知记录。

调用的对话框窗体


LoadTypeAndAddress

文件名

c_dbsvcs.kb

语法

LoadTypeAndAddress ( REF notification_type: STRING, REF address: STRING, VAL user_id: STRING, VAL people_id: INTEGER ): BOOLEAN

参数

notification_type - 正在发出的通知的类型

address - 通知场所

user_id - 接收用户的用户标识

people_id - 接收人员的人员标识

返回

BOOLEAN

副作用

说明

调用的对话框窗体


MapDBTranRtn

文件名

c_dbsvcs.kb

语法

MapDBTranRtn ( VAL i: INTEGER): INTEGER

参数

i - 整数(返回码)

返回

一个整数值(指示程序调用成功或失败)

副作用

说明

通常在数据库函数调用这个函数,并给调用函数返回一个类属的成功或失败代码。

调用的对话框窗体


MapEvent2Status

文件名

c_dbsvcs.kb

语法

MapEvent2Status ( VAL event_id: INTEGER )

参数

event_id - 事件标识

返回

事件状态

副作用

说明

这个函数把一个事件映射到特定状态。

调用的对话框窗体


NotifyUser

文件名

c_dbsvcs.kb

语法

NotifyUser ( REF ntfySend: NotifySendRec ): INTEGER

参数

ntfySend - 通知发送记录

返回

指示成功或失败的整数值

副作用

说明

给一个用户发送一个通知。

调用的对话框窗体


SendAlarm

文件名

c_dbsvcs.kb

语法

SendAlarm ( REF ntfySend: NotifySendRec ): BOOLEAN

参数

NotifySendRec - 包含发送请求警报所需信息的通知记录。

返回

整数 - 成功或失败

副作用

说明

根据存储在 NotifySendRec 中的信息生成一条新的警报。

调用的对话框窗体


SendNotification

文件名

c_dbsvcs.kb

语法

SendNotification ( REF ntfySend: NotifySendRec )

参数

ntfySend - a notification send record

返回

INTEGER

副作用

说明

调用的对话框窗体


SendUserNotification

文件名

c_dbsvcs.kb

语法

SendUserNotification ( REF notify: NotifySendRec ): INTEGER

参数

NotifySendRec - 存储所有跟发出通知有关的信息的通知记录

返回

副作用

说明

这个函数给一个特定用户发出一条通知。

调用的对话框窗体


SetInvStatusFromEvent

文件名

c_dbsvcs.kb

语法

SetInvStatusFromEvent ( VAL event_id: INTEGER, VAL planned: BOOLEAN, VAL is_inventory_id: INTEGER )

参数

event_id - 事件标识

planned - TRUE(如果还在计划中),FALSE(如果已经完成)

is_inventory_id - 库存清单标识

返回

SQL 返回结果

副作用

说明

这个函数根据事件设置库存清单状态。

调用的对话框窗体


SQLFormatOperator

文件名

c_dbsvcs.kb

语法

SQLFormatOperator ( VAL operator: STRING, VAL dataValue: STRING, VAL dataType: INTEGER ): STRING

参数

operator - SQL 语句的运算符

dataValue - 用在运算符右边的数据

dataType - 指示 dataValue 的数据类型

返回

一个字符串(被正确格式化而且能用在

WHERE 子句)。

副作用

说明

这个函数使用参数生成一个句法正确的表达式,供 SQL WHERE 子句使用。

调用的对话框窗体


StoreNotification

文件名

c_dbsvcs.kb

语法

StoreNotification ( REF ntfySend: NotifySendRec )

参数

ntfySend - 通知发送记录

返回

副作用

说明

调用的对话框窗体


UpdateHistRec

文件名

c_dbsvcs.kb

语法

UpdateHistRec ( VAL InTran: BOOLEAN, VAL BeforeRec: Inventory_HistoryRec, VAL AfterRec: Inventory_HistoryRec )

参数

InTran - 是否在事务中

BeforeRec - 初始库存清单历史记录

AfterRec - 新增库存清单历史记录

返回

SQL 返回结果

副作用

说明

这个函数更新库存清单历史记录。

调用的对话框窗体


UpdateInvContract

文件名

c_dbsvcs.kb

语法

UpdateInvContract ( VAL InTran: BOOLEAN, REF BeforeRec: InvContractRec, REF AfterRec: InvContractRec ): INTEGER

参数

InTran - 是否在事务中

BeforeRec - 初始库存清单合同记录

AfterRec - 新增库存清单合同记录

返回

SQL 返回结果

副作用

说明

这个函数更新库存清单合同记录。

调用的对话框窗体


UpdateListOfHistRec

文件名

c_dbsvcs.kb

语法

UpdateListOfHistRec ( VAL InTran: BOOLEAN, REF BeforeList: Inventory_HistoryRec, REF AfterList: Inventory_HistoryRec )

参数

InTran - 是否在事务中

BeforeList - 初始库存清单历史列表

AfterList - 新库存清单历史记录列表

返回

SQL 返回结果

副作用

说明

这个函数更新库存清单历史记录列表。

调用的对话框窗体


UpdateListOfInvContracts

文件名

c_dbsvcs.kb

语法

UpdateListOfInvContracts ( VAL InTran: BOOLEAN, REF BeforeList: LIST OF InvContractRec, REF AfterList: LIST OF InvContractRec ): INTEGER

参数

InTran - 是否在事务中

BeforeList - 初始库存清单合同记录列表

AfterList - 新的库存清单合同记录列表

返回

SQL 返回结果

副作用

说明

这个函数更新库存合同记录列表。

调用的对话框窗体


UpdateListOfMaintFeeRec

文件名

c_dbsvcs.kb

语法

UpdateListOfMaintFeeRec ( VAL InTran: BOOLEAN, REF BeforeRec: LIST OF Maintenance_FeeRec, REF AfterRec: LIST OF Maintenance_FeeRec ): INTEGER

参数

InTran - 是否在事务中

BeforeRec - 初始维护费记录列表

AfterRec - 新的维护费记录列表

1返回

SQL 返回结果

副作用

说明

这个函数更新维护费记录列表。

调用的对话框窗体


UpdateMaintFeeRec

文件名

c_dbsvcs.kb

语法

UpdateMaintFeeRec ( VAL InTran: BOOLEAN, REF BeforeRec: Maintenance_FeeRec, REF AfterRec: Maintenance_FeeRec ): INTEGER

参数

InTran - 是否在事务中

BeforeRec - 初始维护费记录

AfterRec - 新的维护费记录

返回

SQL 返回结果

副作用

说明

这个函数更新维护费记录。

调用的对话框窗体