Routine: ZTPTCH

Information

ZTPTCH ;557/THM,SFISC/RSD-DISPLAY PATCHES FOR SELECTED ROUTINES ;08/06/97 10:52 [ 04/02/2003 8:29 AM ]

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD DD^%ZTPP
VA Fileman	1	NOW^%DTC

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Display Patches for Selected Routines",!! Line Location: ZTPTCH+5
Function Call: WRITE	Prompt: !!,*7,"No routines were selected.",!! Line Location: ZTPTCH+6
Function Call: WRITE	Prompt: !! Line Location: ZTPTCH+7
Function Call: WRITE	Prompt: !!,"Request queued.",!! Line Location: ZTPTCH+9
Function Call: WRITE	Prompt: !! Line Location: TASK+12
Function Call: WRITE	Prompt: PNUM Line Location: TASK+13
Function Call: WRITE	Prompt: !?Z-1#8*10 Line Location: TASK+15
Function Call: WRITE	Prompt: !?Z-1#8*10 Line Location: TASK+16
Function Call: WRITE	Prompt: !?Z-1#8*10 Line Location: TASK+17
Function Call: WRITE	Prompt: !!?10,"Total Patches = ",CNT," Total Routines = ",CNTR Line Location: TASK+20
Function Call: WRITE	Prompt: !!,"Enter RETURN to "_$S(X:"continue or '^' to exit: ",1:"end: ") Line Location: RD+1
Function Call: WRITE	Prompt: @IOF Condition for execution: PG>0 Line Location: HDR+1
Function Call: WRITE	Prompt: !,"Installed Patches for Selected Routines ",UCI,?(IOM-8),"Page: ",PG,!,?60,DATE,! Line Location: HDR+1
Function Call: WRITE	Prompt: "Patch #",?9,"\|",$E(LINE,1,29)," Routines ",$E(LINE,1,29),"\|",! Line Location: HDR+2
Routine Call	%ZIS Line Location: ZTPTCH+7

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("RSEL"	ZTPTCH+6
^%ZOSF("UCI"	TASK+9
^TMP("ZTPTCH"	TASK+2!, TASK+6*, TASK+12, TASK+15, TASK+16, TASK+17, EXIT!
^UTILITY($J	ZTPTCH+4!, ZTPTCH+6, TASK+4, EXIT!

Name	Field # of Occurrence
>> %	TASK+8
%ZIS	ZTPTCH+3~, ZTPTCH+7*
CNT	TASK+1~, TASK+10, TASK+13, TASK+20
CNTR	TASK+1~, TASK+10, TASK+14, TASK+20
DATE	TASK+1~, TASK+8*, HDR+1
IO	TASK+11
IO("Q"	ZTPTCH+8!
IOF	HDR+1
IOM	TASK+9, HDR+1
IOP	ZTPTCH+3~
IOSL	TASK+15, TASK+16, TASK+17
IOST	TASK+21, HDR
LINE	TASK+1~, TASK+9*, HDR+2
PG	TASK+1~, TASK+10, HDR, HDR+1
PNUM	TASK+1~, TASK+11, TASK+12, TASK+13, TASK+15, TASK+16, TASK+17
>> POP	ZTPTCH+7
QUIT	TASK+1~, TASK+10, TASK+12, TASK+21, HDR
RTN	TASK+1~, TASK+4, TASK+6, TASK+12, TASK+14, TASK+15, TASK+16, TASK+17
U	TASK+8*
UCI	TASK+1~, TASK+9*, HDR+1
X	TASK+1~, TASK+5, TASK+21, RD~, RD+1, RD+2*, RD+3
Y	TASK+1~, TASK+5, TASK+6, TASK+8, TASK+9
Z	TASK+1~, TASK+6, TASK+12, TASK+14, TASK+15, TASK+16, TASK+17*
Z1	TASK+1~, TASK+6, TASK+12, TASK+13, TASK+18*
>> ZTDESC	ZTPTCH+8*
>> ZTQUEUED	TASK+3, TASK+4, HDR
>> ZTRTN	ZTPTCH+8*
>> ZTSAVE("^UTILITY($J,"	ZTPTCH+8*
ZTSK	ZTPTCH+3~, ZTPTCH+9

Name	Field # of Occurrence
$T(	TASK+5