Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AGED4A2

Package: IHS Patient Registration

Routine: AGED4A2


Information

AGED4A2 ; IHS/ASDS/EFG - PAGE 4 - INSURANCE SUMMARY PART 3;

Source Information

Source file <AGED4A2.m>

Call Graph

Call Graph Total: 4

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Patient Registration 1 AGED4A1  

Entry Points

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 ;

External References

Name Field # of Occurrence
DISPCAT^AGED4A1 ASKITEM+16
^DIK REVERSE+7
$$GET1^DIQ AGAIN+16, AGAIN+21, AGAIN+22
^DIR ASKITEM+5, ASKITEM+13, ASKITEM+25

Interaction Calls

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
AGAIN ASKITEM+16
ASKITEM ASKITEM+14, ASKITEM+15
REVERSE ASKITEM+26

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All