Routines for radmn_wf.kb


R_CheckForDuplicateCode

File Name

radmn_wf.kb

Syntax

R_CheckForDuplicateCode(VAL Code_Name: STRING, VAL type: INTEGER): BOOLEAN IS

Parameters

Code_Name - Code name to be checked

type - Type of code to check

Returns

Boolean

Side Effects

None

Description

This routine checks for the addition of duplicate codes.

Dialog Forms Called

None


R_CheckForEightStatuses

File Name

radmn_wf.kb

Syntax

R_CheckForEightStatuses(VAL Status_List: LIST OF R_STATUS_REC, REF notUsedList: LIST OF STRING): BOOLEAN IS

Parameters

Status_List - Current List of statuses

notUsedList - List of statuses that are not mapped

Returns

Boolean

Side Effects

None

Description

This routine checks to make sure all status types are entered.

Dialog Forms Called

None


R_ClearCommandAlterFlags

File Name

radmn_wf.kb

Syntax

R_ClearCommandAlterFlags IS

Parameters

None

Returns

Nothing

Side Effects

None

Description

This routine clears alter flags for command.

Dialog Forms Called

None


R_CodesCommandsEvent_gr_PrintDe

File Name

radmn_wf.kb

Syntax

R_CodesCommandsEvent_gr_PrintDe(VAL w: WINDOW, REF printList: LIST OF ScreenPrintRec ) IS

Parameters

w - Window handler

printlist - List of ScreenPrintRec

Returns

None

Side Effects

None

Description

This routine handles the "gr_PrintDe" Message from "R_CodesEvent".

Dialog Forms Called

None


R_CodesCommandsEvent_MsgAccept

File Name

radmn_wf.kb

Syntax

R_CodesCommandsEvent_MsgAccept(VAL w: WINDOW, REF this_Command: R_COMMANDS_REC, REF stat: INTEGER, REF exitFlag: BOOLEAN ) IS

Parameters

w - Window handler

this_Command - R_COMMANDS_REC

stat - Integer

ExitFlag - Boolean

Returns

None

Side Effects

None

Description

This routine handles the "$MsgAccept" Message from the "R_CodesCommandsEvent".

Dialog Forms Called

None


R_CodesCommandsEvent_MsgCreate

File Name

radmn_wf.kb

Syntax

R_CodesCommandsEvent_MsgCreate(VAL w: Window, REF this_Command: R_COMMANDS_REC, REF this_Parameter: R_PARAM_REC, REF itemCount:INTEGER ) IS

Parameters

w - Window handler

this_command - R_COMMANDS_REC record

this_Parameter - R_PARAM_REC record

itemCount - Integer

Returns

Nothing

Side Effects

None

Description

This routine handles the "$MsgCreate" Message from "R_CodesCommandsEvent".

Dialog Forms Called

None


R_CodesCommandsEvent_MsgExitField

File Name

radmn_wf.kb

Syntax

R_CodesCommandsEvent_MsgExitField(VAL w: WINDOW, VAL FieldName: STRING, REF tableName: STRING, REF names: LIST OF STRING ) IS

Parameters

w - Window handler

FieldName - Field name from R_CodesEvent($FieldName)

tableName - String

names - List of string

Returns

Nothing

Side Effects

None

Description

This routine handles the "$MsgExitField" Message from "R_CodesCommandsEvent".

Dialog Forms Called

None


R_CodesCommandsEvent_MsgSelect

File Name

radmn_wf.kb

Syntax

R_CodesCommandsEvent_MsgSelect(VAL w: WINDOW, VAL FieldName: STRING, REF this_Parameter: R_PARAM_REC, REF this_Command: R_COMMANDS_REC, REF itemCount: INTEGER, REF stat: INTEGER, REF printList: LIST OF ScreenPrintRec, REF tableName: STRING, REF names: LIST OF STRING ): INTEGER IS

Parameters

w - Window handler

FieldName - Field name from R_CodesEvent($FieldName)

this_Parameter - R_PARAM_REC

