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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AGTMEMRG

Package: IHS Patient Registration

Routine: AGTMEMRG


Information

AGTMEMRG ; IHS/ASDS/EFG - MERGE EMPLOYER DATA ;

Source Information

Source file <AGTMEMRG.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 5 %XY^%RCR  ^DIC  ^DIE  (,IX1)^DIK  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
MV1
MV2
CHK
CONT
MOVE
XIT
VERF
SEL

External References

Name Field # of Occurrence
%XY^%RCR MV1+2
^DIC SEL+2, CHK+4
^DIE MV2+2, MV2+3, MV2+4
^DIK MV2
IX1^DIK MV1+3
^DIR CHK+14, CHK+15, CONT, VERF

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: *7
  • Line Location: SEL+5
Function Call: WRITE
  • Prompt: !!,"Dup-Check for: ",$P(AG("X0"),U),!?15,$P(AG("X0"),U,2)
  • Line Location: CHK+0
Function Call: WRITE
  • Prompt: !?15,$P(AG("X0"),U,3),", "
  • Line Location: CHK+1
Function Call: WRITE
  • Prompt: $P(^DIC(5,$P(AG("X0"),U,4),0),U,2)," ",$P(AG("X0"),U,5)
  • Line Location: CHK+2
Function Call: WRITE
  • Prompt: !,"================================================"
  • Line Location: CHK+3
Function Call: WRITE
  • Prompt: !,"_______________________________________________________________________________"
  • Line Location: CHK+7
Function Call: WRITE
  • Prompt: !,"[1] ",$P(AG("X0"),U),?39,"| [2] ",$P(AG("Y0"),U)
  • Line Location: CHK+8
Function Call: WRITE
  • Prompt: !," ",$P(AG("X0"),U,2),?39,"| ",$P(AG("Y0"),U,2)
  • Line Location: CHK+9
Function Call: WRITE
  • Prompt: !
  • Line Location: CHK+10
Function Call: WRITE
  • Prompt: " ",$P(AG("X0"),U,3),", "
  • Line Location: CHK+10
Function Call: WRITE
  • Prompt: $P(^DIC(5,$P(AG("X0"),U,4),0),U,2)," ",$P(AG("X0"),U,5)
  • Line Location: CHK+11
Function Call: WRITE
  • Prompt: ?39,"| "
  • Line Location: CHK+12
Function Call: WRITE
  • Prompt: $P(AG("Y0"),U,3),", ",$P(^DIC(5,$P(AG("Y0"),U,4),0),U,2)," ",$P(AG("Y0"),U,5)
  • Line Location: CHK+12
Function Call: WRITE
  • Prompt: !,"-------------------------------------------------------------------------------"
  • Line Location: CHK+13
Function Call: WRITE
  • Prompt: !
  • Line Location: CHK+15
Function Call: WRITE
  • Prompt: !!
  • Line Location: CONT+0
Function Call: WRITE
  • Prompt: !,"OK, MERGING.."
  • Line Location: MOVE+0
Function Call: WRITE
  • Prompt: !!,"Re-directing Pointers..."
  • Line Location: MV2+1
Routine Call
  • DIE
  • Line Location:
    • MV2+2
    • MV2+3
    • MV2+4
Routine Call
  • DIC
  • Line Location:
    • SEL+2
    • CHK+4
Routine Call
  • DIR
  • Line Location:
    • CHK+14
    • CHK+15
    • CONT
    • VERF

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls
^AUTNEMPL - [#9999999.75] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPN3PPH("AE" MV2+4
^AUPNPAT("AF" MV2+2
^AUPNPAT("AG" MV2+3
^AUTNEMPL - [#9999999.75] SEL+5, SEL+6, CHK+6
^AUTNEMPL("B" SEL+5!
^DIC(5 - [#5] CHK+2, CHK+11, CHK+12

Label References

Name Line Occurrences
CHK SEL+7, CONT
CONT CHK+5, CHK+14
MOVE CHK+15
MV2 MOVE+2
SEL SEL+4, SEL+5, SEL+8
VERF MOVE+2
XIT SEL+3, SEL+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %X MV1*
>> %Y MV1+1*
AG MOVE+1*, XIT!
AG("MODE" SEL+1*
AG("X" SEL+6*, MOVE+1*, MV1, MV2, MV2+2, MV2+3, MV2+4
AG("X0" SEL+6*, CHK, CHK+1, CHK+2, CHK+8, CHK+9, CHK+10, CHK+11, CHK+15, CONT
AG("XIT" SEL+2*, SEL+8, VERF*
AG("Y" CHK+6*, MOVE+1*, MV1+1, MV1+3, MV2+2, MV2+3, MV2+4
AG("Y0" CHK+6*, CHK+8, CHK+9, CHK+12, CHK+15
>> AGZ("I" MV2+2*, MV2+3*, MV2+4*
>> DA MV1+3*, MV2*, MV2+2*, MV2+3*, MV2+4*
DIC SEL+1!, SEL+2*!, CHK+4*!
DIC("A" SEL+2*, CHK+4*
DIC("S" CHK+4*
DIC(0 SEL+2*, CHK+4*
>> DIE MV2+2*, MV2+3*, MV2+4*
>> DIK MV1+3*, MV2*
DIR CHK+14!, CHK+15!, CONT!, VERF!
DIR("A" CHK+14*, CHK+15*, CONT*, VERF*
DIR("B" CONT*, VERF*
DIR(0 CHK+14*, CHK+15*, CONT*, VERF*
DR MV2+2*!, MV2+3*!, MV2+4*!
U AGTMEMRG+3*, SEL+5, CHK, CHK+1, CHK+2, CHK+8, CHK+9, CHK+10, CHK+11, CHK+12
, CHK+15, CONT
>> X SEL+3
>> Y SEL+4, SEL+5, SEL+6, CHK+5, CHK+6, CHK+14, CHK+15, CONT, VERF, MOVE+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All