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 |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PRPFMR1

Package: Integrated Patient Fund

Routine: PRPFMR1


Information

PRPFMR1 ;BAYPINES/MJE DATA MIGRATION ROUTINE 1 ;05/15/03

Source Information

Source file <PRPFMR1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 2 ^%ZIS  ^%ZISC  
VA FileMan 2 DD^%DT  NOW^%DTC  
Master Patient Index VistA 1 $$GETICN^MPIF001  
Registration 1 $$SITE^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Integrated Patient Fund 1 PRPF DATABASE EXTR  

Entry Points

Name Comments DBIA/ICR reference
NODE8
NODE12 ;CHECK STATION ID
SENDSEG ;SEND A SEGMENT OF DATA TO MIGRATION JAVA APP
LEG ;LEGACY ENTRY POINT
OUT ;WRITE OUT TO DEVICE
RPC(RESULTS,PARAM1,PARAM2) ;ENTRY POINT FOR VPFS RPC
SEG ;SET UP NEW SEGMENT NODE
NODE1
KILLIT ;KILL LOCAL VARIABLES
COMPU ;
TEST
NODE0
NODE2
NODE5
NODE4
NODE7
NODE6

External References

Name Field # of Occurrence
DD^%DT LEG+26
NOW^%DTC LEG+26
^%ZIS OUT+4
^%ZISC OUT+11
$$GETICN^MPIF001 COMPU+16
$$SITE^VASITE LEG+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: LEG+9
Function Call: WRITE
  • Prompt: !
  • Line Location: OUT+2
Function Call: WRITE
  • Prompt: !,"Please enter the output device for the detail report or ""^"" to exit:"
  • Line Location: OUT+3
Function Call: WRITE
  • Prompt: "VPFS"_U_PFSITE_U_U_U_U_"0"_U_"A1"_U_CNTPREC_U_CNTXREC
  • Line Location: OUT+7
Routine Call
  • %ZIS
  • Line Location:
    • OUT+4

Used in RPC

