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: AGED11B

Package: IHS Patient Registration

Routine: AGED11B


Information

AGED11B ; IHS/ASDS/EFG - RHI ARRAY AND DATES ;

Source Information

Source file <AGED11B.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 5 NOW^%DTC  ^DIC  ^DIE  ^DIK  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Patient Registration 1 AGED11A  

Entry Points

Name Comments DBIA/ICR reference
DATES ;
FINDRHI ;EP - FIND THE PATIENT'S LAST RHI ENTRY AND DISPLAY ON SCREEN
PDATE ;ENTER/EDIT PENDING DATE
ADDRHI ;EP - ADD AN RHI RECORD
EDITRHI ;EP - EDIT AN RHI RECORD
RDATE ;ENTER/EDIT REVOKED DATE
SETARRAY ;LOAD ARRAY WITH PATIENT'S RHI RECORDS
ADATE ;ENTER/EDIT APPROVED DATE
RHICHK ;EP - CHECK FOR EXISTANCE OF RHI RECORD
EDATE ;ENTER/EDIT ENTERED IN ERROR DATE
NDATE ;ENTER/EDIT NOT APPROVED DATE

External References

Name Field # of Occurrence
NOW^%DTC ADATE+1, NDATE+1, PDATE+1, RDATE+1, EDATE+1, ADDRHI+14
^DIC ADDRHI+9
^DIE ADATE+3, NDATE+3, PDATE+3, RDATE+3, EDATE+3, ADDRHI+16, ADDRHI+19, ADDRHI+21, EDITRHI+12, EDITRHI+17
^DIK ADDRHI+17
^DIR SETARRAY+34

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No Restricted Health Information on file"
  • Line Location: SETARRAY+2
Function Call: WRITE
  • Prompt: !!,"Restricted Health Information on File"
  • Line Location: SETARRAY+3
Function Call: WRITE
  • Prompt: !!,?2,"#",?5,"Patient",?28,"Current",?41,"Status"
  • Line Location: SETARRAY+4
Function Call: WRITE
  • Prompt: !,?5,"Name",?28,"Status",?41,"Entered on"
  • Line Location: SETARRAY+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SETARRAY+6
Function Call: WRITE
  • Prompt: !,RHIRHI,!
  • Line Location: SETARRAY+29
Function Call: WRITE
  • Prompt: !,"You must enter a number from 1 - ",AG("SELH")
  • Line Location: SETARRAY+37
Function Call: WRITE
  • Prompt: "APPROVED"
  • Line Location: FINDRHI+2
Function Call: WRITE
  • Prompt: AG("STATUS")
  • Line Location: FINDRHI+8
Routine Call
  • DIE
  • Line Location:
    • ADATE+3
    • NDATE+3
    • PDATE+3
    • RDATE+3
    • EDATE+3
    • ADDRHI+16
    • ADDRHI+19
    • ADDRHI+21
    • EDITRHI+12
    • EDITRHI+17
Routine Call
  • DIC
  • Line Location:
    • ADDRHI+9
