Routine: APCM13SL

Package	Total	Call Graph
Registration	3	EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1
Kernel	2	$$NOW^XLFDT DISP^XQORM1
VA Fileman	2	^DIC ^DIR
IHS VA Utilities	1	^XBFMK

Package	Total	Caller Graph
Patient Care Component Table Maintiance	5	APCM13E APCM13ES APCM13ET APCM13H APCM13N

Entry Points

Name	Comments	DBIA/ICR reference
HELP	; -- help code
ADDALL	;
REPORTX	;
EOJ	;
BACK	;go back to listman
EXPND	; -- expand code
REM	;
REPORT	;EP
HDR	; -- header code
RT	;EP
PT	;EP
EOJ1	;EP
INIT	; -- init variables and list array
EN	;EP -- main entry point for GPRA LIST DISPLAY
S
ENT	;
EP	;EP - CALLED FROM OPTION
REMX	;
ADD	;EP - add an item to the selected list - called from a protocol
ADDX	;
EXIT	; -- exit code
GETIEN	;EP -Get next ien available in all 3 files

External References

Name	Field # of Occurrence
^DIC	REPORT+11, REPORT+23
^DIR	RT+3, ADD+1, REM+1, PT+3, PT+10, PT+14
EN^VALM	EN+1
TERM^VALM0	BACK+1
CLEAR^VALM1	EN+2
FULL^VALM1	EN+3, ADD+4, REM+4
^XBFMK	REPORTX+1
$$NOW^XLFDT	REPORT+10, REPORT+22
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Select List Type.",!,"NOTE: If you select All Patients, your list may be",!,"hundreds of pages and take hours to print.",! Line Location: RT+2
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: ! Line Location: ADD+1
Function Call: WRITE	Prompt: !,"No items selected." Line Location: ADD+2
Function Call: WRITE	Prompt: !,"No items selected." Line Location: ADD+3
Function Call: WRITE	Prompt: ! Line Location: REM+1
Function Call: WRITE	Prompt: !,"No items selected." Line Location: REM+2
Function Call: WRITE	Prompt: !,"No items selected." Line Location: REM+3
Function Call: WRITE	Prompt: !!,"Please choose an output type. For an explanation of the delimited",!,"file please see the user manual.",! Line Location: PT+2
Function Call: WRITE	Prompt: !!,"You have selected to create a delimited output file. You can have this",!,"output file created as a text file in the pub directory, ",!,"OR you can have the delimited output display on your screen so that" Line Location: PT+8
Function Call: WRITE	Prompt: !,"you can do a file capture. Keep in mind that if you choose to",!,"do a screen capture you CANNOT Queue your report to run in the background!!",!! Line Location: PT+9
Function Call: WRITE	Prompt: !!,"When the report is finished your delimited output will be found in the",!,$P($G(^AUTTSITE(1,1)),U,2)," directory. The filename will be ",APCMDELF,".txt",! Line Location: PT+17
Function Call: WRITE	Prompt: !! Line Location: REPORT+2
Function Call: WRITE	Prompt: !!,"Unable to lock global, try later." Line Location: REPORT+5
Function Call: WRITE	Prompt: !!,"Unable to lock global, try later." Line Location: REPORT+6
Function Call: WRITE	Prompt: !!,"Something wrong with control files, notify programmer!" Line Location: REPORT+8
Function Call: WRITE	Prompt: !!,"UNABLE TO CREATE REPORT FILE ENTRY - NOTIFY SITE MANAGER!" Line Location: REPORT+11
Function Call: WRITE	Prompt: !!,"UNABLE TO CREATE REPORT FILE ENTRY - NOTIFY SITE MANAGER!" Line Location: REPORT+23
Routine Call	VALM Line Location: EN+1
Routine Call	DIC Line Location: REPORT+11 REPORT+23
Routine Call	DIR Line Location: RT+3 ADD+1 REM+1 PT+3 PT+10 PT+14

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^APCMM13C - [#9001301.03]	Classic Fileman Calls
^APCMM13P - [#9001301.04]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCM13OB - [#9001301.02]	INIT+3, INIT+5, INIT+6, INIT+7
^APCMM13C - [#9001301.03]	REPORT+5, REPORTX+3, REPORT+14, REPORT+16, REPORT+17, REPORT+18, REPORT+20, REPORT+21
^APCMM13C(0	GETIEN+3
^APCMM13P - [#9001301.04]	REPORT+6, REPORTX+4, REPORT+25, REPORT+27, REPORT+28, REPORT+29, REPORT+31, REPORT+32, S
^AUTTSITE(1	PT+17
^DIC - [#1]	ENT+2

Label References

Name	Line Occurrences
ADDX	ADD+2, ADD+3, REM+2, REM+3
BACK	ADDX+1, ADDALL+2, REMX+1
EN	EP+1
ENT	GETIEN+1, GETIEN+2
EOJ1	EN+5
GETIEN	REPORT+7
HDR	BACK+4
INIT	BACK+3
PT	PT+11, PT+15
REPORTX	REPORT+5, REPORT+6, REPORT+8, REPORT+11, REPORT+23
S	S

Naked Globals

Name	Field # of Occurrence
^(0	ENT+6, ENT+7*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ANS	ENT+1~, EOJ+1!
APCMANS	EOJ1+1!
>> APCMBD	REPORT+10, REPORT+22
APCMC	EOJ1+1!
>> APCMDELF	PT+1, PT+7, PT+16*, PT+17
>> APCMDELT	PT+1, PT+7, PT+12*, PT+13
>> APCMED	REPORT+10, REPORT+22
APCMF	GETIEN+1, GETIEN+2, ENT+2, EOJ+1!
>> APCMFAC	REPORT+19, REPORT+30
APCMGANS	EOJ1+1!, ADD+5, REM+5
APCMGC	EOJ1+1!, ADD+5, REM+5
APCMGI	EOJ1+1!, ADD+5, REM+5
APCMGLST	EOJ1+1!, INIT+1!
APCMGLST(	INIT+6*
APCMGLST("IDX"	INIT+6*, ADD+5, ADDALL+1, REM+5
APCMHIGH	EOJ1+1!, INIT+1, INIT+9, ADD+1, ADDALL+1, REM+1
APCMI	EOJ1+1!, ADD+5*
>> APCMIEN	REPORT+8, REPORT+9, GETIEN+3, S
>> APCMIND(	INIT+4, ADD+5, ADDALL+1
APCMLIST	RT+4!, RT+5*
APCMLIST(	INIT+6, ADD+5, ADDALL+1, REM+5!
APCMNOLI	INIT+1!
APCMNOLI(	ADD+5, ADDALL+1
>> APCMPBD	REPORT+10, REPORT+22
>> APCMPED	REPORT+10, REPORT+22
>> APCMPRV(	REPORT+15, REPORT+26
>> APCMQUIT	RT+4, REPORT+11, REPORT+23*
>> APCMROT	PT+1, PT+5, PT+6
>> APCMRPT	REPORT+1, REPORT+8, REPORT+10, REPORT+12*, REPORT+14, REPORT+16, REPORT+17, REPORT+18, REPORT+20, REPORT+21 , REPORT+22, REPORT+23, REPORT+29, REPORT+31, REPORT+32
>> APCMRPTP	REPORT+24*, REPORT+25, REPORT+27, REPORT+28
>> APCMRPTT	INIT+2, REPORT+14, REPORT+18, REPORT+25, REPORT+29
APCMTIND	EOJ1+1!
APCMX	EOJ1+1!
>> APCMXREF	INIT+2*, INIT+3
>> C	INIT+3, INIT+5, INIT+6, INIT+9, REPORT+14, REPORT+15, REPORT+16, REPORT+17, REPORT+18, REPORT+19 , REPORT+20, REPORT+21, REPORT+25, REPORT+26, REPORT+27, REPORT+28, REPORT+29, REPORT+30, REPORT+31, REPORT+32
CTR	ENT+1~, ENT+4, ENT+5, ENT+7, EOJ+1!
DA	RT+3!, PT+3!, PT+10!, PT+14!, REPORT+11!, REPORT+23!, REPORTX+2!
DD	REPORTX+2!
DIADD	REPORT+10, REPORT+11!, REPORT+22, REPORT+23!, REPORTX+2!
DIC	REPORT+10!, REPORT+11!, REPORT+22!, REPORT+23!, REPORTX+2!, EOJ+1!
DIC("DR"	REPORT+10, REPORT+22
DIC(0	REPORT+10, REPORT+22
DINUM	REPORT+9, REPORT+23!, REPORTX+2!
DIR	RT+3!, BACK+5!, ADD+1!, REM+1!, PT+3!, PT+10!, PT+14!
DIR("A"	RT+3, ADD+1, REM+1, PT+3, PT+10, PT+14
DIR("B"	RT+3, PT+3, PT+10*
DIR(0	RT+3, ADD+1, REM+1, PT+3, PT+10, PT+14
>> DIRUT	RT+4, ADD+1, ADD+3, REM+1, REM+3, PT+4, PT+11, PT+15
DLAYGO	REPORT+10, REPORT+11!, REPORT+22, REPORT+23!, REPORTX+2!
DR	REPORT+11!, REPORT+23!, REPORTX+2!
>> DUOUT	ADD+1, REM+1
DUZ(2	REPORT+10, REPORT+22
FILE	EOJ+1!
GBL	ENT+1~, ENT+2, ENT+3, ENT+5, ENT+6, ENT+7*, EOJ+1!
I	INIT+3, BACK+6!, ADDALL+1, REM+5*
IOF	EN+4, ADD+4, REM+4
L	ENT+5*, EOJ+1!
NXT	ENT+1~, ENT+4, ENT+5, ENT+6, ENT+7, EOJ+1!
U	INIT+5, INIT+6, INIT+7, PT+17, GETIEN+3, ENT+6, ENT+7
>> VALMBCK	BACK+2*
>> VALMCNT	INIT+9*
>> VALMHDR(1	HDR+1*
>> VALMHDR(2	HDR+2*
X	INIT+3, INIT+4, INIT+5, INIT+6, INIT+7, HELP+1, BACK+6!, ADDALL+1, REPORT+10, REPORT+15* , REPORT+16, REPORT+17, REPORT+19, REPORT+20, REPORT+21, REPORT+22, REPORT+26, REPORT+27, REPORT+28, REPORT+30 , REPORT+31, REPORT+32, REPORTX+2!
XBHI	ENT+1~, ENT+4, ENT+5, ENT+7, EOJ+1!
XBX	ENT+1~, ENT+6*, EOJ+1!
XBY	ENT+1~, ENT+6*, EOJ+1!
Y	RT+5, INIT+3*, BACK+6!, ADD+2, ADD+5, REM+2, REM+5, PT+5, PT+12, PT+16 , REPORT+11, REPORT+12, REPORT+23, REPORT+24, REPORTX+2!
Z	BACK+6!

Customize PDF page

Package: Patient Care Component Table Maintiance

Routine: APCM13SL

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: