VAQDBIP6 ;ALB/JRP - CONTINUATIONS FOR VAQDBIP4;25-MAR-93
Source file <VAQDBIP6.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Patient Data Exchange | 2 | VAQDBIP4 VAQUTL93 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ELIG | ;EXTRACT ELIGIBILITIES
; DECLARATIONS TAKEN CARE OF IN VAQDBIP4 |
|
APPOINT | ;EXTRACT APPOINTMENTS
|
|
APPGET | ; Get last 5 appointments.
; Prior to patch *41, we retrieved data directly from the APPOINTMENTS ; subfile (#2.98) of the PATIENT file. Now, we retrieve using the new ; Scheduling Replacement API from a central database. ; Fields requested: ; Old Description New ; --- ---------------- --- ; .001 Appt date/time 1 ; .01 Clinic 2 ; 3 Status 3 ; 9 Purpose of Visit 18 ; 9.5 Appt type 10 |
|
DENTAL | ;EXTRACT DENTAL APPOINTMENTS
; DECLARATIONS TAKEN CARE OF IN VAQDBIP4 |
Name | Field # of Occurrence |
---|---|
DD^%DT | APPOINT+13, DENTAL+28 |
EN^DIQ1 | ELIG+15, ELIG+27, DENTAL+26 |
$$SDAPI^SDAMA301 | APPGET+17 |
^VAQDBII1 | ELIG+2, APPOINT+3, DENTAL+2 |
$$GETSEQ^VAQDBIP | ELIG+31, APPOINT+14, DENTAL+29 |
$$PATINFO^VAQUTL1 | ELIG+5, APPOINT+6, DENTAL+5 |
$$NCRPFLD^VAQUTL2 | ELIG+7, ELIG+35, ELIG+47, APPOINT+8, APPOINT+18, APPOINT+30, DENTAL+7, DENTAL+33, DENTAL+46 |
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | ELIG+19, DENTAL+12, DENTAL+13 |
^TMP("VAQ" | DENTAL+11!, DENTAL+15*, DENTAL+18, DENTAL+23, DENTAL+28, DENTAL+49! |
^TMP($J | APPGET+22, APPGET+27! |
^UTILITY("DIQ1" | ELIG+14!, ELIG+16, ELIG+26!, ELIG+29, ELIG+45, ELIG+49!, APPOINT+12, APPOINT+28, APPOINT+32!, APPGET+20! , APPGET+23*, APPGET+24*, APPGET+25*, APPGET+26*, DENTAL+25!, DENTAL+44, DENTAL+48! |
Name | Field # of Occurrence |
---|---|
^( | APPGET+22 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> ARRAY | ELIG+31, ELIG+36, ELIG+37, ELIG+43, ELIG+48, APPOINT+14, APPOINT+19, APPOINT+20, APPOINT+26, APPOINT+31 , DENTAL+29, DENTAL+34, DENTAL+35, DENTAL+42, DENTAL+47 |
>> DA | ELIG+11*, ELIG+21*, DENTAL+20* |
>> DA( | ELIG+24*, ELIG+29, ELIG+45, DENTAL+23*, DENTAL+44 |
>> DFN | ELIG+5, ELIG+11, ELIG+16, ELIG+19, ELIG+21, APPOINT+6, APPGET+13, APPGET+22, DENTAL+5, DENTAL+12 , DENTAL+13, DENTAL+20 |
>> DIC | ELIG+10*, ELIG+20*, DENTAL+19* |
>> DIQ(0 | ELIG+13*, ELIG+23*, DENTAL+22* |
>> DR | ELIG+12*, ELIG+22*, DENTAL+21* |
>> DR( | ELIG+25*, DENTAL+24* |
>> ENCRYPT | ELIG+7, ELIG+35, ELIG+47, APPOINT+8, APPOINT+18, APPOINT+30, DENTAL+7, DENTAL+33, DENTAL+46 |
>> ENCSTR | ELIG+6*, ELIG+8, ELIG+34*, ELIG+37, ELIG+38, ELIG+46*, ELIG+48, APPOINT+7*, APPOINT+9, APPOINT+17* , APPOINT+20, APPOINT+21, APPOINT+29*, APPOINT+31, DENTAL+6*, DENTAL+8, DENTAL+32*, DENTAL+35, DENTAL+45*, DENTAL+47 |
>> FLDS | ELIG+3*, ELIG+25, ELIG+40, ELIG+41, APPOINT+4*, APPOINT+23, APPOINT+24, DENTAL+3*, DENTAL+24, DENTAL+38 , DENTAL+39 |
>> LOOP | DENTAL+18* |
>> NAME | ELIG+8*, ELIG+36, APPOINT+9*, APPOINT+19, DENTAL+8*, DENTAL+34 |
>> PRIME | ELIG+16*, ELIG+30 |
>> SEQ | ELIG+31*, ELIG+36, ELIG+37, ELIG+43, ELIG+48, APPOINT+14*, APPOINT+19, APPOINT+20, APPOINT+26, APPOINT+31 , DENTAL+29*, DENTAL+34, DENTAL+35, DENTAL+42, DENTAL+47 |
>> STRING | ELIG+5*, ELIG+6, ELIG+33*, ELIG+34, ELIG+45*, ELIG+46, APPOINT+6*, APPOINT+7, APPOINT+16*, APPOINT+17 , APPOINT+28*, APPOINT+29, DENTAL+5*, DENTAL+6, DENTAL+31*, DENTAL+32, DENTAL+36, DENTAL+44*, DENTAL+45 |
>> TMP | ELIG+2*, ELIG+3, ELIG+18*, ELIG+19*, ELIG+24, APPOINT+3*, APPOINT+4, DENTAL+2*, DENTAL+3, DENTAL+10* , DENTAL+12*, DENTAL+13, DENTAL+15, DENTAL+16*, DENTAL+18*, DENTAL+23, DENTAL+28 |
U | APPGET+23, APPGET+24, APPGET+25, APPGET+26 |
VAQDT | APPOINT+1~, APPOINT+11*, APPOINT+12*, APPOINT+13, APPOINT+28, APPGET+12~, APPGET+21*, APPGET+22*, APPGET+23, APPGET+24 , APPGET+25, APPGET+26 |
VAQREC | APPGET+12~, APPGET+22*, APPGET+23, APPGET+24, APPGET+25, APPGET+26 |
VAQSD | APPGET+12~, APPGET+17 |
VAQSD("FLDS" | APPGET+14* |
VAQSD("MAX" | APPGET+16* |
VAQSD("SORT" | APPGET+15* |
VAQSD(4 | APPGET+13* |
X | ELIG+40*, ELIG+41, APPOINT+23*, APPOINT+24, APPGET+12~, APPGET+17*, DENTAL+13*, DENTAL+14, DENTAL+15, DENTAL+38* , DENTAL+39 |
>> Y | ELIG+29*, ELIG+30, ELIG+33, ELIG+38*, ELIG+43, APPOINT+13*, APPOINT+16, APPOINT+21*, APPOINT+26, DENTAL+28* , DENTAL+31, DENTAL+36*, DENTAL+42 |
>> Z | ELIG+41*, ELIG+43, ELIG+45, ELIG+47, ELIG+48, APPOINT+24*, APPOINT+26, APPOINT+28, APPOINT+30, APPOINT+31 , DENTAL+39*, DENTAL+40, DENTAL+42, DENTAL+44, DENTAL+46, DENTAL+47 |