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