文件名
语法
R_AddHistoryToChange(VAL Event_Id: STRING, VAL Event_Notes: STRING) IS
参数
Event_Id - 历史事件标识
Event_Notes - 历史事件说明
返回
无
副作用
无
说明
该例行程序将历史记录添加到当前更改请求。
调用的对话窗口
无
文件名
语法
R_AddOldChangeToList(VAL this_Change: R_CHANGE_REC) IS
参数
this_Change - 当前更改记录
返回
无
副作用
无
说明
该例行程序将更改记录添加到 AChanges 栈上的对应更改列表中。
调用的对话窗口
无
文件名
语法
R_AutoApproveRequest( VAL w: WINDOW, VAL curr_ChangeRequest: R_CHANGE_REC, REF autoApproved: BOOLEAN ): R_CHANGE_REC IS
参数
w - 当前窗口句柄
curr_ChangeRequest - 当前更改请求
autoApproved - 返回代码
返回
布尔值
副作用
无
说明
该函数确定给定的更改请求是否适用于自动批准。如果适用,则提示用户希望应用的 APPROVED 类型的状态标识。
调用的对话窗口
无
文件名
语法
R_CheckForChangeDuplicates(VAL name: STRING, VAL type: INTEGER): BOOLEAN
参数
name - 要检查的记录的名称
type - 要检查的记录的类型
返回
布尔值
副作用
无
说明
该例行程序确定给定的更改记录是否为副本。
调用的对话窗口
无
文件名
语法
R_CheckForModelDuplicates(VAL name: STRING, VAL type: INTEGER): BOOLEAN
参数
name - 要检查的记录的名称
type - 要检查的记录的类型
返回
布尔值
副作用
无
说明
该例行程序确定给定的模型记录是否为副本。
调用的对话窗口
无
文件名
语法
R_CheckForSubordinateapprovals: BOOLEAN IS
参数
无
返回
布尔值
副作用
无
说明
该函数确定更改请求是否具有任何活动。如果全部活动为 APPROVED 或“已完成”,则返回的返回代码为 TRUE。否则,返回 FALSE。
调用的对话窗口
无
文件名
语法
R_CheckForValidCode(VAL Code_Id: STRING, VAL Type: INTEGER): INTEGER IS
参数
Code_Id - 要检查的代码标识
Type - 要检查的代码类型
返回
整数
副作用
无
说明
该例行程序确定指定的代码是否有效。
调用的对话窗口
无
文件名
语法
R_CheckForValidStatus(VAL Status_ID: STRING, VAL Status_Type: STRING): INTEGER IS
参数
Status_ID - 要检查的状态的标识
Status_Type - 要检查的状态的类型
返回
如果有效,将返回值 1。否则将返回错误代码。
副作用
无
说明
该例行程序确保输入的状态有效。
调用的对话窗口
无
文件名
语法
R_CheckMaxPercent(VAL percent: REAL): REAL IS
参数
percent - 要检查的百分比
返回
实型
副作用
无
说明
该例行程序检查百分比的值是否大于 100%。
调用的对话窗口
无
文件名
语法
R_CompareFindDates(VAL w: WINDOW): INTEGER IS
参数
w - 当前窗口
返回
整数
副作用
无
说明
该例行程序将确保开始日期小于结束日期。
调用的对话窗口
无
文件名
语法
R_ConvertIntMilliSecToRealSec(VAL milliTime: INTEGER): REAL IS
参数
milliTime - 要转换为秒的以毫秒为单位的时间
返回
实型
副作用
无
说明
该例行程序将毫秒数转换为实际秒数。
调用的对话窗口
无
文件名
语法
R_ConvertPeopleRec( a, b );
参数
a - BrowsePeopleListRec
b - BrowsePeopleInstRec
返回
无
副作用
将第一个参数的值指定给第二个参数。
说明
该函数允许 TCM 将一个问题数据集从记录结构 BrowsePeopleListRec 转换到 BrowsePeopleInstRec。
调用的对话窗口
无
文件名
语法
R_DeleteUnNeededNotebookTabs( VAL w: WINDOW ) IS
参数
w - 当前窗口
返回
无
副作用
无
说明
该例行程序将删除指定的对话框标签。由于使用一个对话框的用户可能有也可能没有安装 TPM 和/或 TAM,所以一些对话标签可能不需要展示。
调用的对话窗口
无
文件名
语法
R_ExecuteChangeCommand( VAL Execute_Command: R_COMMANDS_REC): INTEGER
参数
Execute_Command - 当前命令记录
返回
整数
副作用
无
说明
该例行程序执行系统命令。
调用的对话窗口
无
文件名
语法
R_FindChangeInList(VAL ID: INTEGER, VAL Changes: LIST OF R_CHANGE_REC ): R_CHANGE_REC IS
参数
ID - 更改标识
Changes - 要搜索的更改的列表
返回
R_CHANGE_REC
副作用
无
说明
该例行程序检索指定标识的更改。
调用的对话窗口
无
文件名
语法
R_FindHistoryInList(VAL old_History: R_HISTORY_REC, VAL HistoryList: LIST OF R_HISTORY_REC ): R_HISTORY_REC IS
参数
old_History - 旧历史记录
HistoryList - 要搜索的历史列表
返回
R_HISTORY_REC
副作用
无
说明
该例行程序检索指定记录的历史。
调用的对话窗口
无
文件名
语法
R_FireCommand IS
参数
无
返回
无
副作用
无
说明
该例行程序实施或执行系统命令。
调用的对话窗口
无
文件名
语法
R_FormatResourceName(REF ResourceName: STRING, VAL direction: INTEGER) IS
参数
ResourceName - 重新格式化的资源名称
direction - 指定是到 MS 项目中去,还是从 MS 项目中来
返回
无
副作用
无
说明
该例行程序将格式化 MS 项目中使用的资源名称。
调用的对话窗口
无
文件名
语法
R_GetActivityIndexForChange: INTEGER;
参数
无
返回
整数
副作用
无
说明
该例行程序将返回当前更改活动列表的索引。
调用的对话窗口
无
文件名
语法
R_GetActivityIndexForModel(VAL R_G_SModel: R_MODEL_STATE_REC ): INTEGER IS
参数
R_G_SModel - 当前 R_G_SModel 记录
返回
整数
副作用
无
说明
该例行程序将返回当前模型活动列表的索引。
调用的对话窗口
无
文件名
语法
R_GetChangeAttachmentMatchingMCLB(VAL w: WINDOW VAL field_Name: STRING, REF this_Attachment: R_CHANGE_ATTACHMENT_REC): INTEGER;
参数
w - 当前窗口
field_Name - MCLB 名称
this_Attachment - 当前附件
返回
整数
副作用
无
说明
该例行程序查找匹配 MCLB 的附件记录的索引。
调用的对话窗口
无
文件名
语法
R_GetChangeStatusesForSubmittal( REF Submit_List: LIST OF R_STATUS_REC, VAL status_Type: STRING) IS
参数
Submit_List - 查找到的状态的列表
status_Type - 要检索的状态的类型
返回
无
副作用
无
说明
该例行程序将返回状态代码列表。
调用的对话窗口
无
文件名
语法
R_GetChangeValuesForField(VAL TableName: STRING, VAL FieldName: STRING, REF ValueList: LIST OF STRING) IS
参数
TableName - 表名称
FieldName - 属性的字段名称
ValueList - 摘录的值的列表
返回
无
副作用
无
说明
该例行程序将返回更改记录中的属性值。
调用的对话窗口
无
文件名
语法
R_GetCommandFromList(VAL Command_Name: STRING, REF this_Command: R_COMMANDS_REC) IS
参数
Command_Name - 要检索的命令的名称
this_Command - 当前命令记录
返回
无
副作用
无
说明
该例行程序将返回指定命令的命令记录。
调用的对话窗口
无
文件名
语法
R_GetearliestTaskStartDate: DATE IS
参数
无
返回
DATE
副作用
无
说明
该例行程序将查找更改请求的所有调度任务的最早开始日期。
调用的对话窗口
无
文件名
语法
R_GetOrgName(VAL id: STRING): STRING IS
参数
id - 人员标识
返回
字符串
副作用
无
说明
该例行程序将返回给定组织标识的组织名称。
调用的对话窗口
无
文件名
语法
R_GetPersonFromUserID(VAL id: STRING): BrowsePeopleListRec IS
参数
id - 用户标识
返回
BrowsePeopleListRec
副作用
无
说明
该例行程序将从用户标识中返回人员记录。
调用的对话窗口
无
文件名
语法
R_GetPersonName(VAL id: INTEGER): STRING IS
参数
id - 人员标识
返回
字符串
副作用
无
说明
该例行程序将从人员表中返回人员的全名。
调用的对话窗口
无
文件名
语法
R_GetPersonNotifyString( VAL id: STRING, REF ntfy: NotifySendRec, REF type: INTEGER) IS
参数
id - 用户标识
ntfy - 当前的通知发送记录
type - 通知类型
返回
无
副作用
无
说明
该例行程序将返回要发送给用户的通知字符串。
调用的对话窗口
无
文件名
语法
R_GetRelationConst(VAL Relation: STRING): INTEGER IS
参数
Relation - TCM 关系常量
返回
整数
副作用
无
说明
该例行程序将 TCM 任务关系转换为 MS 项目关系常量。
调用的对话窗口
无
文件名
语法
R_GetValidStatusRecord(VAL New_Status: STRING) : R_STATUS_REC
参数
New_Status - 给定更改请求的状态标识
返回
R_STATUS_REC - 给定状态标识的状态记录
副作用
无
说明
该例行程序将返回匹配传入状态标识的状态记录。
调用的对话窗口
无
文件名
语法
R_HasRight(VAL right: INTEGER, VAL security_mask: INTEGER): BOOLEAN IS
参数
right - 要检查的安全权限
security_mask - 安全掩码
返回
布尔值
副作用
无
说明
当调用 HasRight 函数时,该例行程序将添加系统管理权限。
调用的对话窗口
无
文件名
语法
R_ISNULL(VAL inString: STRING, VAL nullVal: STRING): STRING IS
参数
inString - R_Perform 检查的字符串
nullVal - 如果 inString 为 $UnKnown 而返回的值
返回
字符串
副作用
无
说明
该例行程序将 $UnKnown 转换为空值。
调用的对话窗口
无
文件名
语法
R_IsPersonInOrg(VAL organization_id: STRING, VAL people_id: INTEGER): BOOLEAN IS
参数
organization_id - 组织标识
people_id -人员标识
返回
布尔值
副作用
无
说明
该例行程序确定用户是否为组织的一部分。
调用的对话窗口
无
文件名
语法
R_LoadAttachToList( REF attach_to_list: LIST OF STRING )
参数
attach_to_list - 空列表
返回
无
副作用
无
说明
该例行程序将装入适用于具有文件附件的字段。
调用的对话窗口
无
文件名
语法
R_LoadRelevantStatusCodesIntoComboBox(VAL w: WINDOW, VAL field_Name: STRING, VAL Status_List: LIST OF STRING):INTEGER IS
参数
w - 当前窗口
field_Name - 组合框名称
Status_List - 要显示的状态的列表
返回
整数
副作用
无
说明
该例行程序将指定状态装入指定的组合框中。
调用的对话窗口
无
文件名
语法
R_LoadResourcesForSchedule;
参数
无
返回
整数
副作用
无
说明
该例行程序从数据库中检索调度任务的资源。
调用的对话窗口
无
文件名
语法
R_LoadRights;
参数
无
返回
无
副作用
无
说明
在全局变量中装入用户权限。
调用的对话窗口
无
文件名
语法
R_MailMessageFromStrings(VAL strings: LIST OF STRING) : STRING IS
参数
strings - 邮件消息数据
返回
字符串
副作用
无
说明
该例行程序在字符串列表中创建邮件消息。
调用的对话窗口
无
文件名
语法
R_MapTableFieldToText(VAL Table: STRING, VAL Field: STRING, REF TextField: STRING): INTEGER;
参数
Table - 要翻译的数据库表
Field - 要翻译的数据库字段
TextField - 返回的文本字符串
返回
整数
副作用
无
说明
该例行程序将字段:表组合翻译到文件附件文本字符串中。
调用的对话窗口
无
文件名
语法
R_MapTextToTableField(REF Table: STRING, REF Field: STRING, VAL TextField: STRING): INTEGER;
参数
Table - 返回的数据库表
Field - 返回的数据库字段
TextField - 要翻译的文本字符串
返回
整数
副作用
无
说明
将文本字符串翻译到文件附件的字段:表组合中。
调用的对话窗口
无
文件名
语法
R_ParseapprovalText(VAL Text:STRING, REF lstText:LIST OF STRING, VAL Delimiter:STRING) IS
参数
Text - 分析文本
lstText - 要插入的文本
Delimiter - 分界符
返回
无
副作用
无
说明
该例行程序将分析批准文本。
调用的对话窗口
无
文件名
语法
R_ParseMemberVote(VAL w:WINDOW, VAL thisPerson:BrowsePeopleListRec, VAL Approval:R_APPROVAL_REC, VAL UpdateGUI:Boolean, VAL appr_type:STRING): R_DISP_REC IS
参数
w - 对话框的句柄
thisPerson - 利益批准人
Approval - 更改的批准记录
UpdateGUI - 决定更新或不更新 GUI
appr_type - 批准类型
返回
R_DISP_REC
副作用
无
说明
该例行程序分析或查找给定的更改控制委员会组成员的实际处理及原因。
调用的对话窗口
无
文件名
语法
无
参数
无
返回
无
副作用
无
说明
该例行程序是人员匹配的事件处理器。
调用的对话窗口
无
文件名
语法
R_ProcessAttachmentEntryFields(VAL w: WINDOW, REF this_Attachment: R_CHANGE_ATTACHMENT_REC, VAL type: INTEGER)
参数
w - 当前窗口
this_Attachment - 当前附件记录
type - R_Perform 的交叉操作的类型。
返回
整数
副作用
无
说明
该例行程序处理附件的装入、摘录和清除。
调用的对话窗口
无
文件名
语法
R_PromptUserForStatusID( VAL w: WINDOW, REF thisStatus: R_STATUS_REC ): INTEGER IS
参数
w - 当前窗口
thisStatus - 当前状态记录
返回
整数
副作用
无
说明
该例行程序确定客户机是否已经为状态类型定义了多个状态标识。如果是,将提示用户选择希望使用的状态标识。[例如,如果该状态类型为 APPROVED,则客户机可能会定义状态标识有'1 级批准'和'完全批准']
调用的对话窗口
rchg.dfc[status_list]
文件名
语法
R_RecordDeletable(VAL w: WINDOW, REF R_G_SChange: R_CHANGE_STATE_REC, VAL field_Name: STRING, VAL type: INTEGER): BOOLEAN;
参数
w - 当前窗口
R_G_SChange - R_CHANGE_STATE_REC
field_Name - 要检查的字段名称
type - 要检查的记录的类型
返回
布尔值
副作用
无
说明
该例行程序检查是否能够删除更改记录。当细读该例行程序时查找名为“可删除的”列。
调用的对话窗口
无
文件名
语法
R_RestartApprovals: INTEGER IS
参数
无
返回
整数
副作用
无
说明
该例行程序清除更改请求的批准处理及原因。然后,向该更改请求的所有批准人发送通知,这些批准人已经批准了它或当前适宜于批准。这样他们就会知道可能不得不重新批准该更改。
调用的对话窗口
无
文件名
语法
R_RestructureTextComponent(VAL type: INTEGER) IS
参数
type - 要划分的字符串类型
返回
无
副作用
无
说明
该例行程序划分长度超过 254 个字符的文本。
调用的对话窗口
无
文件名
语法
R_ReturnImpactAnalysisForm: STRING IS
参数
无
返回
字符串
副作用
无
说明
根据安装的 TSD 应用程序,返回效应分析对话框的版本。
调用的对话窗口
rmod.dfc[sa_eaefm_impactanalysis]
rmod.dfc[impactanalysis]
文件名
语法
R_SendMessageToApproverType( VAL ntfy: NotifySendRec, VAL notifyType: INTEGER, VAL approver_type: STRING, VAL user_id: STRING, VAL group_id: STRING, VAL site_id: STRING ): INTEGER IS
参数
ntfy - 通知记录
notifyType - 通知类型
approver_type - 批准人类型
user_id - 接受人的用户标识
group_id - 批准组名称
site_id - 当前站点标识
返回
整数
副作用
无
说明
该例行程序发送已生成的通知消息到指定的批准请求,不论是用户还是组。
调用的对话窗口
无
文件名
语法
R_SendNotification(VAL ntfy: NotifySendRec, VAL type: INTEGER): INTEGER IS
参数
type - 通知类型
ntfy - 当前的通知发送记录
返回
整数
副作用
无
说明
该例行程序向用户发送通知。
调用的对话窗口
无
文件名
语法
R_SendPersonNotification(VAL personType: INTEGER, VAL stateTypeText: STRING): INTEGER IS
参数
personType - 要通知的人员的类型
stateTypeText - 要发送给人员的文本
返回
整数
副作用
无
说明
该例行程序向指定人员发送通知。
调用的对话窗口
无
文件名
语法
R_SendUserFax(VAL ntfy: NotifySendRec): INTEGER IS
参数
ntfy - 当前的通知发送记录
返回
整数
副作用
无
说明
该例行程序向用户发送传真通知。
调用的对话窗口
无
文件名
语法
R_SetAlterFlagForHiddenID(REF Alter_Flag: INTEGER, VAL old: STRING, VAL new: STRING) IS
参数
Alter_Flag - 改变设置字段的状态
old - 字段的旧值
new - 字段的新值
返回
无
副作用
无
说明
该例行程序设置隐藏字段的改变标志。
调用的对话窗口
无
文件名
语法
R_StrCompress(VAL old_String: STRING): STRING IS
参数
old_String - 要压缩的字符串
返回
字符串
副作用
无
说明
该例行程序从字符串中删除连续的空间。
调用的对话窗口
无
文件名
语法
R_StrToken(REF source: STRING, VAL delimiters: STRING): STRING IS
参数
source - 要标记化的字符串
delimeters - 用来标记化的分界符
返回
字符串
副作用
无
说明
该例行程序是支持多个分界符的 StrToken 的重写版本。
调用的对话窗口
无
文件名
语法
R_SwitchFindDates(VAL w: WINDOW, VAL hld: INTEGER, REF this_FindChange: R_FIND_CHANGE_REC) IS
参数
w - 当前窗口
hld - 日期类型
this_FindChange - 当前的查找更改记录
返回
无
副作用
无
说明
该例行程序切换计划开始日期与创建日期。
调用的对话窗口
无
文件名
语法
R_UpdateChangeAttachmentList(VAL this_Attachment: R_CHANGE_ATTACHMENT_REC)
参数
this_Attachment - 要添加、修改或删除的附件。
返回
无
副作用
无
说明
该例行程序处理附件的添加、修改和删除。
调用的对话窗口
无
文件名
语法
R_UpdateFieldsWithNotice(VAL win: WINDOW)
参数
win - 当前显示更改的对话框的窗口句柄
返回
无
副作用
无
说明
该例行程序更新一个记录的“请参见附上的文件”通知。
调用的对话窗口
无
文件名
语法
R_UpdateIntegerEntryValue(VAL w: WINDOW, VAL field_Name: STRING, REF field_Value: INTEGER, REF Alter_Flag: INTEGER) IS
参数
w - 当前窗口
field_Name - 要摘录的字段名称
field_Value - 字段的值
Alter_Flag - 新字段具有何种状态
返回
无
副作用
无
说明
该例行程序更新整数条目字段的值。
调用的对话窗口
无
文件名
语法
R_UpdateStringEntryValue(VAL w: WINDOW, VAL field_Name: STRING, REF field_Value: STRING, REF Alter_Flag: INTEGER);
参数
w - 当前窗口
field_Name - 从中检索数据的字段名称
field_Value - 从字段中检索的数据
Alter_Flag - 当前的改变标志状态
返回
无
副作用
无
说明
该例行程序更新字符串条目字段的值。
调用的对话窗口
无
文件名
语法
R_UpdateTextFieldWithNotice(VAL win: WINDOW, VAL fieldName: STRING, VAL foundAttach: BOOLEAN, REF textField: STRING)
参数
win - 当前窗口
fieldName - 要添加通知的字段名称
foundAttach - 确定是否查找到匹配的标志
textField - 要添加的文本
返回
无
副作用
无
说明
该例行程序将“请参见附上的文件”通知添加到给定的文本字段的末尾。
调用的对话窗口
无