this_Command - R_COMMANDS_REC

itemCount - Integer

stat - Integer

printlist - List of ScreenPrintRec

tableName - String

names - List of string

Returns

Integer

Side Effects

None

Description

This routine handles the "$MsgSelect" Message from "R_CodesCommandsEvent".

Dialog Forms Called

None


R_CodesEvent_MsgAccept

File Name

radmn_wf.kb

Syntax

R_CodesEvent_MsgAccept(VAL w: WINDOW, VAL FieldName: STRING, REF exitFlag: BOOLEAN, REF R_IsEnabled:BOOLEAN, REF this_Command: R_COMMANDS_REC, REF notUsedList: LIST OF STRING ) IS

Parameters

w - Window handler

FieldName - Field name from R_CodesEvent($FieldName)

exitFlag - Boolean

R_IsEnabled - Boolean

this_Command - R_COMMANDS_REC

notUsedList - List of string

Returns

Nothing

Side Effects

None

Description

This routine handles the "$MsgAccept" message from "r_codesevent".

Dialog Forms Called

None


R_CodesEvent_MsgCancel

File Name

radmn_wf.kb

Syntax

R_CodesEvent_MsgCancel(VAL w: WINDOW, REF exitFlag: BOOLEAN, REF notUsedList: LIST OF STRING ) IS

Parameters

w - Window handler

exitFlag - Boolean

notUsedList - LIST OF STRING

Returns

Nothing

Side Effects

None

Description

This routine handles the "$MsgCancel" Message from "R_CodesEvent".

Dialog Forms Called

None


R_CodesEvent_MSGCreate

File Name

radmn_wf.kb

Syntax

R_CodesEvent_MSGCreate(VAL w: Window, REF this_ImpCategory:R_IMP_CAT_REC, REF itemCount:INTEGER, REF this_Risk: R_RISK_REC, REF this_Status: R_STATUS_REC ) IS

Parameters

w - Window handler

this_ImpCategory - R_IMP_CAT_REC record

itemCount - Integer

this_Risk - R_RISK_REC record

this_Status - R_STATUS_REC record

Returns

Nothing

Side Effects

None

Description

This routine handles the "$MsgCreate" Message from "R_CodesEvent".

Dialog Forms Called

None


R_CodesEvent_MsgInitialize

File Name

radmn_wf.kb

Syntax

R_CodesEvent_MsgInitialize(VAL w: Window, REF this_ImpCategory:R_IMP_CAT_REC, VAL FieldName: STRING, REF this_Risk: R_RISK_REC, REF this_Status: R_STATUS_REC ) IS

Parameters

w - Window handler

this_ImpCategory - R_COMMANDS_REC

FieldName - Field name from R_CodesEvent($FieldName)

this_Risk - R_RISK_REC record

this_Status - R_STATUS_REC record

Returns

Nothing

Side Effects

None

Description

This routine handles the "$MsgInitialize" Message from "R_CodesCommandsEvent".

Dialog Forms Called

None


R_CodesEvent_MsgSelect

File Name

radmn_wf.kb

Syntax

R_CodesEvent_MsgSelect(VAL w: Window, REF repParentW: WINDOW, VAL FieldName: STRING, REF oldImpCategory:R_IMP_CAT_REC, REF this_ImpCategory:R_IMP_CAT_REC, REF oldRisk: R_RISK_REC, REF this_Risk: R_RISK_REC, REF oldStatus: R_STATUS_REC, REF this_Status: R_STATUS_REC, REF this_Command: R_COMMANDS_REC, REF printChoice: PrintChoiceRec, REF printlist: LIST OF ScreenPrintRec, REF itemCount: INTEGER, REF stat: INTEGER, REF i: INTEGER ): INTEGER IS

Parameters

w - Window handler

repParent - Window handler

FieldName - Field name from R_CodesEvent($FieldName)

oldImpCategory - R_IMP_CAT_REC

this_ImpCategory - R_IMP_CAT_REC

oldRisk - R_RISK_REC

