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 |