Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: QACI3

Package: Patient Representative

Routine: QACI3


Information

QACI3 ; OAKOIFO/TKW - DATA MIGRATION - VISTALINK RPC CODE ;7/27/05 16:18

Source Information

Source file <QACI3.m>

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Representative 1 QACI LOAD REFERENCE TABLES  

Entry Points

Name Comments DBIA/ICR reference
EN(PATSBY,PATSNO,PATSLIST,PATSFLAG,PATSFRST) ;
; Read list of migrated reference table entries in PATSLIST, put into
; ^XTMP. Then return the next PATSNO entries into global PATSBY,
; from the table referrenced by PATSFLAG.
; PATSBY = the name of the output global
; PATSNO = the number of records to return
; PATSLIST = If defined, contains a list of ^ delimited strings
; 0 node set to a flag indicating which file these came from.
; The other entries contain two pieces:
; 1)ien or primary key of the entry on the M VistA side
; 2)primary key of the entry in the Oracle table (usually id).
; PATSFLAG="H" (hospital location), "U" (user), "P" (patient),
; "C" (congressional contact), "E" (employee involved),
; "F" (facility service or section)
; PATSFRST = 1 on the first call to this routine, 0 on subsequent calls.
LISTIN ; Move Ids of migrated data entries into ^XTMP
LISTOUT ; Build next set of data to be migrated into ^TMP global

Used in RPC

RPC Name Call Tags
QACI LOAD REFERENCE TABLES EN

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP( EN+35
^XTMP("QACMIGR" EN+26, EN+27, EN+34, LISTOUT+7, LISTOUT+18

Label References

Name Line Occurrences
LISTIN EN+28
LISTOUT EN+37

Naked Globals

Name Field # of Occurrence
^( LISTOUT+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT LISTIN+1~*, LISTIN+9*, LISTIN+12, LISTIN+14, LISTIN+17, LISTOUT+2~, LISTOUT+6*, LISTOUT+7*, LISTOUT+8, LISTOUT+13*
LISTOUT+17*, LISTOUT+21, LISTOUT+22*, LISTOUT+23, LISTOUT+26*, LISTOUT+27
DONENAME EN+17~, EN+27*, LISTIN+8, LISTIN+14
FLAG EN+17~, EN+20*, EN+21, EN+31*, EN+32, LISTOUT+16, LISTOUT+24
I LISTIN+1~, LISTIN+2*, LISTOUT+2~, LISTOUT+6*, LISTOUT+7, LISTOUT+21*, LISTOUT+27
PATSBY EN~, EN+35*, LISTOUT+1, LISTOUT+8, LISTOUT+18, LISTOUT+23, LISTOUT+27
PATSFLAG EN~, EN+31
PATSFRST EN~, EN+18*, LISTOUT+4
PATSLIST EN~
PATSLIST( LISTIN+2
PATSLIST(0 EN+20
PATSNO EN~, EN+18*, LISTOUT+17*, LISTOUT+21
TYPE EN+17~, EN+20*, EN+21*, EN+25, EN+26, EN+27, EN+32*, EN+33, EN+34, EN+35
LISTOUT+18
UNAME EN+17~, EN+26*, EN+34*, LISTIN+7, LISTIN+11, LISTIN+15, LISTIN+17, LISTOUT+12, LISTOUT+16, LISTOUT+21
LISTOUT+27
X LISTIN+1~, LISTIN+2*, LISTIN+3*, LISTIN+5, LISTIN+8, LISTOUT+2~, LISTOUT+21*, LISTOUT+23
XOUT LISTOUT+2~, LISTOUT+4*, LISTOUT+8*
>> Y LISTIN+3*, LISTIN+7, LISTIN+8
Info |  Source |  Caller Graph |  Entry Points |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All