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

Package: Patient Representative

Routine: QACI2


Information

QACI2 ; OAKOIFO/TKW - DATA MIGRATION - BUILD SUPPORTING TABLE AND ROC DATA TO MIGRATE ;1/24/07 17:14

Source Information

Source file <QACI2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Patient Representative 4 ^QACI20  ($$ASK,BLDCC,BLDISS,CEMOCTS,PARVISN)^QACI2A  (ERRPT,UPDCNT,UPDERRCT)^QACI2E  $$EN1^QACI5  
Kernel 2 ($$DT,$$FMADD,$$FMTE)^XLFDT  $$STA^XUAF4  
VA FileMan 1 $$GET1^DIQ  

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

Package Total Caller Graph
Patient Representative 3 QACI MIGRATION DATA BUILD  QACI NATL INSTITUTION LIST  QACI0  

Entry Points

Name Comments DBIA/ICR reference
EN ; Main entry point for building both legacy supporting table data
; and ROC data to be migrated. Skip entries that have already
; been migrated.
EN0 ; Entry point from ^QACI0 (Just check for errors, don't save data to staging area for migration)
; If called from ^QACI0, QACI0 will be set to 1.
;
; Get QA Site Parameter station number, and VISN Name
ENLDSTA(PATSBY,QACSLIST) ; Load list of stations from sdsadm.std_institution table
; PATSBY is set to 1 if this runs to completion, to 0 otherwise.
; QACSLIST is an input array of station numbers
STAERR ; Display error if national stations not downloaded from EMC

External References

Name Field # of Occurrence
$$GET1^DIQ EN0+22
^QACI20 EN0+45
$$ASK^QACI2A EN+8
BLDCC^QACI2A EN0+41
BLDISS^QACI2A EN0+38
CEMOCTS^QACI2A EN0+36
PARVISN^QACI2A EN0+4
ERRPT^QACI2E EN0+51
UPDCNT^QACI2E EN0+47
UPDERRCT^QACI2E EN0+49
$$EN1^QACI5 EN+12
$$DT^XLFDT EN0+11, ENLDSTA+8
$$FMADD^XLFDT EN0+14, ENLDSTA+9
$$FMTE^XLFDT EN0+12
$$STA^XUAF4 EN0+22

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"*** CAUTION! Another user is trying to auto-close ROCs. Allow the process to",!,"finish before moving data. ***"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"** No Contacts were Auto-Closed. **"
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !!,"QA Site Parameter Station Number or VISN cannot be found!"
  • Line Location: EN0+5
Function Call: WRITE
  • Prompt: !!,"QA Site Parameter Station Number not 3 digits!"
  • Line Location: EN0+6
Function Call: WRITE
  • Prompt: !!,"Server Station Number cannot be found!"
  • Line Location: EN0+21
Function Call: WRITE
  • Prompt: !!,"QA Site Parameter Station Number not the same as Computing Station!"
  • Line Location: EN0+34
Function Call: WRITE
  • Prompt: !!,"*** You must first run the option to download the list of nationally ***",!
  • Line Location: STAERR+1
Function Call: WRITE
  • Prompt: "*** recognized stations. See the PATS Data Migration Guide. ***"
  • Line Location: STAERR+2

Used in RPC

RPC Name Call Tags
QACI NATL INSTITUTION LIST ENLDSTA

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^XTV(8989.3 - [#8989.3] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] EN0+24
^XTMP("QACMIGR" EN+4, EN+6, EN+7, EN0+14*, EN0+18!, EN0+29*, EN0+30*, EN0+32*, EN0+33*, EN0+38
, ENLDSTA+5!, ENLDSTA+7, ENLDSTA+9*, ENLDSTA+13*

Label References

Name Line Occurrences
STAERR EN+6

Naked Globals

Name Field # of Occurrence
^( EN0+24
^("E" EN0+18!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CATEGORY EN0+9~
CC EN0+8~
CCNAME EN0+9~
CE EN0+8~
CONDATE EN0+8~
CURRDT EN0+9~, EN0+11*, EN0+12, EN0+14, ENLDSTA+8~*, ENLDSTA+9
DA EN0+9~
DFN EN0+8~
DIK EN0+9~
DOTCNT EN0+9~, EN0+15*
EDITDIV EN0+9~
EDITEBY EN0+9~
EDITIBY EN0+9~
EDITITXT EN0+9~
EDITRTXT EN0+9~
ELIGSTAT EN0+9~
EMPINV EN0+8~
ENTBY EN0+8~
FSOS EN0+8~
HL EN0+8~
I EN0+9~, EN0+24*, ENLDSTA+11~*, ENLDSTA+12*
INFOBY EN0+8~
INTAPPL EN0+8~
ISSIEN EN0+8~
ITXTCNT EN0+9~
ITXTLN EN0+9~
MOC EN0+8~
MOCSTR EN0+8~
OLDROC EN0+8~
PARENT EN0+4~, EN0+6, EN0+30, EN0+34, EN0+41
PATID EN0+8~
PATSBY ENLDSTA~, ENLDSTA+3*, ENLDSTA+15*
PATSCNT EN0+9~, EN0+41, EN0+47
PATSCNT( EN0+19*
PATSDT EN0+8~, EN0+12*
PATSDUZ2 EN0+9~
PATSERR EN0+9~
PHDESC EN0+8~
PHONE EN0+8~
QACDIV EN0+9~
QACDIV( EN0+24*
QACI0 EN+10~*, EN0+26, EN0+47, EN0+51
QACSLIST ENLDSTA~
QACSLIST( ENLDSTA+12
QACSLIST("" ENLDSTA+4
QACSTA ENLDSTA+11~, ENLDSTA+12*, ENLDSTA+13
RESDATE EN0+8~
RLUPSTAT EN0+9~
ROC0 EN0+8~
ROC2 EN0+8~
ROC7 EN0+8~
ROCIEN EN0+8~
ROCISS EN0+8~
ROCNO EN0+8~
SRVRSTA EN0+9~, EN0+21, EN0+22*, EN0+30, EN0+32, EN0+33, EN0+34
STATION EN0+8~
TS EN0+8~
TYPE EN0+8~, EN0+17*, EN0+18, EN0+19
VISNNAME EN0+4~, EN0+5, EN0+29, EN0+30
X EN0+9~, EN0+24*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All