Routine: XULMUI

Information

XULMUI ;IRMFO-ALB/CJM/SWO/RGG - KERNEL LOCK MANAGER ;10/24/2012

Source file <XULMUI.m>

Name	Comments	DBIA/ICR reference
REFRESH	;
BYLOCK	; display user locks sorted by lock
SYSTEM	; display system locks sorted by lock
GOTO	;Jumps to a location on the screen
BYUSER	; display list sorted by user
BYPAT	; display list sorted by Patient
SLCTFILE()	;Select a file reference to screen locks by
BYFILE(FILE)	; Display locks that have a computable references to a particular file
ASKWHERE(TOPIC)	;Asks the user where to jump to.
NEWENTRY(LOCK,NODE,COL1,W1,COL2,W2,COL3,W3,COL4,W4)	;
GETID(LOCK,NODE,FILE)	;gets first ID for sorting purposes.
ADDLINE(LINE)	;
ADD(LINE)	;
EXIT	; -- exit code
SELECT	;
SLCTNODE	;
LJ(STRING,LEN)	;
RJ(STRING,LEN)	;
I()	;
HELP	; -- help code
HDR(COL1,W1,COL2,W2,COL3,W3,COL4,W4)	;
OPTIONS	;Give options for how the lock list should be displayed.
LAST8(STRING)	;
HLPTEXT	;;
ENDHELP	;;END

Name	Line Occurrences
Function Call: WRITE	Prompt: 7,!!!,?10,"You are not authorized to view SYSTEM LOCKS*" Line Location: SYSTEM+3
Function Call: WRITE	Prompt: ! Line Location: SLCTFILE+2
Function Call: WRITE	Prompt: ! Line Location: SLCTFILE+12
Function Call: WRITE	Prompt: !!,"Are you looking for a specific "_TOPIC_"?" Line Location: ASKWHERE+2
Function Call: WRITE	Prompt: !,"If so, enter the "_TOPIC_", or the first few letters of "_TOPIC_"." Line Location: ASKWHERE+3
Function Call: WRITE	Prompt: !!,"You can display locks from all the nodes or a single node." Line Location: SLCTNODE+6
Function Call: WRITE	Prompt: !,$P(LINE,";",3,9) Line Location: HELP+3
Function Call: WRITE	Prompt: !!! Line Location: HELP+4
Function Call: WRITE	Prompt: !,$P(LINE,";",3,9) Line Location: HELP+7