Routine: AGED4A2

Package	Total	Call Graph
VA Fileman	3	^DIK $$GET1^DIQ ^DIR
IHS Patient Registration	1	DISPCAT^AGED4A1

Package

Total

Call Graph

^DIK $$GET1^DIQ ^DIR

DISPCAT^AGED4A1

Package	Total	Caller Graph
IHS Patient Registration	1	AGED4A1

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
VPROMPT(AGPTR)	;EP - VIEW SEQUENCES FOR PARTICULAR CATEGORY
ASKITEM	;EP - ASK SEQUENCE ENTRY ITEM TO DELETE OR VIEW
REVERSE(CATENTRY)	;EP - DELETE CATEGORY PRIORITIZING ENTRY
AGAIN	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"PATIENT HAS NO SEQUENCING TO VIEW IN THIS CATEGORY!" Line Location: AGAIN+1
Function Call: WRITE	Prompt: !!,"PRIOR SEQUENCING DATES:" Line Location: AGAIN+2
Function Call: WRITE	Prompt: $E($$GET1^DIQ(9000035,CATREC_",",.03,"E","AGDATA","AGERR"),1,20) Line Location: AGAIN+16
Function Call: WRITE	Prompt: $P($G(@(U_$P($G(^AUPNICP(CATREC,0)),U,3))),U) Line Location: AGAIN+17
Function Call: WRITE	Prompt: ! Line Location: ASKITEM+2
Routine Call	DIR Line Location: ASKITEM+5 ASKITEM+13 ASKITEM+25

FileNo	Call Tags
^AUPNICP - [#9000035]	Classic Fileman Calls, GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AUPNICP - [#9000035]	AGAIN+15, AGAIN+17
^AUPNICP("EFF"	AGAIN+1, AGAIN+5, AGAIN+12
^DD("DD"	AGAIN+6, ASKITEM+20
^DPT - [#2]	AGAIN+20

Name	Field # of Occurrence
>> AGANS	ASKITEM+16*
>> AGCAT(	ASKITEM+29!
>> AGPATDFN	AGAIN+1, AGAIN+5, AGAIN+12
AGPTR	VPROMPT~, AGAIN+1, AGAIN+5, AGAIN+12, ASKITEM+16
CATDT	VPROMPT+1~, AGAIN+4, AGAIN+5, AGAIN+6, AGAIN+12, AGAIN+13
CATENTRY	AGAIN+3!, ASKITEM+8*, ASKITEM+9, ASKITEM+10, ASKITEM+26, REVERSE~, REVERSE+2
CATENTRY(	AGAIN+13*, ASKITEM+9, ASKITEM+10, REVERSE+6
>> CATPTR	ASKITEM+16*, ASKITEM+29
CATREC	VPROMPT+1~, AGAIN+11, AGAIN+12, AGAIN+13, AGAIN+15, AGAIN+16, AGAIN+17, AGAIN+21, AGAIN+22
DA	REVERSE+3!, REVERSE+5, REVERSE+6
DELDT	ASKITEM+1~, ASKITEM+20*, ASKITEM+29
DIK	REVERSE+3!, REVERSE+4*
DIR	ASKITEM+3!, ASKITEM+11!, ASKITEM+18!
DIR(0	ASKITEM+4, ASKITEM+12, ASKITEM+24*
DTOUT	ASKITEM+3!, ASKITEM+7, ASKITEM+11!, ASKITEM+15
DUOUT	ASKITEM+3!, ASKITEM+7, ASKITEM+11!, ASKITEM+14
ENTRY	REVERSE+1~, REVERSE+2*, REVERSE+6
IENS	VPROMPT+1~, AGAIN+15, AGAIN+16, AGAIN+17, AGAIN+18, AGAIN+19, AGAIN+20
>> ITEM	AGAIN+5, AGAIN+7, AGAIN+13, AGAIN+23, ASKITEM+4
>> OLDPTR	ASKITEM+16*
SUBITEM	VPROMPT+1~, AGAIN+12*
U	AGAIN+15, AGAIN+17, AGAIN+20, ASKITEM+15
VIEWDT	VPROMPT+2!, ASKITEM+1~, ASKITEM+9, ASKITEM+10, ASKITEM+20*, ASKITEM+21
>> Y	AGAIN+6, AGAIN+8, ASKITEM+6, ASKITEM+8, ASKITEM+15, ASKITEM+16, ASKITEM+17, ASKITEM+20

Information