Routine Call
  • DIR
  • Line Location:
    • SETARRAY+34

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNRHI - [#9000039] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNRHI - [#9000039] SETARRAY+9, SETARRAY+15, SETARRAY+16, SETARRAY+17, DATES+1, DATES+2, DATES+3, DATES+4, DATES+5, FINDRHI+6
, ADDRHI+17, ADDRHI+21, EDITRHI+11
^AUPNRHI("B" SETARRAY+2, SETARRAY+8, FINDRHI+4, RHICHK+2
^DPT - [#2] SETARRAY+11

Label References

Name Line Occurrences
ADATE DATES+1
ADDRHI EDITRHI+4
DATES ADDRHI+20, EDITRHI+14
EDATE DATES+5
NDATE DATES+2
PDATE DATES+3
RDATE DATES+4
SETARRAY SETARRAY+37, EDITRHI+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ADATE+1, NDATE+1, PDATE+1, RDATE+1, EDATE+1, ADDRHI+14
>> AG("RHICHK" RHICHK+1!, RHICHK+2*
>> AG("RHINUM" FINDRHI+3!, FINDRHI+4*, FINDRHI+5, FINDRHI+6
>> AG("RHISEL" SETARRAY+1!, SETARRAY+34*, SETARRAY+36, SETARRAY+37, SETARRAY+38*, ADDRHI+6, ADDRHI+7, ADDRHI+8, ADDRHI+22!, EDITRHI+4
, EDITRHI+7, EDITRHI+18!
>> AG("RHISTAT" FINDRHI+1!, FINDRHI+6*, FINDRHI+7
>> AG("SELH" SETARRAY+1!, SETARRAY+30*, SETARRAY+32, SETARRAY+37
>> AG("STAMP" ADATE+1*, NDATE+1*, PDATE+1*, RDATE+1*, EDATE+1*, ADDRHI+2!, ADDRHI+14*
>> AG("STAT" EDITRHI+11*
>> AG("STATUS" FINDRHI+7*, FINDRHI+8
AGRHI1 SETARRAY+1!, ADDRHI+22!, EDITRHI+18!
AGRHI1( SETARRAY+19*, SETARRAY+21, SETARRAY+23
AGRHI2 SETARRAY+1!, ADDRHI+22!, EDITRHI+18!
AGRHI2( SETARRAY+23*, SETARRAY+24, SETARRAY+25, SETARRAY+26, SETARRAY+27, SETARRAY+38
AGSEL SETARRAY+7*, SETARRAY+22*, SETARRAY+23, SETARRAY+24, SETARRAY+25, SETARRAY+26, SETARRAY+27, SETARRAY+28, SETARRAY+30, SETARRAY+39!
DA DATES+1, DATES+2, DATES+3, DATES+4, DATES+5, ADDRHI+1~, ADDRHI+12!, ADDRHI+13*, ADDRHI+17, ADDRHI+21
, EDITRHI+7*, EDITRHI+11
>> DFN SETARRAY+2, SETARRAY+8, FINDRHI+4, RHICHK+2, ADDRHI+6, ADDRHI+8
DFOUT SETARRAY+31!
DIC ADDRHI+1~, ADDRHI+3*, ADDRHI+11, ADDRHI+12!, EDITRHI+6*, EDITRHI+9
DIC(0 ADDRHI+5*, EDITRHI+2*, EDITRHI+8*
DIE ADDRHI+1~, ADDRHI+11*, EDITRHI+1~, EDITRHI+9*
>> DIK ADDRHI+17*
DIR SETARRAY+31!, SETARRAY+34!
DIR("A" SETARRAY+32*
DIR(0 SETARRAY+33*
DIROUT SETARRAY+31!, SETARRAY+35
DLAYGO ADDRHI+1~, ADDRHI+4*
DLOUT SETARRAY+31!
DR ADATE+2*, NDATE+2*, PDATE+2*, RDATE+2*, EDATE+2*, ADDRHI+1~, ADDRHI+12!, ADDRHI+15*, ADDRHI+18*, ADDRHI+21*
, EDITRHI+1~, EDITRHI+10*, EDITRHI+16*
DTOUT SETARRAY+31!, SETARRAY+35, ADDRHI+10, EDITRHI+5, EDITRHI+13
DUOUT SETARRAY+31!, SETARRAY+35, ADDRHI+10, EDITRHI+5, EDITRHI+13
>> ENTDAT SETARRAY+20*, SETARRAY+21*, SETARRAY+23
REC EDITRHI+1~
RHIDA SETARRAY+14*, SETARRAY+15, SETARRAY+16, SETARRAY+17, SETARRAY+39!
RHIENT SETARRAY+15*, SETARRAY+16*, SETARRAY+17*, SETARRAY+18*, SETARRAY+19, SETARRAY+26*, SETARRAY+28, SETARRAY+39!
>> RHIFLAG FINDRHI+2
RHINO SETARRAY+7*, SETARRAY+8*, SETARRAY+9, SETARRAY+15, SETARRAY+16, SETARRAY+17, SETARRAY+19, SETARRAY+39!
RHIPAT SETARRAY+11*, SETARRAY+19, SETARRAY+24*, SETARRAY+28, SETARRAY+39!
RHIPTIEN SETARRAY+10*, SETARRAY+11, SETARRAY+39!
RHIREC SETARRAY+9*, SETARRAY+10, SETARRAY+12, SETARRAY+13, SETARRAY+39!
RHIRHI SETARRAY+12*, SETARRAY+19, SETARRAY+27*, SETARRAY+29, SETARRAY+39!
RHISTAT SETARRAY+13*, SETARRAY+14, SETARRAY+18*, SETARRAY+19, SETARRAY+25*, SETARRAY+28, SETARRAY+39!
U SETARRAY+10, SETARRAY+11, SETARRAY+12, SETARRAY+13, SETARRAY+15, SETARRAY+16, SETARRAY+17, SETARRAY+24, SETARRAY+25, SETARRAY+26
, SETARRAY+27, SETARRAY+38, DATES+1, DATES+2, DATES+3, DATES+4, DATES+5, FINDRHI+6, ADDRHI+17, EDITRHI+11
X ADDRHI+6*, ADDRHI+8*, ADDRHI+12!, EDITRHI+1~
Y SETARRAY+34, ADATE+3, NDATE+3, PDATE+3, RDATE+3, EDATE+3, ADDRHI+1~, ADDRHI+10, ADDRHI+13, EDITRHI+1~
, EDITRHI+12, EDITRHI+15
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