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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ACKQAS

Package: Quasar

Routine: ACKQAS


Information

ACKQAS ;AUG/JLTP BIR/PTD HCIOFO/BH-New Clinic Visits ; 04/01/99

Source Information

Source file <ACKQAS.m>

Call Graph

Call Graph

Call Graph Total: 19

Package Total Call Graph
Quasar 9 EDIT^ACKQAS5  ($$DUPEDATA,$$ELIGCHK,$$GETPCETM,DISP,KILL)^ACKQASU  ($$CLIN,$$DUPCHK,$$PCEVST1)^ACKQASU1  ($$POST,UTLAUD)^ACKQASU2  $$PCESEND^ACKQASU3  $$COPYPCE^ACKQASU4  ($$ACKAPMNT,$$SHOWPCE)^ACKQASU7  $$DIV^ACKQUTL2  
($$AUDIO,$$PCE)^ACKQUTL4  
VA FileMan 7 (,DD)^%DT  (,LIST)^DIC  FILE^DICN  (,FILE)^DIE  ^DIK  $$GET1^DIQ  ^DIR  
Kernel 1 KILL^%ZISS  
PCE Patient Care Encounter 1 $$VISITLST^PXAPI  
Registration 1 (DEM,SDA)^VADPT  

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

Package Total Caller Graph
Quasar 4 ACKQAS VISIT ENTRY  ACKQAS5  ACKQTE  ^ACK(509850.6  

Entry Points

Name Comments DBIA/ICR reference
IVD ; INITIAL VISIT DATE ** TRIGGERED FROM PATIENT NAME ***
VISIT ; New visit data input
DIV ;
CLIN
VDATE
PATIENT
PCE ; Select a PCE visit
APPMNT ; Check for any appointments for the patient on this date.
APPMNT1
FILE ; Set up dummy record and run input template
TPLATE ; Call template
VEXIT ; Kill off variables at end of processing
AOA ; COMPUTE AGE ON APPOINTMENT DATE
CHKDT ;
SITE ;
STOP ;
UNLOCK ; Unlock Locked record
HEADING ;
DEL
CHKDTH ;; ACKQ*3*10 ADD CHECK FOR DECEASED PATIENT

External References

Name Field # of Occurrence
^%DT IVD+6
DD^%DT IVD+5
KILL^%ZISS VEXIT+3
EDIT^ACKQAS5 PATIENT+33
$$DUPEDATA^ACKQASU FILE+13
$$ELIGCHK^ACKQASU PATIENT+14
$$GETPCETM^ACKQASU FILE+4
DISP^ACKQASU APPMNT+8
KILL^ACKQASU VEXIT+2
$$CLIN^ACKQASU1 CLIN
$$DUPCHK^ACKQASU1 PATIENT+17
$$PCEVST1^ACKQASU1 PCE+3
$$POST^ACKQASU2 TPLATE+5
UTLAUD^ACKQASU2 TPLATE+4
$$PCESEND^ACKQASU3 TPLATE+6
$$COPYPCE^ACKQASU4 FILE+39
$$ACKAPMNT^ACKQASU7 FILE+7
$$SHOWPCE^ACKQASU7 FILE+42
$$DIV^ACKQUTL2 DIV+3
$$AUDIO^ACKQUTL4 TPLATE+4
$$PCE^ACKQUTL4 PATIENT+30
^DIC PATIENT+2
LIST^DIC VISIT+4
FILE^DICN FILE+23
^DIE TPLATE+1
FILE^DIE FILE+32
^DIK DEL+1
$$GET1^DIQ DIV+6, CLIN+6, STOP+1, STOP+2, STOP+7, STOP+8
^DIR VDATE+2, APPMNT1+5, SITE+4
$$VISITLST^PXAPI PCE+7
DEM^VADPT AOA+1, CHKDTH+2
SDA^VADPT APPMNT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No Future Dates Allowed",!
  • Line Location: IVD+7
Function Call: WRITE
  • Prompt: !,"A&SP site parameters must be established before visits can be entered.",!
  • Line Location: VISIT+2
Function Call: WRITE
  • Prompt: !,"No Divisions have been set up select the Site Parameters function to set up",!,"Division entries.",!
  • Line Location: VISIT+5
Function Call: WRITE
  • Prompt: !!!!!,"No Active Divisions Set up on Site Parameters File"
  • Line Location: DIV+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DIV+4
Function Call: WRITE
  • Prompt: " Station Number : "_$$GET1^DIQ(40.8,ACKDIV,1)
  • Line Location: DIV+6
Function Call: WRITE
  • Prompt: !!!!!,"No Clinics set up for Division "
  • Line Location: CLIN+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CLIN+1
Function Call: WRITE
  • Prompt: !!!,"Clinic: ",$$GET1^DIQ(44,ACKCLIN,.01)," Stop Code: ",ACKCSC(1)
  • Line Location: CLIN+6
Function Call: WRITE
  • Prompt: !,"Jumping not allowed."
  • Line Location: VDATE+2
Function Call: WRITE
  • Prompt: !,"Jumping not allowed."
  • Line Location: PATIENT+2
Function Call: WRITE
  • Prompt: !,"This is a required response. Enter '^' to exit"
  • Line Location: PATIENT+5
Function Call: WRITE
  • Prompt: !!,"DATA ERROR : Patient has no Primary Eligibility defined on the Patient File.",!,"This requires updating before QUASAR processing can commence.",!
  • Line Location: PATIENT+14
Function Call: WRITE
  • Prompt: !,"Jumping not allowed."
  • Line Location: APPMNT1+6
Function Call: WRITE
  • Prompt: !!,$C(7),"Capitation data for that time period has already been compiled.",!,"To insure proper credit for this visit, please make sure the capitation",!,"data is regenerated.",!
  • Line Location: CHKDT+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADING+1
Function Call: WRITE
  • Prompt: !,"This option is used to enter new A&SP clinic visits. Existing clinic",!,"visits should be updated with the Edit an Existing Visit option.",!
  • Line Location: HEADING+2
Function Call: WRITE
  • Prompt: !!,$C(7),"<<INCOMPLETE RECORD DELETED!!>>",!!
  • Line Location: DEL+0
Function Call: WRITE
  • Prompt: !!,ACK(4),!
  • Line Location: CHKDTH+8
Routine Call
  • DIC
  • Line Location:
    • PATIENT+2
Routine Call
  • DIC
  • Line Location:
    • VISIT+4
Routine Call
  • DIE
  • Line Location:
    • TPLATE+1
Routine Call
  • DIE
  • Line Location:
    • FILE+32
Routine Call
  • DIR
  • Line Location:
    • VDATE+2
    • APPMNT1+5
    • SITE+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(40.7 - [#40.7] GET1^DIQ
^DG(40.8 - [#40.8] GET1^DIQ
^SC - [#44] GET1^DIQ
^ACK(509850.2 - [#509850.2] Classic Fileman Calls
^ACK(509850.6 - [#509850.6] Classic Fileman Calls
509850.83 LIST^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACK(509850.2 - [#509850.2] IVD+2
^ACK(509850.6 - [#509850.6] PATIENT+23, FILE+12, FILE+35, AOA+1
^ACK(509850.7 - [#509850.7] CHKDT+1
^ACK(509850.8 - [#509850.8] VISIT+2
^DD("DD" CHKDTH+6
^TMP("ACKQASU4" FILE+42
^UTILITY("VASD" APPMNT+3!, APPMNT+4, APPMNT1, APPMNT1+9, APPMNT1+10!

Label References

Name Line Occurrences
APPMNT PCE+3
APPMNT1 APPMNT1+6
CHKDT FILE+23
CHKDTH PATIENT+10
DEL FILE+38
DIV CLIN, CLIN+1, VDATE+3, PATIENT+3, PATIENT+4, PATIENT+14, PATIENT+17, PCE+8, APPMNT1+7
FILE PATIENT+40, PCE+11, APPMNT+4
HEADING FILE+7, FILE+12, FILE+38, TPLATE+7
PATIENT PATIENT+2, PATIENT+5, PATIENT+11
STOP CLIN+4, FILE+31
TPLATE TPLATE+5, TPLATE+6
UNLOCK FILE+12, FILE+38, TPLATE+7
VDATE VDATE+2
VEXIT DIV+1, DIV+2, DIV+3, DIV+4, CLIN, PATIENT+14, PATIENT+20, FILE+7, FILE+12, FILE+38
, TPLATE+7
VISIT PATIENT+20, PATIENT+33, FILE+7, FILE+12, FILE+38, TPLATE+7

Naked Globals

Name Field # of Occurrence
^(0 IVD+2, AOA+1, CHKDT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT IVD+1~, IVD+5*, IVD+6!
%DT("A" IVD+5*
%DT("B" IVD+6*
A1 IVD+8!
ACK CHKDTH+1~
ACK(4 CHKDTH+3*, CHKDTH+7*, CHKDTH+8
ACKAPMNT APPMNT1+9*, FILE+7, FILE+8!
ACKARR FILE+26!
ACKARR( FILE+27*, FILE+28*, FILE+29*, FILE+30*, FILE+31*
>> ACKCLIN CLIN*, CLIN+1, CLIN+2*, CLIN+6, PATIENT+24, PCE+3, PCE+7, APPMNT+1, FILE+7, FILE+12
, FILE+13, FILE+27, STOP+1, STOP+7
>> ACKCSC PATIENT+25, FILE+31, STOP+3*, STOP+4*, STOP+5*, STOP+6, STOP+9*, STOP+10*
>> ACKCSC(1 CLIN+6, STOP+2*, STOP+4, STOP+5, STOP+8*, STOP+9, STOP+10
ACKCSCP STOP+1*, STOP+2, STOP+7*, STOP+8, STOP+12!
>> ACKDA TPLATE+1*
>> ACKDFN PATIENT+7*, TPLATE+5*, TPLATE+6*
ACKDIRUT CHKDTH+1~
>> ACKDIV DIV+3, DIV+5*, DIV+6, CLIN, PATIENT+30, FILE+28
>> ACKDIV( DIV+5
>> ACKDIV("" DIV+5
>> ACKDVN DIV+1, DIV+3*, DIV+4, DIV+6, CLIN
>> ACKECSC PATIENT+23*, PATIENT+25
>> ACKERR FILE+38, FILE+39*, FILE+42*
>> ACKESITE PATIENT+23*, PATIENT+24
>> ACKFLG1 PATIENT+20*, PATIENT+24*, PATIENT+26, PATIENT+27
>> ACKFLG2 PATIENT+20*, PATIENT+25*, PATIENT+26
>> ACKGEN CHKDT+1*, CHKDT+2
>> ACKLAYGO PATIENT+2*, FILE+22*
>> ACKLOSS TPLATE+4
>> ACKMON CHKDT+1*
ACKNUM APPMNT1*, APPMNT1+1, APPMNT1+5!
ACKOUT VISIT+1~, PATIENT+9*, PATIENT+11*, CHKDTH+8*
>> ACKPAT PATIENT+6*, PATIENT+17, PCE+3, PCE+7, FILE+7, FILE+12, FILE+13
>> ACKPCE PATIENT+30*, PATIENT+40, FILE+3, FILE+7, FILE+38, TPLATE+6
>> ACKPCENO PCE+7*, PCE+8, PCE+11, FILE+3, FILE+4, FILE+18*, FILE+30, FILE+38, FILE+39
>> ACKQCHK FILE+12, FILE+13*, FILE+14
>> ACKQTST TPLATE+5*, TPLATE+6
ACKREQ TPLATE+3!
>> ACKSITE SITE+4*
>> ACKTRGT("DILIST" VISIT+5
>> ACKVD IVD+5, VDATE+4*, PATIENT+17, PATIENT+30, PCE+3, PCE+7, APPMNT+1, FILE+7, FILE+12, FILE+13
, FILE+23
>> ACKVIEN FILE+24*, FILE+27, FILE+28, FILE+29, FILE+30, FILE+31, FILE+35, FILE+39, TPLATE+1, TPLATE+5
, TPLATE+6, DEL+1
>> ACKVISIT PATIENT+37*
>> ACKVSEL PATIENT+17*, PATIENT+18
>> ACKVTME PATIENT+37*, PATIENT+40*, PCE+9*, APPMNT1+9*, FILE+3, FILE+4*, FILE+5*, FILE+7, FILE+12, FILE+13
, FILE+17*, FILE+29
>> ACKY PATIENT+18*, PATIENT+23
>> CLINVARR DIV+1
D0 IVD+1~, PATIENT+36!, AOA+1
DA PATIENT+18*, PATIENT+20, PATIENT+26!, PATIENT+33, PATIENT+36!, TPLATE+1*, DEL+1*
DA(1 SITE+1*
DD IVD+1~, PATIENT+36!
DDD IVD+1~
DFN IVD+1~, IVD+2*, PATIENT+6*, PATIENT+7, TPLATE+5, TPLATE+6, AOA+1~*
>> DIC PATIENT*, FILE+22*
>> DIC("W" PATIENT+1*
>> DIC(0 PATIENT*, FILE+22*
>> DIE TPLATE+1*
>> DIK DEL+1*
DIR VDATE+2!, APPMNT1+5!, SITE+4!
DIR("?" VDATE+1*, APPMNT1+3*, SITE+3*
DIR("??" VDATE+1*
DIR("A" VDATE*, APPMNT1+1*, SITE+2*
DIR("B" VDATE*, APPMNT1+2*
DIR(0 VDATE*, APPMNT1+4*, SITE+1*
>> DIRUT VDATE+3, APPMNT1+7, SITE+4
>> DLAYGO PATIENT*, FILE+22*
DO PATIENT+36!
>> DR TPLATE+1*
DT IVD+4, IVD+7
>> DTOUT PATIENT+3
I CHKDTH+1~
IOF HEADING+1
U IVD+2, VISIT+5, DIV+1, DIV+3, DIV+4, DIV+5, DIV+6, CLIN, CLIN+2, PATIENT+23
, APPMNT1+9, FILE+4, FILE+24, AOA+1, CHKDT+2
VA AOA+1~, CHKDTH+1~
VADM AOA+1~, CHKDTH+1~
VADM(3 AOA+1
VADM(6 CHKDTH+4, CHKDTH+5
VAERR AOA+1~, CHKDTH+1~
>> VASD("C" APPMNT+1*
>> VASD("F" APPMNT+1*
>> VASD("T" APPMNT+1*
>> VASD("W" APPMNT+2*
X IVD+2*, IVD+3, IVD+4, IVD+6*, IVD+7, VDATE+2, PATIENT+2, PATIENT+4, APPMNT1+6, APPMNT1+9*
, FILE+23*, AOA+1*, CHKDT+1, CHKDTH+1~
X1 AOA+1~*
X2 AOA+1~*
Y IVD+1~, IVD+5*, IVD+6, VDATE+4, PATIENT+5, PATIENT+6, FILE+24, SITE+4, CHKDTH+1~, CHKDTH+5*
, CHKDTH+7
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 |  Naked Globals |  Local Variables  | All