Routine: DPTDZKEY

Information

DPTDZKEY ; IHS/ANMC/LJF - LIST MERGE USERS ; [ 03/16/2000 6:50 AM ]

Source file <DPTDZKEY.m>

Package	Total	Call Graph
Registration	5	MSG^DPTDUT PAUSE^DPTDZFIX EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1
Kernel	2	$$REPEAT^XLFSTR DISP^XQORM1
IHS VA Utilities	1	($$VAL,ENP)^XBDIQ1

Name	Comments	DBIA/ICR reference
RESET	;EP -- update partition for return to list manager
SET(LINE)	; -- SUBRTN to set data line into ^tmp
EN	;EP -- main entry point for DPTD USER LIST
HDR	;EP -- header code
PAD(D,L)	; -- SUBRTN to pad length of data ; -- D=data, L=length
GATHER	; -- find all users with ob keys
EXPND	;EP -- expand code
SPACE(N)	; -- SUBRTN to pad N number of spaces
INIT	;EP -- init variables and list array
PAUSE	;EP -- end of action pause
EXIT	;EP -- exit code
HELP	;EP -- help code

Name	Line Occurrences (* Changed, ! Killed)
^DIC(19.1 - [#19.1]	GATHER+5, GATHER+6
^TMP("DPTDZKEY"	EXIT+1!, GATHER+2!, SET+2, SET+3
^TMP("DPTDZKEY1"	EXIT+1!, GATHER+2!, GATHER+9, GATHER+18, GATHER+21, GATHER+22, GATHER+24, GATHER+26, GATHER+27
^XUSEC(	GATHER+11

Name	Field # of Occurrence
D	PAD~, PAD+2
DPTD	GATHER+1~, GATHER+13!
DPTD(	GATHER+16, GATHER+18
DPTD(29	GATHER+15
DPTD(8	GATHER+17
DPTDLN	INIT+2, EXIT+1!, GATHER+3, SET+1, SET+2, SET+3
DPTDNUM	GATHER+1~
IEN	GATHER+1~, GATHER+25, GATHER+26, GATHER+27
>> IORVOFF	HDR+3
>> IORVON	HDR+3
KEY	GATHER+1~, GATHER+6*, GATHER+7
KEYDES	GATHER+1~, GATHER+7*, GATHER+8
KEYNM	GATHER+1~, GATHER+4, GATHER+5, GATHER+6, GATHER+9, GATHER+11, GATHER+18, GATHER+20, GATHER+21, GATHER+22 , GATHER+24, GATHER+26, GATHER+27
L	PAD~, PAD+2
LINE	GATHER+1~, GATHER+8, GATHER+9, GATHER+16, GATHER+17*, GATHER+18, SET~, SET+2
N	SPACE~, SPACE+1
SRV	GATHER+1~, GATHER+15*, GATHER+16
USR	GATHER+1~, GATHER+10, GATHER+11, GATHER+14, GATHER+18, GATHER+23, GATHER+24, GATHER+26, GATHER+27
>> VALMBCK	EXIT+2, RESET+1, RESET+2*
>> VALMCC	EN+1, HDR+4
>> VALMCNT	INIT+2*
>> VALMHDR(1	HDR+2*
>> VALMHDR(2	HDR+3*
>> VALMQUIT	RESET+1
>> VALMSG	INIT+3*
X	HDR+1~, HDR+3, HELP+1