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

Package: Quasar

Routine: ACKQUTL3


Information

ACKQUTL3 ;HCIOFO/AG - QUASAR Utility Routine ; 12/13/02 3:51pm

Source Information

Source file <ACKQUTL3.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 2 (FILE,UPDATE)^DIE  ($$GET1,GETS)^DIQ  
PCE Patient Care Encounter 1 ENCEVENT^PXAPI  
Quasar 1 $$FMT^ACKQUTL6  

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

Package Total Caller Graph
Quasar 5 ACKQAS4  ACKQASU3  ACKQNQ  ACKQPCE1  ACKQPCX  

Entry Points

Name Comments DBIA/ICR reference
PCECHKV(ACKVIEN) ; is PCE Visit still same patient etc.
; this function will check that the Qsr Visit (ACKVIEN) has the same
; values for Patient, Clinic, Date and Time as the PCE Visit that it
; points to.
; inputs:- ACKVIEN - QUASAR Visit IEN (reqd)
; outputs:- see function $$PCECHK below!
PCECHK(ACKPCE,ACKDT,ACKTM,ACKPAT,ACKCLN) ; is PCE Visit still same patient etc.
; this function will check that the Qsr Visit (ACKVIEN) has the same
; values for Patient, Clinic, Date and Time as the PCE Visit that it
; points to.
; inputs:- ACKPCE - PCE Visit IEN (reqd)
; ACKDT - date of visit (reqd) (fileman internal)
; ACKTM - time of visit (reqd) (qsr time .n[nnnnn])
; ACKPAT - patient (reqd)
; ACKCLN - clinic (reqd)
; outputs:- string
; value: "0^X^Y^Z" - either the date, patient or clinic differ
; where X=Clinics are same (1 or 0)
; Y=Patients are same (1 or 0)
; Z=Dates are same (1 or 0)
; eg "0^1^0^0" = patient and dates differ
; "1^.123" - only time is different (.123=Pce time)
; "2^" - all fields the same
DISPLAY(ACKVIEN,XPOS) ; create summary line for visit selection
PCEERR(ACKVIEN,ACKARR,ACKNUM,ACKWIDE) ; retrieve PCE Errors for a visit and store in ACKARR
; inputs:- ACKVIEN - visit ien (reqd)
; ACKARR - array name in which to place errors (indirection
; used to file data ie @ACKARR@(x) (reqd)
; ACKNUM - Error number (if only one reqd) (opt)
; ACKWIDE - max number of characters in each line (opt)
; outputs:-
; ACKARR=n - number of lines to display
; ACKARR(1-n)=text - text of error (wrapped to ACKWIDE characters)
; if @ACKARR already contains data then this subroutine will append
; the PCE Errors starting at line @ACKARR+1. It is up to the calling
; routine to clear the array @ACKARR before calling this function.
PROBLIST(ACKPAT,ACKECHO) ; re-build the problem list for a Patient
; this function will run down the QUASAR Visits for a patient and
; create an accurate problem list for the patient on the A&SP
; PATIENT file. The function will be called from the Patient
; Inquiry option and the Delete Visit function.
; inputs:- ACKPAT - patient DFN
; ACKECHO - whether to display progress
PROBLISX ; all done

External References

Name Field # of Occurrence
$$FMT^ACKQUTL6 DISPLAY+2
FILE^DIE PROBLIST+32, PROBLIST+40
UPDATE^DIE PROBLIST+56
$$GET1^DIQ DISPLAY+2, DISPLAY+3, DISPLAY+4, DISPLAY+5, PROBLIST+18
GETS^DIQ PCECHKV+7, PCEERR+17, PCEERR+18, PROBLIST+20, PROBLIST+35
ENCEVENT^PXAPI PCECHK+21

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No Diagnosis was found in the A&SP CLINIC VISIT file for this patient.",!
  • Line Location: PROBLIST+44
Function Call: WRITE
  • Prompt: !!,"Now updating diagnostic history.",!
  • Line Location: PROBLIST+51
Routine Call
  • DIE
  • Line Location:
    • PROBLIST+32
    • PROBLIST+40
Routine Call
  • DIE
  • Line Location:
    • PROBLIST+56

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ACK(509850.2 - [#509850.2] GETS^DIQ
^ACK(509850.6 - [#509850.6] GET1^DIQ,  GETS^DIQ
509850.65 GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACK(509850.6 - [#509850.6] PROBLIST+16
^TMP("ACKQUTL3" PCEERR+13!, PCEERR+14, PCEERR+40!, PROBLIST+11!, PROBLIST+12, PROBLISX+1!
^TMP("PXKENC" PCECHK+18!, PCECHK+22, PCECHK+24, PCECHK+25, PCECHK+26!

Label References

Name Line Occurrences
$$PCECHK PCECHKV+14
PROBLISX PROBLIST+43

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DISPLAY+9, DISPLAY+10, DISPLAY+13, DISPLAY+14, DISPLAY+16
ACKAM DISPLAY+1~
ACKARR PCEERR~, PCEERR+19, PCEERR+25, PCEERR+28, PCEERR+30, PCEERR+38, PCEERR+39, PROBLIST+7~, PROBLIST+30!, PROBLIST+38!
, PROBLIST+53!
ACKARR( PROBLIST+31*, PROBLIST+39*, PROBLIST+54*, PROBLIST+55*
ACKCLN PCECHKV+6~, PCECHKV+13*, PCECHKV+14, PCECHK~, PCECHK+29, PCECHK+31, DISPLAY+1~, DISPLAY+4*, DISPLAY+11*, DISPLAY+12
, DISPLAY+14*, DISPLAY+15, DISPLAY+17*, DISPLAY+18
ACKCT PCEERR+12~, PCEERR+19*, PCEERR+25*, PCEERR+28*, PCEERR+30*, PCEERR+38*, PCEERR+39
ACKDIEN PROBLIST+7~, PROBLIST+22*, PROBLIST+23, PROBLIST+24, PROBLIST+36*, PROBLIST+37, PROBLIST+39
ACKDISP DISPLAY+1~, DISPLAY+12*, DISPLAY+15*, DISPLAY+18*, DISPLAY+22*, DISPLAY+23
ACKDT PCECHKV+6~, PCECHKV+10*, PCECHKV+14, PCECHK~, PCECHK+29, PCECHK+33, PROBLIST+7~, PROBLIST+18*, PROBLIST+26, PROBLIST+27
, PROBLIST+48*, PROBLIST+52*, PROBLIST+55
ACKDT1 PROBLIST+7~, PROBLIST+25*, PROBLIST+26
ACKECHO PROBLIST~, PROBLIST+10*, PROBLIST+43, PROBLIST+51
ACKICD PROBLIST+7~, PROBLIST+24*, PROBLIST+25, PROBLIST+26, PROBLIST+47*, PROBLIST+48, PROBLIST+52*, PROBLIST+54
ACKIVDT PROBLIST+7~, PROBLIST+15*, PROBLIST+27*, PROBLIST+31
ACKLEN DISPLAY+1~, DISPLAY+7*, DISPLAY+8, DISPLAY+11, DISPLAY+17, DISPLAY+20*, DISPLAY+21
ACKNUM PCEERR~, PCEERR+15*, PCEERR+17, PCEERR+18
>> ACKP DISPLAY+5*, DISPLAY+12, DISPLAY+15, DISPLAY+18, DISPLAY+22
ACKPAT PCECHKV+6~, PCECHKV+12*, PCECHKV+14, PCECHK~, PCECHK+29, PCECHK+32, DISPLAY+1~, DISPLAY+3*, DISPLAY+8*, DISPLAY+12
, DISPLAY+18, DISPLAY+21*, DISPLAY+22, PROBLIST~, PROBLIST+9, PROBLIST+16, PROBLIST+31, PROBLIST+35, PROBLIST+37, PROBLIST+54
, PROBLIST+55
ACKPCE PCECHKV+6~, PCECHKV+8*, PCECHKV+9, PCECHKV+14, PCECHK~, PCECHK+21, PCECHK+22, PCECHK+24, PCECHK+25
ACKSTR PCECHK+17~, PCECHK+29, PCECHK+30*, PCECHK+31*, PCECHK+32*, PCECHK+33*
ACKSUB PCEERR+12~, PCEERR+20*, PCEERR+21, PCEERR+23, PCEERR+27, PCEERR+29, PCEERR+32
ACKTGT PCECHKV+6~
ACKTGT( PCECHKV+8, PCECHKV+10, PCECHKV+11, PCECHKV+12, PCECHKV+13
ACKTIME DISPLAY+1~, DISPLAY+2*, DISPLAY+12, DISPLAY+15, DISPLAY+18, DISPLAY+22
ACKTM PCECHKV+6~, PCECHKV+11*, PCECHKV+14, PCECHK~, PCECHK+36, DISPLAY+1~, DISPLAY+2*
ACKTMP PCEERR+12~, PCEERR+14*, PCEERR+17, PCEERR+18, PCEERR+20, PCEERR+23, PCEERR+27, PCEERR+29, PCEERR+32, PROBLIST+7~
, PROBLIST+12*, PROBLIST+20, PROBLIST+22, PROBLIST+24, PROBLIST+25, PROBLIST+26, PROBLIST+35, PROBLIST+36, PROBLIST+43, PROBLIST+47
, PROBLIST+48, PROBLIST+52
ACKVIEN PCECHKV~, PCECHKV+7, PCECHKV+8, PCECHKV+10, PCECHKV+11, PCECHKV+12, PCECHKV+13, DISPLAY~, DISPLAY+2, DISPLAY+3
, DISPLAY+4, DISPLAY+5, PCEERR~, PCEERR+17, PCEERR+18, PCEERR+21, PROBLIST+7~, PROBLIST+16*, PROBLIST+18, PROBLIST+20
, PROBLIST+23
ACKWIDE PCEERR~, PCEERR+16*, PCEERR+24, PCEERR+26, PCEERR+27, PCEERR+29, PCEERR+34, PCEERR+35
I PCEERR+12~, PCEERR+34*, PCEERR+35*, PCEERR+36
PCECLN PCECHK+17~, PCECHK+25*, PCECHK+29, PCECHK+31
PCEDT PCECHK+17~, PCECHK+23*, PCECHK+29, PCECHK+33
PCEDTTM PCECHK+17~, PCECHK+22*, PCECHK+23
PCEPAT PCECHK+17~, PCECHK+24*, PCECHK+29, PCECHK+32
PCETM PCECHK+17~, PCECHK+23*, PCECHK+36
TXT PCEERR+12~, PCEERR+23*, PCEERR+24, PCEERR+25, PCEERR+26, PCEERR+27*, PCEERR+28, PCEERR+29*, PCEERR+30, PCEERR+32*
, PCEERR+33, PCEERR+34, PCEERR+37*
TXT2 PCEERR+12~, PCEERR+34*, PCEERR+35, PCEERR+36*, PCEERR+37, PCEERR+38
U PCECHK+22, PCECHK+24, PCECHK+25, PCECHK+31, PCECHK+32, PCECHK+33
XPOS DISPLAY~, DISPLAY+6, DISPLAY+7, DISPLAY+19, DISPLAY+20
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All