SDRPA08 ;BP-OIFO/OWAIN,ESW - Patient Appointment Data Compilation ; 9/10/04 9:41am ; Compiled April 24, 2006 16:55:01 ; Compiled July 1, 2008 16:48:16
Source file <SDRPA08.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 3 | DEM^VADPT EN^VAFHLZCL $$SITE^VASITE |
| Kernel | 1 | $$HLNAME^XLFNAME |
| Scheduling | 1 | GETAPPT^SDAMA201 |
| Uncategorized | 1 | $$GETICN^MPIF001 |
| VA Fileman | 1 | ($$GET1,GETS)^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DTCONV(DT) | ; Date conversion.
; CYYMMDD -> CCYYMMDD ; CYYMMDD.H{HMMSS} -> CCYYMMDDHHMM |
|
| GETNAME(NMID) | ; Name in HL7 format.
|
|
| NEWAT(DFN,SDADT,SDSTOP1,SDCSTOP1,SDFAC) | ; New to facility/clinic flag.
|
|
| GT24(DATE1,DATE2) | ; Are two dates greater than 24 months apart?
; DATE1 should be before DATE2. ; If they are not in that order, they are swapped anyway. |
|
| DPT(DFN,SDCE) | ;
; Extrinsic. Returns boolean, 0: ^TMP("SDDPT",$J,DFN) not created; 1: created. |
|
| APPT(DFN,SDADT,SDDM,SDCL,SDSTAT) | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | APPT+8, APPT+9, APPT+12, APPT+14, APPT+16, APPT+17, APPT+26, APPT+27, APPT+28, APPT+29 , APPT+30, APPT+43, APPT+49, APPT+50, APPT+58, APPT+59, NEWAT+5, NEWAT+6, NEWAT+7, NEWAT+8 , NEWAT+10, NEWAT+11, NEWAT+21, NEWAT+22, NEWAT+23, NEWAT+25, NEWAT+26, DPT+4, DPT+5 |
| GETS^DIQ | APPT+5, DPT+7 |
| $$GETICN^MPIF001 | DPT+10 |
| GETAPPT^SDAMA201 | APPT+46 |
| DEM^VADPT | DPT+12 |
| EN^VAFHLZCL | APPT+44 |
| $$SITE^VASITE | APPT+19, APPT+20, NEWAT+13, NEWAT+14, NEWAT+28, NEWAT+29 |
| $$HLNAME^XLFNAME | GETNAME+3 |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ, GETS^DIQ |
| 2.98 | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
| ^DGEN(27.11 - [#27.11] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^DIC(40.7 - [#40.7] | GET1^DIQ |
| ^DG(40.8 - [#40.8] | GET1^DIQ |
| ^SCE - [#409.68] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ, GETS^DIQ |
| 44.1 | GET1^DIQ |
| ^AUPNVSIT - [#9000010] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | NEWAT+3, NEWAT+19 |
| ^SC - [#44] | APPT+57 |
| ^TMP("SDDPT" | APPT+38*, APPT+39*, APPT+40*, APPT+41*, APPT+53*, APPT+59*, DPT+6, DPT+19* |
| ^TMP($J | APPT+46!, APPT+47 |
| Name | Line Occurrences |
|---|---|
| $$DTCONV | APPT+23, APPT+25, APPT+26, APPT+29, APPT+38, DPT+15 |
| $$GETNAME | DPT+14 |
| $$GT24 | NEWAT+3, NEWAT+19 |
| $$NEWAT | APPT+35 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | APPT+3~, NEWAT+4~, NEWAT+20~, DPT+3~ |
| ARRAY(2 | DPT+8, DPT+9 |
| ARRAY(44 | APPT+6, APPT+7, APPT+10 |
| DATE1 | GT24~, GT24+4*, GT24+5 |
| DATE2 | GT24~, GT24+4*, GT24+5 |
| DFN | APPT~, APPT+26, APPT+27, APPT+28, APPT+29, APPT+30, APPT+35, APPT+38, APPT+39, APPT+40 , APPT+41, APPT+43, APPT+44, APPT+46, APPT+53, APPT+59, NEWAT~, NEWAT+3, NEWAT+5, NEWAT+19 , NEWAT+21, DPT~, DPT+4, DPT+6, DPT+7, DPT+8, DPT+9, DPT+10, DPT+14, DPT+19 |
| DOB | DPT+3~, DPT+15*, DPT+19 |
| DT | DTCONV~, DTCONV+3, DTCONV+4 |
| ICN | DPT+3~, DPT+10*, DPT+11*, DPT+19 |
| MONTHS | GT24+3~, GT24+5*, GT24+6 |
| NAME | DPT+3~, DPT+14*, DPT+19, GETNAME+1~ |
| NAME(1 | DPT+13*, GETNAME+3*, GETNAME+4 |
| NMID | GETNAME~, GETNAME+2 |
| OK | NEWAT+1~, NEWAT+2*, NEWAT+3, NEWAT+15*, NEWAT+17, NEWAT+19, NEWAT+30*, NEWAT+32, NEWAT+33* |
| PROVID | APPT+56~, APPT+58*, APPT+59 |
| SD6A | APPT+3~, APPT+37* |
| SD8A | APPT+3~, APPT+37* |
| SD8RD | APPT+3~, APPT+24*, APPT+25*, APPT+40 |
| SDADT | APPT~, APPT+26, APPT+27, APPT+28, APPT+29, APPT+30, APPT+35, APPT+38, APPT+39, APPT+40 , APPT+41, APPT+43, APPT+46, APPT+53, APPT+59, NEWAT~, NEWAT+2, NEWAT+3*, NEWAT+5, NEWAT+18* , NEWAT+19*, NEWAT+21, DPT+3~ |
| SDADT0 | NEWAT+1~, NEWAT+2*, NEWAT+3, NEWAT+18, NEWAT+19 |
| SDARDT | APPT+3~, APPT+29*, APPT+38 |
| SDARF | APPT+3~, APPT+28*, APPT+32 |
| SDCDT | APPT+3~, APPT+27*, APPT+38 |
| SDCE | DPT~, DPT+5*, DPT+19 |
| SDCHKOUT | APPT+4~, APPT+22*, APPT+23*, APPT+38 |
| SDCL | APPT~, APPT+5, APPT+6, APPT+7, APPT+10, APPT+14, APPT+39, APPT+57, APPT+58, NEWAT+4~ , NEWAT+5*, NEWAT+6, NEWAT+7, NEWAT+8, NEWAT+20~, NEWAT+21*, NEWAT+22, NEWAT+23 |
| SDCLNM | APPT+3~, APPT+6*, APPT+39 |
| SDCNT | APPT+4~, APPT+55*, APPT+57, APPT+58*, APPT+59 |
| SDCSTOP | APPT+3~, APPT+11*, APPT+12*, APPT+39 |
| SDCSTOP1 | APPT+3~, APPT+10*, APPT+12, APPT+35, NEWAT~, NEWAT+7 |
| SDCSTOPD | APPT+4~, APPT+11*, APPT+12*, APPT+41 |
| SDDCE | DPT+3~, DPT+4*, DPT+5 |
| SDDIV | APPT+14*, APPT+16, APPT+19, NEWAT+1~, NEWAT+4~, NEWAT+8*, NEWAT+10, NEWAT+13, NEWAT+20~, NEWAT+23* , NEWAT+25, NEWAT+28 |
| SDDM | APPT~, APPT+38 |
| SDENRO | APPT+3~ |
| SDFAC | APPT+3~, APPT+15*, APPT+17*, APPT+18, APPT+20*, APPT+35, APPT+39, NEWAT~, NEWAT+15, NEWAT+30 |
| SDFAC1 | APPT+19*, NEWAT+1~, NEWAT+9*, NEWAT+11*, NEWAT+12, NEWAT+13*, NEWAT+14*, NEWAT+15, NEWAT+24*, NEWAT+26* , NEWAT+27, NEWAT+28*, NEWAT+29*, NEWAT+30 |
| SDINST | APPT+3~, APPT+16*, APPT+17, NEWAT+10*, NEWAT+11, NEWAT+25*, NEWAT+26 |
| SDNAME | DPT+3~, DPT+13*, GETNAME+1~, GETNAME+3 |
| SDNAME("FIELD" | GETNAME+2* |
| SDNAME("FILE" | GETNAME+2* |
| SDNAME("IENS" | GETNAME+2* |
| SDNAMEF | DPT+3~, DPT+13*, GETNAME+1~, GETNAME+4*, GETNAME+5 |
| SDNAMEL | DPT+3~, DPT+13*, GETNAME+1~, GETNAME+4*, GETNAME+5 |
| SDNAMEM | DPT+3~, DPT+13*, GETNAME+1~, GETNAME+4*, GETNAME+5 |
| SDNAMES | DPT+3~, DPT+13*, GETNAME+1~, GETNAME+4*, GETNAME+5 |
| SDNAMF | GETNAME+1~ |
| SDNAVA | APPT+3~, APPT+30*, APPT+31, APPT+32*, APPT+33*, APPT+34*, APPT+38 |
| SDNEW | APPT+4~, APPT+35*, APPT+39 |
| SDPATCL | APPT+46~, APPT+47*, APPT+48, APPT+50*, APPT+51*, APPT+52*, APPT+53 |
| SDPROV | APPT+55~* |
| SDPRVSEQ | APPT+4~, APPT+55*, APPT+57*, APPT+58 |
| SDSC | DPT+3~, DPT+8*, DPT+19 |
| SDSCE | APPT+4~, APPT+43*, APPT+44, APPT+49, APPT+52 |
| SDSCHED | APPT+4~ |
| SDSCP | DPT+3~, DPT+9*, DPT+19 |
| SDSDDT | APPT+3~, APPT+26*, APPT+38 |
| SDSTAT | APPT~, APPT+23, APPT+25, APPT+37, APPT+40 |
| SDSTOP | APPT+3~, APPT+8*, APPT+39 |
| SDSTOP1 | APPT+3~, APPT+7*, APPT+8, APPT+9, APPT+35, NEWAT~, NEWAT+6, NEWAT+22 |
| SDSTOPD | APPT+4~, APPT+9*, APPT+41 |
| SDVST | APPT+49~*, APPT+50 |
| SSN | DPT+3~, DPT+16*, DPT+17, DPT+19 |
| SSNP | DPT+3~, DPT+16*, DPT+19 |
| TEMP | GT24+3~, GT24+4* |
| U | APPT+40 |
| >> VADM(2 | DPT+16 |
| >> VADM(3 | DPT+15 |