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 |  Entry Points |  External References |  Interaction Calls |  Local Variables |  All
Print Page as PDF
Routine: AGMBIR1

Package: IHS Patient Registration

Routine: AGMBIR1


Information

AGMBIR1 ;IHS/OIT/NKD - PAT REG MBI DETAIL ; JULY 23, 2018

Source Information

Source file <AGMBIR1.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS Patient Registration 2 PTLK^AG  $$GETMBIS^AGUTL  
IHS Patient 1 KILL^AUPNPAT  
IHS VA Utilities 1 ^XBFMK  
Kernel 1 $$RJ^XLFSTR  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
PRINT
END
PAT

External References

Name Field # of Occurrence
PTLK^AG PAT+2
$$GETMBIS^AGUTL PRINT+1
KILL^AUPNPAT END+6
^DIR END+4
^XBFMK END+6
$$RJ^XLFSTR PRINT+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Patient has no MBI history on file."
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!,?10,"Eff Date",?26,"MBI",?40,"Source"
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR(CNT_")",6),?10,$P(AGRES(CNT,0),U,2),?26,$P(AGRES(CNT,0),U,3),?40,$P(AGRES(CNT,0),U,4)
  • Line Location: PRINT+6
Routine Call
  • DIR
  • Line Location:
    • END+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGPATDFN PAT+1~
AGRES PAT+1~, PRINT+1*, PRINT+2
AGRES( PRINT+5, PRINT+6
CNT PRINT+5~*, PRINT+6
DFN PAT+1~, PAT+3, PRINT+1
>> DFOUT PAT+3
DIR END+1!, END+5!
DIR("A" END+2*
DIR(0 END+3*
>> DIRUT PAT+3
>> DTOUT PAT+3
>> DUOUT PAT+3
REC PAT+1~
RHIFLAG PAT+1~
U PRINT+6
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Local Variables |  All