Routine: DIAX

Package	Total	Call Graph
VA Fileman	12	1^DIAR (ENTC,ENTD,OUT)^DIARA (ENTE,Q)^DIARB (FILE,UPDATE)^DIARU EN^DIAXM DIAX^DIAXU ^DIC ^DICATT ^DIE EN^DIFGO IXALL^DIK ^DIR
Kernel	2	^%ZIS ^%ZTLOAD

Package	Total	Caller Graph
VA Fileman	10	DIAX ADD/DELETE DIAX CANCEL DIAX CREATE DIAX MODIFY DIAX PRINT DIAX PURGE DIAX SELECT DIAX UPDATE DIAX VALIDATE DII1

Entry Points

Name	Comments	DBIA/ICR reference
OPT
Q
EN
61	;
H6
62	;
FLAG(DIC,DIE,DIARCH)	;
41	;
1	;;SELECT ENTRIES TO EXTRACT
0
3	;;PRINT SELECTED ENTRIES
2	;;ADD/DELETE SELECTED ENTRIES
5	;;CREATE EXTRACT TEMPLATE
4	;;MODIFY DESTINATION FILE
7	;;PURGE EXTRACTED ENTRIES
6	;;UPDATE DESTINATION FILE
9	;;VALIDATE EXTRACT TEMPLATE
8	;;CANCEL EXTRACT SELECTION
UNLK

External References

Name	Field # of Occurrence
^%ZIS	6+11
^%ZTLOAD	6+12
1^DIAR	1+1
ENTC^DIARA	8+1
ENTD^DIARA	7+1
OUT^DIARA	3+1
ENTE^DIARB	2+1
Q^DIARB	Q
FILE^DIARU	6+2
UPDATE^DIARU	UNLK+1
EN^DIAXM	6+7, 9+5
DIAX^DIAXU	6+13
^DIC	OPT, 9+3
^DICATT	41+1
^DIE	6+5
EN^DIFGO	5+3
IXALL^DIK	0+3
^DIR	61+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: OPT+0
Function Call: WRITE	Prompt: ! Line Location: OPT+2
Function Call: WRITE	Prompt: !!,"This option lets you build a template where you specify fields to extract",!,"and their corresponding mapping in the destination file." Line Location: 5+1
Function Call: WRITE	Prompt: !!,"For more detailed description of requirements on the destination file,",!,"please see your VA FileMan User Manual." Line Location: 5+2
Function Call: WRITE	Prompt: !!,"This option allows you to build a file which will store data extracted from",!,"other files. When creating fields in the destination file, all data types" Line Location: 4+1
Function Call: WRITE	Prompt: !,"are selectable. However, only a few data types are acceptable for receiving",!,"extracted data." Line Location: 4+2
Function Call: WRITE	Prompt: !!,"Please see your User Manual for more guidance on building the destination file." Line Location: 4+3
Function Call: WRITE	Prompt: !!?5,"'YES' will not allow editing or deleting existing file entries or adding",!?11,"new file entries" Line Location: H6+0
Function Call: WRITE	Prompt: !?5,"'NO' will place no restrictions on the file" Line Location: H6+1
Function Call: WRITE	Prompt: !!,"You MUST enter an EXTRACT template name. This EXTRACT template will be used",!,"to populate your destination file." Line Location: 6+4
Function Call: WRITE	Prompt: $C(7),!,"If entries cannot be moved to the destination file, an exception report",!,"will be printed.",!!,"Select a device where to print the exception report." Line Location: 6+8
Function Call: WRITE	Prompt: !!,"QUEUEING to this device will queue the Update process." Line Location: 6+9
Routine Call	DIE Line Location: 6+5
Routine Call	DIC Line Location: OPT 9+3
Routine Call	DIR Line Location: 61+4
Routine Call	%ZIS Line Location: 6+11

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	61+3, FLAG+1, FLAG+2*
^DIAR(1.11 - [#1.11]	6+6
^DIC - [#1]	61+1
^DOPT("DIAX"	0, 0+2*

Label References

Name	Line Occurrences
0	OPT+1
41	4+4
61	4+5
9	9+6
@(	EN+1
EN	OPT+1
FLAG	62+1
OPT	0
Q	4+4, 4+5, 6+2, 9+6
UNLK	6+5, 6+7, 6+11, 6+12

Naked Globals

Name	Field # of Occurrence
^("B"	0+1!
^(0	0+1*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	OPT+2!
%ZIS	6+1~, 6+10~, 6+11*
%ZIS("A"	6+11*
%ZIS("B"	6+11*
DA	OPT+2!, 6+1~, 6+3~, 6+5*
DI	OPT+1, OPT+2!, EN+1, 5+3
DIAR	2+1, 3+1, 6+1~, 6+2, 7+1, 8+1, 9+4, UNLK~*
DIARB	6+1~, 6+6*
DIARC	6+1~, 6+2, 6+5, 6+6
DIARCH	61+4*, 62+1, 62+2!, FLAG~, FLAG+2
DIARP	6+1~, 6+3~, 6+5, 9+4*
DIAX	OPT+2!, EN*
DIAXDIC	4+4, 61+1, 61+3, 62+1, 62+2!
DIAXFNO	6+1~
DIAXIOP	6+10~, 6+11*
DIC	OPT!, OPT+2!, 9+1~, 9+2, FLAG~, FLAG+1, FLAG+2
DIC("A"	9+2*
DIC("S"	9+2*
DIC(0	OPT, 9+2
DIE	61+4, 62+1, 62+2!, 6+1~, 6+3~, 6+5, FLAG~, FLAG+2
>> DIERR	6+7
DIK	0*, OPT!, OPT+2!
DIR	61+2!
DIR("??"	61+2*
DIR("A"	61+2*
DIR("B"	61+3*
DIR(0	61+2*
DR	6+1~, 6+3~, 6+5*
DTOUT	61+4, 6+1~, 6+5
>> DUOUT	61+4
I	0+2*, OPT+2!
IO("Q"	6+12
ION	6+11
J	OPT+2!
POP	6+1~, 6+10~, 6+11
U	61+1, 61+3, 6+6, FLAG+2
X	OPT+2!, 9+1~
Y	OPT+1!, OPT+2!, 61+4, 9+1~, 9+3, 9+4
>> ZTIO	6+12*
ZTRTN	6+1~, 6+10~, 6+12*
ZTSAVE	6+1~, 6+10~
ZTSAVE("DIARB"	6+12*
ZTSAVE("DIARC"	6+12*
ZTSAVE("DIARP"	6+12*
ZTSAVE("DIAXIOP"	6+12*

Marked Items

Name	Field # of Occurrence
$T(@I	0+2

Customize PDF page

Package: VA Fileman

Routine: DIAX

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items