Routine: ACRFPAH

Information

ACRFPAH ;IHS/OIRM/DSD/AEF - DISPLAY PATCH APPLICATION HISTORY [ 12/13/2006 2:49 PM ]

Source Information

Source file <ACRFPAH.m>

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Commitment Register	3	($$CVER,$$PIEN,$$VIEN)^ACRFPAH ($$NOW,$$SLDATE,QUE)^ACRFUTL PAUSE^ACRFWARN
Kernel	2	HOME^%ZIS ^%ZISC
VA Fileman	2	^DIC ^DIR
IHS VA Utilities	1	^XBKVAR

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Commitment Register	2	ACRFMENU ACRFPAH

Entry Points

Name	Comments	DBIA/ICR reference
PKG(ACRPIEN)
EN	;EP -- MAIN ENTRY POINT
PRT(ACRPIEN,ACRVIEN)
HDR(ACRNAME,ACRVER,ACRPAGE,ACROUT)
LSTPAT	;ONLY GET LAST PATCH # ;NEW CODE ACR2.122.10 IM23060
CUR(X)	;----- DISPLAY PATCH APPLICATION HISTORY FOR CURRENT VERSION
CVER(X)	;----- GET CURRENT VERSION
VIEN(X,ACRPKG)
CURRENT	;EP -- DISPLAY PATCH APPLICATION HISTORY FOR CURRENT VERSION OF ARMS
PIEN(X)	;----- GET PACKAGE IEN
VER(ACRPIEN,ACRVIEN)
TXT	;----- PRINT OPTION DESCRIPTION
DQ	;EP -- QUEUED JOB STARTS HERE
SELECT	;EP -- SELECT WHICH PACKAGE AND VERSION FOR PAH DISPLAY
DESC	;----- ROUTINE DESCRIPTION

External References

Name	Field # of Occurrence
HOME^%ZIS	SELECT+4, CUR+6
^%ZISC	PRT+26
$$CVER^ACRFPAH	CUR+11
$$PIEN^ACRFPAH	CUR+9
$$VIEN^ACRFPAH	CUR+13
$$NOW^ACRFUTL	HDR+10
$$SLDATE^ACRFUTL	PRT+18
QUE^ACRFUTL	SELECT+15, CUR+24
PAUSE^ACRFWARN	DQ+7
^DIC	PKG+6, VER+7, PIEN+7, VIEN+9
^DIR	HDR+5
^XBKVAR	SELECT+5, CUR+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,ACRPCH Line Location: PRT+23
Function Call: WRITE	Prompt: ?15,ACRDATE Line Location: PRT+24
Function Call: WRITE	Prompt: ?30,ACRBY Line Location: PRT+25
Function Call: WRITE	Prompt: @IOF Line Location: HDR+8
Function Call: WRITE	Prompt: !,ACRNAME," VERSION ",ACRVER," PATCH APPLICATION HISTORY" Line Location: HDR+9
Function Call: WRITE	Prompt: !?49,$$NOW^ACRFUTL Line Location: HDR+10
Function Call: WRITE	Prompt: " PAGE ",ACRPAGE Line Location: HDR+11
Function Call: WRITE	Prompt: !,"PATCH" Line Location: HDR+12
Function Call: WRITE	Prompt: ?15,"DATE APPLIED" Line Location: HDR+13
Function Call: WRITE	Prompt: ?30,"APPLIED BY" Line Location: HDR+14
Function Call: WRITE	Prompt: ! Line Location: HDR+15
Function Call: WRITE	Prompt: "-" Line Location: HDR+16
Function Call: WRITE	Prompt: !,X Line Location: TXT+3
Routine Call	%ZIS Line Location: SELECT+4 CUR+6
Routine Call	DIC Line Location: PKG+6 VER+7 PIEN+7 VIEN+9
Routine Call	DIR Line Location: HDR+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(9.4 - [#9.4]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	PRT+4, PRT+5, PRT+14, PRT+15, LSTPAT+2, LSTPAT+3, CVER+6
^VA(200 - [#200]	PRT+20

Label References

Name	Line Occurrences
CUR	CURRENT+2
HDR	PRT+9, PRT+21
LSTPAT	CUR+17
PKG	SELECT+7
PRT	DQ+6
SELECT	EN+3
TXT	EN+2
VER	SELECT+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACRBY	PRT+2~, PRT+19, PRT+20, PRT+25
ACRCVER	CUR+4~, CUR+11*, CUR+13, CUR+18
ACRDATA	PRT+2~, PRT+15, PRT+16, PRT+17, PRT+19, LSTPAT+3, LSTPAT+4
ACRDATE	PRT+2~, PRT+17, PRT+18, PRT+24
>> ACRLPAT	CUR+16
ACRNAME	PRT+2~, PRT+5*, PRT+9, PRT+21, HDR~, HDR+9
ACROUT	PRT+2~, PRT+7, PRT+9, PRT+10, PRT+12, PRT+14, PRT+21, PRT+22, LSTPAT+2, HDR~ , HDR+5*
ACRPAGE	PRT+2~, PRT+6, PRT+9, PRT+21, HDR~, HDR+5, HDR+7, HDR+11
ACRPCH	CUR+18, PRT+2~, PRT+16, PRT+23, LSTPAT+4
ACRPIEN	SELECT+2~, SELECT+7, SELECT+8, SELECT+10, CUR+4~, CUR+9, CUR+11, CUR+13, PKG~, PKG+8 , VER~, VER+4, DQ+6, PRT~, PRT+4, PRT+5, PRT+14, PRT+15, LSTPAT+2, LSTPAT+3
ACRPKG	CUR+4~, VIEN~, VIEN+7
ACRVER	PRT+2~, PRT+4*, PRT+9, PRT+21, HDR~, HDR+9
ACRVIEN	SELECT+2~, SELECT+10, SELECT+11, CUR+4~, CUR+13, VER~, VER+9, DQ+6, PRT~, PRT+4 , PRT+14, PRT+15, LSTPAT+2, LSTPAT+3
>> ACRZ	CUR+18*
>> DA(1	VER+4*, VER+5
DIC	PKG+3~, PKG+4, VER+3~, VER+5, PIEN+4~, PIEN+5, VIEN+7
DIC(0	PKG+5, VER+6, PIEN+6, VIEN+8
DIR	HDR+3~, HDR+5!
DIR(0	HDR+5*
>> DTOUT	PKG+7, VER+8
>> DUOUT	PKG+7, VER+8
I	HDR+16, TXT+2~, TXT+3
IOF	HDR+8
IOM	HDR+16
IOSL	PRT+21
IOST	HDR+5
U	PRT+4, PRT+5, PRT+16, PRT+17, PRT+19, PRT+20, LSTPAT+4, CVER+6
X	CUR~, CUR+9, PKG+3~, VER+3~, PRT+2~, PRT+13, PRT+14, PRT+15, LSTPAT+1, LSTPAT+2 , LSTPAT+3, HDR+3~, PIEN~, CVER~, CVER+6, VIEN~, TXT+2~, TXT+3*
Y	PKG+3~, PKG+7, PKG+8, VER+3~, VER+8, VER+9, HDR+3~, HDR+5, PIEN+4~, PIEN+8 , CVER+4~, CVER+5, CVER+6, CVER+7, VIEN+6~, VIEN+10
ZTSAVE	SELECT+2~, SELECT+15, CUR+4~, CUR+24
ZTSAVE("ACRPIEN"	SELECT+13*
ZTSAVE("ACRVIEN"	SELECT+14*
ZTSAVE("PIEN"	CUR+21*
ZTSAVE("VIEN"	CUR+22*

Customize PDF page

Package: Commitment Register

Routine: ACRFPAH

Call Graph Total: 8

Caller Graph Total: 2