Routine: PXVWSTAT

Information

PXVWSTAT ;ISP/LMT - Manage Status of ICE Interface ;12/13/17 12:24

Name	Comments	DBIA/ICR reference
LOGSTAT(DFN)	; Log if call succeeded or failed
RESTORE	; Mark ICE interface as up
UNAVLBL	; Mark ICE interface as down due to too many failed attempts
SMSGDWN	; send a bulletin that ICE Interface connection is down.
SMSGRST	; send a bulletin that ICE Interface connection is restored
CHKSTAT()	; Return ICE Status ; 0 - Disabled ; 1 - Enabled ; 0^1 - Enabled/Unavailable
TASKTST	; Tasked job to test ICE
UPDSTAT(PXSTATUS,PXDT,PXUSER)	;
ENCHGSTA	; Entry for a user to enable/disable the ICE interface
ASKCHNGE(PXOLDSTAT)	; Ask the user if they want to enable/disable the ICE interface

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Another terminal is modifying this field!" Line Location: ENCHGSTA+9
Function Call: WRITE	Prompt: !,"Please wait while we test the ICE interface..." Line Location: ENCHGSTA+16
Function Call: WRITE	Prompt: !!,"Connection to ICE was successful.",!! Line Location: ENCHGSTA+18
Function Call: WRITE	Prompt: !!,"Connection could not be made to ICE.",!! Line Location: ENCHGSTA+19
Function Call: WRITE	Prompt: !,"However, the systems is currently having issues connecting to ICE." Line Location: ASKCHNGE+8
Function Call: WRITE	Prompt: ! Line Location: ASKCHNGE+9
Function Call: WRITE	Prompt: ! Line Location: ASKCHNGE+25