this_Risk - R_RISK_REC

oldStatus - R_STATUS_REC

this_Status - R_STATUS_REC

this_Command - R_COMMANDS_REC

printChoice - PrintChoiceRec

printlist - List of ScreenPrintRec

itemCount - Integer

stat - Integer

i - Integer

Returns

Integer

Side Effects

None

Description

This routine handles the "$MsgSelect" Message from "R_CodesEvent".

Dialog Forms Called

radmn.dfc[exit_commands]

print.dfc[printchoice]


R_PerformCommandEditView

File Name

radmn_wf.kb

Syntax

R_PerformCommandEditView(VAL w: WINDOW, VAL field_Name: STRING, REF this_Command: R_COMMANDS_REC ) IS

Parameters

w - Window handler

FieldName - Field name from R_CodesEvent($FieldName)

this_command - R_COMMANDS_REC record

Returns

Nothing

Side Effects

None

Description

This routine performs editing or viewing of command.

Dialog Forms Called

radmn.dfc[exit_commands]


R_ReorderParameterList

File Name

radmn_wf.kb

Syntax

R_ReorderParameterList(VAL w: WINDOW,VAL field_Name: STRING, REF this_Command: R_COMMANDS_REC) IS

Parameters

w - Current window

field_Name - Selected field of the dialog box

this_Command - Command record to be reordered

Returns

Nothing

Side Effects

None

Description

This routine reorders the list of parameters to match the user's preferences.

Dialog Forms Called

None


R_SetPrefValue

File Name

radmn_wf.kb

Syntax

R_SetPrefValue(VAL w: WINDOW, REF sysCfg: R_PreferencesRec) IS

Parameters

w - Current window

sysCfg - preference record

Returns

None

Side Effects

None

Description

This routine sets preference values.

Dialog Forms Called

None


R_UnloadParameters

File Name

radmn_wf.kb

Syntax

R_UnloadParameters(VAL w: WINDOW, VAL field_Name: STRING, REF this_Command: R_COMMANDS_REC) IS

Parameters

w - Current window

field_Name - Field name of parameter MCLB

this_Command - Command record to be unloaded

Returns

Nothing

Side Effects

None

Description

This routine gets a list of parameters from the MCLB parameter.

Dialog Forms Called

None


R_UpdateCommandList

File Name

radmn_wf.kb

Syntax

R_UpdateCommandList(VAL this_Command: R_COMMANDS_REC) IS

Parameters

this_Command - Current command record

Returns

Nothing

Side Effects

None

Description

This routine handles modifications to a list of commands.

Dialog Forms Called

None


R_UpdateImpCategoryList

File Name

radmn_wf.kb

Syntax

R_UpdateImpCategoryList(VAL this_ImpCategory: R_IMP_CAT_REC) IS

Parameters

this_impCategory - Current impact code record

Returns

Nothing

Side Effects

None

Description

This routine handles modifications to an impact codes list.

Dialog Forms Called

None


R_UpdateParameterList

File Name

radmn_wf.kb

Syntax

R_UpdateParameterList(REF this_Command: R_COMMANDS_REC, VAL this_Parameter: R_PARAM_REC) IS

Parameters

this_Command - Current command record

this_Parameter - Current parameter record

Returns

Nothing

Side Effects

None

Description

This routine handles modifications to the parameter list of a command.

Dialog Forms Called

None


R_UpdateRiskList

File Name

radmn_wf.kb

Syntax

R_UpdateRiskList(VAL this_Risk: R_RISK_REC) IS

Parameters

this_Risk - Current risk code record

Returns

Nothing

Side Effects

None

Description

This routine handles modifications to a list of risk codes.

Dialog Forms Called

None


R_UpdateStatusList

File Name

radmn_wf.kb

Syntax

R_UpdateStatusList(VAL this_Status: R_STATUS_REC) IS

Parameters

this_Status - Current status record

Returns

Nothing

Side Effects

None

Description

This routine handles modifications to the list of statuses.

Dialog Forms Called

None