Emerson Exchange 365

• Not Answered

Reason Prompt on alarm shelve

We are looking at using the capability of v13 to record a reason when an operator shelves an alarm, setting the appropriate setting in the alarm list it will prompt the operator for if they shelve the alarm from the alarm list display or the mini-alarm list on the faceplate but if they suppress the alarm from the detail display checkbox there is no prompt does anyone know what VBA code to add to call up the same dialog box as the alarm list?

chessley

• 21 Sep 2016 7:52 PM
• Cancel

2 Replies

• Kim Van Camp

  

  • 21 Sep 2016 8:44 PM

  An example of the required code exists, created by one of the Emerson project engineers to show and share at a previous Emerson Exchange. I recently retired from Emerson so I no longer have immediate access to the code, but if you were to send an email requesting the sample detail display and supporting logic to Jessica.Sumner@emerson.com or to Matt.Stoner@emerson.com I'm sure one of them would be able to send it to you.

  • Cancel
• nilesh.chordiya

  

  • 26 Sep 2016 5:18 AM

  You may try this logic on click event of checkbox.
  On Error GoTo ErrHandler
  'The comments and code below have been added automatically.
  'Any changes could cause adverse effects to the functionality
  'of the Script Authoring Experts.
  'Expert Name : Data Entry Expert
  'Version : 3
  'Property : EntrySelect.Value == 4
  'Property : ModuleName.EditText == DVSYS.AI_T1/LO_LO_ALM.A_SUPRSN[_NOT_CONFIG_OK_]
  'Property : txtExpertCaption.text == Supression Reason
  'Property : txtMultiItemEntry.Text == No reason entered,Chattering or fleeting behavior,Invalid for current process state,False indication of abnormal condition,No operator action can be taken,Duplicates another alarm for same cause,Set aside to address more critical alarms,Suppressed by Logic
  'Property : cbxConfirmRequiredMIS.value == False
  'Property : cbxUseRuntimeNameSetMIS.value == False
  frswritevalue "1", "DVSYS.AI_T1/LO_LO_ALM.F_OPSUP[_NOT_CONFIG_OK_]"
  frsMISDataEntry "DVSYS.AI_T1/LO_LO_ALM.A_SUPRSN[_NOT_CONFIG_OK_]", "No reason entered,Chattering or fleeting behavior,Invalid for current process state,False indication of abnormal condition,No operator action can be taken,Duplicates another alarm for same cause,Set aside to address more critical alarms,Suppressed by Logic", "Supression Reason", True
  Exit Sub
  ErrHandler:
  frsHandleError

  • Cancel