RPC Name Call Tags
PRPF DATABASE EXTR RPC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] NODE12+2, NODE12+3
^DPT - [#2] COMPU+1, COMPU+2, COMPU+5, COMPU+6, COMPU+7, COMPU+8, COMPU+9, COMPU+10, COMPU+11, COMPU+12
, COMPU+13, COMPU+14
^PRPF(470 - [#470] LEG+8, LEG+12, LEG+14, LEG+15, LEG+16, LEG+17, LEG+18, LEG+19, LEG+20, LEG+21
, COMPU+19, NODE0, NODE1, NODE2, NODE4+1, NODE4+2, NODE5+1, NODE5+2, NODE5+7, NODE5+8
, NODE5+10, NODE5+14, NODE5+15, NODE6+1, NODE6+2, NODE7+1, NODE7+2, NODE8+1, NODE8+2, NODE12+1
, NODE12+2, NODE12+3, NODE12+4
^PRPF(470.1 - [#470.1] NODE4+4, NODE4+5
^PRPF(470.2 - [#470.2] NODE4+8
^TMP("PRPF_EXTDATA" LEG+2!, LEG+24*, LEG+25*, LEG+27*, LEG+28, SENDSEG+1, NODE0+2*, NODE0+5*, NODE1+2*, NODE2+2*
, NODE4+13*, NODE5+4*, NODE5+12*, NODE5+18*, NODE5+24*, NODE5+27*, NODE6+4*, NODE7+5*, NODE7+11*, NODE7+14*
, NODE8+5*, NODE8+11*, NODE8+14*, OUT+5!, OUT+8, OUT+9, OUT+10, OUT+12!
^VA(200 - [#200] COMPU+20, NODE4+9

Label References

Name Line Occurrences
COMPU LEG+12
KILLIT LEG+30
NODE0 LEG+14
NODE1 LEG+15
NODE12 LEG+13
NODE2 LEG+16
NODE4 LEG+17
NODE5 LEG+18
NODE6 LEG+19
NODE7 LEG+20
NODE8 LEG+21
OUT LEG+29
SEG NODE0+3, NODE0+6, NODE1+3, NODE2+3, NODE4+14, NODE5+5, NODE5+13, NODE5+19, NODE5+25, NODE5+28
, NODE6+5, NODE7+6, NODE7+12, NODE7+15, NODE8+6, NODE8+12, NODE8+15
SENDSEG RPC+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LEG+26
>> %ZIS("B" OUT+4*
>> %ZIS("HFSMODE" OUT+4*
CNTPREC LEG+3*, LEG+10*, LEG+25, OUT+7, KILLIT+1!
CNTREC LEG+3*, LEG+23, NODE0+1*, NODE0+2, NODE0+4*, NODE0+5, NODE1+1*, NODE1+2, NODE2+1*, NODE2+2
, NODE4+12*, NODE4+13, NODE5+3*, NODE5+4, NODE5+11*, NODE5+12, NODE5+17*, NODE5+18, NODE5+23*, NODE5+24
, NODE5+26*, NODE5+27, NODE6+3*, NODE6+4, NODE7+4*, NODE7+5, NODE7+10*, NODE7+11, NODE7+13*, NODE7+14
, NODE8+4*, NODE8+5, NODE8+10*, NODE8+11, NODE8+13*, NODE8+14, SEG+2, SEG+4, SEG+5*, OUT+1
, KILLIT+1!
CNTSEG LEG+7*, NODE0+2, NODE0+5, NODE1+2, NODE2+2, NODE4+13, NODE5+4, NODE5+12, NODE5+18, NODE5+24
, NODE5+27, NODE6+4, NODE7+5, NODE7+11, NODE7+14, NODE8+5, NODE8+11, NODE8+14, SEG+3*, KILLIT+1!
CNTTOT LEG+3*, LEG+23*, LEG+25, SEG+4*, OUT+1*, KILLIT+1!
CNTXREC LEG+7*, NODE0+2, NODE0+5, NODE1+2, NODE2+2, NODE4+13, NODE5+4, NODE5+12, NODE5+18, NODE5+24
, NODE5+27, NODE6+4, NODE7+5, NODE7+11, NODE7+14, NODE8+5, NODE8+11, NODE8+14, SEG+1*, OUT+7
, KILLIT+1!
DTIME LEG+24
IO OUT+6
PARAM1 RPC~, RPC+1
PARAM2 RPC~, RPC+2
PARAMS KILLIT+1!
PFADDR1 COMPU+9*, NODE0+2, KILLIT+1!
PFADDR2 COMPU+10*, NODE0+2, KILLIT+1!
PFADDR3 COMPU+11*, NODE0+2, KILLIT+1!
PFAUTH COMPU+19*, COMPU+20, KILLIT+2!
PFAUTHRS COMPU+20*, COMPU+21*, NODE0+2, KILLIT+2!
PFCITY COMPU+12*, NODE0+2, KILLIT+2!
PFCLAIM COMPU+8*, NODE0+2, KILLIT+2!
PFCLERK NODE4+6*, NODE4+9, KILLIT+2!
PFCLERKN NODE4+9*, NODE4+10*, NODE4+11, KILLIT+2!
PFDOB COMPU+6*, NODE0+2, KILLIT+2!
PFG LEG+3*, LEG+9*, KILLIT+2!
PFICN COMPU+16*, COMPU+17*, NODE0+2, NODE0+5, NODE1+2, NODE2+2, NODE4+13, NODE5+4, NODE5+12, NODE5+18
, NODE5+24, NODE5+27, NODE6+4, NODE7+5, NODE7+11, NODE7+14, NODE8+5, NODE8+11, NODE8+14, KILLIT+3!
PFNAME COMPU+1*, COMPU+3*, COMPU+4*, NODE0+2, KILLIT+3!
PFNODE0 NODE0*, NODE0+5, KILLIT+3!
PFNODE1 NODE1*, NODE1+2, KILLIT+3!
PFNODE12 LEG+11*, NODE0+2, NODE12+2*, NODE12+3*, NODE12+4*, NODE12+5*, KILLIT+3!
PFNODE2 NODE2*, NODE2+2, KILLIT+3!
PFNODE4 NODE4+2*, NODE4+3, NODE4+4, NODE4+5, KILLIT+3!
PFNODE4D NODE4+3*, NODE4+13, KILLIT+3!
PFNODE4T NODE4+5*, NODE4+6, NODE4+7, NODE4+8*, NODE4+11*, NODE4+13, KILLIT+4!
PFNODE5 NODE5+2*, NODE5+4, KILLIT+4!
PFNODE51 NODE5+8*, NODE5+12, NODE5+18, NODE5+24, NODE5+27, KILLIT+4!
PFNODE52 NODE5+15*, NODE5+16, NODE5+18, NODE5+20, NODE5+21, NODE5+22*, NODE5+24, KILLIT+4!
PFNODE53 NODE5+21*, NODE5+27, KILLIT+4!
PFNODE6 NODE6+2*, NODE6+4, KILLIT+4!
PFNODE7 NODE7+2*, NODE7+3, NODE7+5, NODE7+7, NODE7+8, NODE7+9*, NODE7+11, KILLIT+4!
PFNODE71 NODE7+8*, NODE7+14, KILLIT+5!
PFNODE8 NODE8+2*, NODE8+3, NODE8+5, NODE8+7, NODE8+8, NODE8+9*, NODE8+11, KILLIT+5!
PFNODE81 NODE8+8*, NODE8+14, KILLIT+5!
PFSITE LEG+5*, LEG+6*, LEG+11, LEG+25, NODE0+2, NODE0+5, NODE1+2, NODE2+2, NODE4+13, NODE5+4
, NODE5+12, NODE5+18, NODE5+24, NODE5+27, NODE6+4, NODE7+5, NODE7+11, NODE7+14, NODE8+5, NODE8+11
, NODE8+14, NODE12+3, NODE12+4, NODE12+5, OUT+7, KILLIT+5!
PFSSN COMPU+2*, COMPU+3, COMPU+4, COMPU+5*, NODE0+2, NODE0+5, NODE1+2, NODE2+2, NODE4+13, NODE5+4
, NODE5+12, NODE5+18, NODE5+24, NODE5+27, NODE6+4, NODE7+5, NODE7+11, NODE7+14, NODE8+5, NODE8+11
, NODE8+14, KILLIT+5!
PFSTATE COMPU+13*, NODE0+2, KILLIT+5!
PFWARD COMPU+7*, NODE0+2, KILLIT+5!
PFX LEG+3*, OUT+8*, OUT+9, OUT+10, KILLIT+5!
PFXX LEG+3*, OUT+9*, OUT+10, KILLIT+6!
PFZIP COMPU+14*, NODE0+2, KILLIT+6!
POP OUT+5, KILLIT+6!
PRPFHLD1 LEG+3*, LEG+8*, LEG+12, LEG+14, LEG+15, LEG+16, LEG+17, LEG+18, LEG+19, LEG+20
, LEG+21, COMPU+1, COMPU+2, COMPU+4, COMPU+5, COMPU+6, COMPU+7, COMPU+8, COMPU+9, COMPU+10
, COMPU+11, COMPU+12, COMPU+13, COMPU+14, COMPU+16, COMPU+19, NODE0, NODE0+2, NODE0+5, NODE1
, NODE1+2, NODE2, NODE2+2, NODE4+1, NODE4+2, NODE4+13, NODE5+1, NODE5+2, NODE5+4, NODE5+7
, NODE5+8, NODE5+10, NODE5+12, NODE5+14, NODE5+15, NODE5+18, NODE5+24, NODE5+27, NODE6+1, NODE6+2
, NODE6+4, NODE7+1, NODE7+2, NODE7+5, NODE7+11, NODE7+14, NODE8+1, NODE8+2, NODE8+5, NODE8+11
, NODE8+14, NODE12+1, NODE12+2, NODE12+3, NODE12+4, KILLIT+6!
PRPFHLD2 LEG+3*, NODE4*, NODE4+1*, NODE4+2, NODE5*, NODE5+1*, NODE5+2, NODE5+7, NODE5+8, NODE5+10
, NODE5+14, NODE5+15, NODE6*, NODE6+1*, NODE6+2, NODE7*, NODE7+1*, NODE7+2, NODE8*, NODE8+1*
, NODE8+2, KILLIT+6!
PRPFHLD3 LEG+3*, NODE5*, NODE5+6*, NODE5+7*, NODE5+8, NODE5+10, NODE5+14, NODE5+15, KILLIT+6!
PRPFHLD4 LEG+3*, NODE5*, NODE5+9*, NODE5+10, NODE5+14*, NODE5+15, KILLIT+6!
PRPFJ RPC+2*, SENDSEG+1, KILLIT+6!
PRPFOUT1 TEST*, LEG+1*, LEG+22, LEG+29, KILLIT+7!
PRPFSEG RPC+1*, RPC+3, SENDSEG+1, KILLIT+7!
RESULTS RPC~, LEG+28*, SENDSEG+1*
U LEG+4*, LEG+24, LEG+25, NODE0+2, NODE0+5, NODE1+2, NODE2+2, NODE4+13, NODE5+4, NODE5+12
, NODE5+18, NODE5+24, NODE5+27, NODE6+4, NODE7+5, NODE7+11, NODE7+14, NODE8+5, NODE8+11, NODE8+14
, OUT+7
X OUT+4*, KILLIT+7!
XION OUT+4!
>> Y LEG+26*, LEG+27
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Local Variables |  All