DGQPTQ2 ; slc/CLA - Functions which return patient lists and list sources pt 2 ;05/05/2004
Source file <DGQPTQ2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
WARD(Y) | ; RETURN LIST OF ACTIVE WARDS
|
|
PROVPTS(Y,PROV) | ; RETURN LIST OF PATIENTS LINKED TO A PRIMARY PROVIDER
|
|
CLIN(Y) | ; RETURN LIST OF CLINICS
|
|
PTAPPTS(Y,DFN,DGBDATE,DGEDATE,CLIN) | ; return appts for a patient between beginning and end dates for a clinic, if no clinic return all appointments
|
|
WARDPTS(Y,WARD) | ; RETURN LIST OF PATIENTS IN A WARD
; SLC/PKS - Modifications for Room/Bed data on 1/19/2001. |
|
PROV(Y) | ; RETURN LIST OF PROVIDERS
|
|
NLIST(DGQY) | ; return a null list
|
|
SPECPTS(Y,SPEC) | ; RETURN LIST OF PATIENTS LINKED TO A TREATING SPECIALTY
|
|
CLINPTS(Y,CLIN,DGBDATE,DGEDATE) | ; RETURN LIST OF PTS W/CLINIC APPT W/IN BEGINNING AND END DATES
|
|
CDATRANG(DGY) | ; return default start and stop dates for clinics in form start^stop
|
|
SPEC(Y) | ; RETURN LIST OF TREATING SPECIALTIES
|
Name | Field # of Occurrence |
---|---|
$$ACTIVE^DGACT | SPEC+4 |
$$FAPCHK^DGENRPD2 | CLINPTS+19 |
WIN^DGPMDDCF | WARD+5 |
DT^DILF | CLINPTS+11, CLINPTS+12, PTAPPTS+13, PTAPPTS+14 |
$$SDAPI^SDAMA301 | CLINPTS+18 |
$$ACTLOC^SDWU | CLIN+4, CLINPTS+2, PTAPPTS+2 |
SDA^VADPT | PTAPPTS+19 |
$$NOW^XLFDT | CLINPTS+5 |
$$UP^XLFSTR | CLINPTS+8, CLINPTS+9, CDATRANG+3, CDATRANG+4, CDATRANG+6, PTAPPTS+7, PTAPPTS+10 |
$$GET^XPAR | CLINPTS+8, CLINPTS+9, CDATRANG+3, CDATRANG+4, PTAPPTS+7, PTAPPTS+10 |
GETLST^XPAR | CLIN+2 |
$$ACTIVE^XUSER | PROV+5 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(42 - [#42] | WARD+4, WARDPTS+6 |
^DIC(45.7 - [#45.7] | SPEC+4 |
^DPT - [#2] | CLINPTS+29, PROVPTS+4, SPECPTS+4, WARDPTS+10, WARDPTS+13 |
^DPT("APR" | PROVPTS+4 |
^DPT("ATR" | SPECPTS+4 |
^DPT("CN" | WARDPTS+9 |
^SC - [#44] | CLIN+5, CLINPTS+32 |
^TMP($J | CLINPTS+19!, CLINPTS+20, CLINPTS+21, CLINPTS+22*, CLINPTS+24, CLINPTS+25, CLINPTS+26, CLINPTS+35! |
^UTILITY("VASD" | PTAPPTS+21, PTAPPTS+22, PTAPPTS+23 |
^VA(200 - [#200] | CLINPTS+6, CDATRANG+2, PTAPPTS+5, PROV+3 |
^XUSEC("PROVIDER" | PROV+5 |
Name | Field # of Occurrence |
---|---|
^( | PROV+3, SPEC+4, WARD+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ASTAT | CLINPTS+16~, CLINPTS+26*, CLINPTS+28, CLINPTS+35! |
CHKIN | CLINPTS+3~ |
CHKX | CLINPTS+3~ |
CLIN | CLINPTS~, CLINPTS+1, CLINPTS+2, CLINPTS+17, CLINPTS+29, CLINPTS+32, PTAPPTS~, PTAPPTS+2, PTAPPTS+7, PTAPPTS+10 , PTAPPTS+18 |
CLNAM | CLINPTS+3~, CLINPTS+32*, CLINPTS+33 |
CNT | PTAPPTS+3~*, PTAPPTS+24, PTAPPTS+25* |
D0 | WARD+1~, WARD+5* |
DFN | CLINPTS+3~, CLINPTS+7*, CLINPTS+25*, CLINPTS+26, CLINPTS+29, PTAPPTS~, PROVPTS+2~, PROVPTS+3*, PROVPTS+4*, SPECPTS+2~ , SPECPTS+3*, SPECPTS+4*, WARDPTS+3~, WARDPTS+4*, WARDPTS+8, WARDPTS+9*, WARDPTS+10, WARDPTS+13 |
DGARRAY | CLINPTS+16~, CLINPTS+18, CLINPTS+35! |
DGARRAY("FLDS" | CLINPTS+17* |
DGARRAY("SORT" | CLINPTS+18* |
DGARRAY(1 | CLINPTS+17* |
DGARRAY(2 | CLINPTS+17* |
DGBDATE | CLINPTS~, CLINPTS+8*, CLINPTS+11, CLINPTS+13, CLINPTS+17, CDATRANG+1~, CDATRANG+3*, CDATRANG+5*, CDATRANG+6, PTAPPTS~ , PTAPPTS+4, PTAPPTS+6, PTAPPTS+7*, PTAPPTS+8*, PTAPPTS+13, PTAPPTS+15, PTAPPTS+16 |
DGC | CLINPTS+3~ |
DGEDATE | CLINPTS~, CLINPTS+9*, CLINPTS+12, CLINPTS+13, CLINPTS+14*, CLINPTS+17, CDATRANG+1~, CDATRANG+4*, CDATRANG+5*, CDATRANG+6 , PTAPPTS~, PTAPPTS+4, PTAPPTS+9, PTAPPTS+10*, PTAPPTS+11*, PTAPPTS+14, PTAPPTS+15, PTAPPTS+17 |
DGI | PROVPTS+2~, PROVPTS+3*, PROVPTS+4*, SPECPTS+2~, SPECPTS+3*, SPECPTS+4*, WARDPTS+3~, WARDPTS+4*, WARDPTS+10, WARDPTS+19 , WARDPTS+20* |
DGJ | CLINPTS+3~, CLINPTS+24*, CLINPTS+25, CLINPTS+26, CLINPTS+29 |
DGLST | CLIN+1~, CLIN+2 |
DGLST( | CLIN+3, CLIN+4 |
DGNOWDT | CLINPTS+3~, CLINPTS+5* |
DGQY | NLIST~ |
DGQY(1 | NLIST+1* |
DGSRV | CLINPTS+3~, CLINPTS+6*, CLINPTS+8, CLINPTS+9, CDATRANG+1~, CDATRANG+2*, CDATRANG+3, CDATRANG+4, PTAPPTS+3~, PTAPPTS+5* , PTAPPTS+7, PTAPPTS+10 |
DGY | CDATRANG~, CDATRANG+6* |
DUZ | CLINPTS+6, CDATRANG+2, PTAPPTS+5 |
EXT | PTAPPTS+3~, PTAPPTS+23*, PTAPPTS+24 |
I | CLIN+1~, CLIN+3*, CLIN+4, CLIN+5, CLINPTS+3~, CLINPTS+7*, CLINPTS+29*, CLINPTS+31, PROV+1~, PROV+2* , PROV+5*, SPEC+1~, SPEC+2*, SPEC+4*, WARD+1~, WARD+2*, WARD+6* |
IEN | CLIN+1~, CLIN+4*, CLIN+5, PROV+1~, PROV+3*, PROV+5, SPEC+1~, SPEC+4*, WARD+1~, WARD+4* , WARD+5, WARD+6 |
INT | PTAPPTS+3~, PTAPPTS+22*, PTAPPTS+24 |
INVDT | PTAPPTS+3~, PTAPPTS+22*, PTAPPTS+24 |
J | CLINPTS+3~ |
MAXAPPTS | CLINPTS+3~, CLINPTS+4*, CLINPTS+31 |
NAME | CLINPTS+3~, PROV+1~, PROV+2*, PROV+3*, PROV+4, PROV+5, SPEC+1~, SPEC+2*, SPEC+4*, WARD+1~ , WARD+2*, WARD+4*, WARD+6 |
NUM | PTAPPTS+3~*, PTAPPTS+21*, PTAPPTS+22, PTAPPTS+23 |
PROV | PROVPTS~, PROVPTS+1, PROVPTS+4 |
RBDAT | WARDPTS+3~, WARDPTS+11*, WARDPTS+13*, WARDPTS+15, WARDPTS+16, WARDPTS+17*, WARDPTS+18*, WARDPTS+19 |
SAPPT | CLINPTS+16~, CLINPTS+21*, CLINPTS+22, CLINPTS+35! |
SDCNT | CLINPTS+16~, CLINPTS+18*, CLINPTS+19, CLINPTS+35! |
SDFN | CLINPTS+16~, CLINPTS+20*, CLINPTS+21, CLINPTS+22, CLINPTS+35! |
SPEC | SPECPTS~, SPECPTS+1, SPECPTS+4 |
TDATE | PROV+1~ |
U | CLIN+4, CLIN+5, CLINPTS+6, CLINPTS+32, CDATRANG+2, PTAPPTS+5, PTAPPTS+22, PTAPPTS+24, WARDPTS+13, WARDPTS+19 |
VAERR | PTAPPTS+20, PTAPPTS+27! |
VASD | PTAPPTS+3~ |
VASD("C" | PTAPPTS+18* |
VASD("F" | PTAPPTS+16* |
VASD("T" | PTAPPTS+17* |
WARD | WARDPTS~, WARDPTS+2, WARDPTS+6*, WARDPTS+9 |
X | CLINPTS+3~, CLINPTS+19*, WARD+6 |
Y | CLIN~, CLINPTS~, CLINPTS+33!, CLINPTS+34, PTAPPTS~, PROV~, PROVPTS~, SPEC~, SPECPTS~, WARD~ , WARDPTS~ |
Y( | CLIN+5*, CLINPTS+29*, PTAPPTS+24*, PROV+5*, PROVPTS+4*, SPEC+4*, SPECPTS+4*, WARD+6*, WARDPTS+10*, WARDPTS+19* |
Y(1 | CLINPTS+1*, CLINPTS+2*, CLINPTS+13*, CLINPTS+19*, CLINPTS+33*, CLINPTS+34*, PTAPPTS+2*, PTAPPTS+15*, PTAPPTS+26*, PROVPTS+1* , PROVPTS+5*, SPECPTS+1*, SPECPTS+5*, WARDPTS+2*, WARDPTS+22* |