ONCOES ;HINES OIFO/GWB - ONCOLOGY PATIENT 'COMPUTED-FIELD' EXPRESSIONS ;08/10/00
Source file <ONCOES.m>
Package | Total | Call Graph |
---|---|---|
General Medical Record - Vitals | 1 | EN6^GMRVUTL |
Kernel | 1 | $$FMTE^XLFDT |
Registration | 1 | (DEM,SVC)^VADPT |
VA FileMan | 1 | $$GET1^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
MNI | ;'COMPUTED-FIELD' EXPRESSION for MIDDLE NAME (160,.015)
|
|
SA1 | ;'COMPUTED-FIELD' EXPRESSION for STREET ADDRESS 1 (160,.111)
|
|
SA2 | ;'COMPUTED-FIELD' EXPRESSION for STREET ADDRESS 2 (160,.112)
|
|
SA3 | ;'COMPUTED-FIELD' EXPRESSION for STREET ADDRESS 3 (160,.113)
|
|
ST | ;'COMPUTED-FIELD' EXPRESSION for STATE (160,.115)
|
|
ZIP | ;'COMPUTED-FIELD' EXPRESSION for ZIP CODE (160,.116)
|
|
CTY | ;'COMPUTED-FIELD' EXPRESSION for CTY (160,.12) and COUNTY (160,.117)
|
|
ZIPCT | ;'COMPUTED-FIELD' EXPRESSION for ZIP-COUNTY (160,.118)
|
|
ADD | ;'COMPUTED-FIELD' EXPRESSION for PATIENT ADDRESS - CURRENT (160,.119)
|
|
PH | ;'COMPUTED-FIELD' EXPRESSION for TELEPHONE (160,.131)
|
|
ALIAS | ;'COMPUTED-FIELD' EXPRESSION for ALIAS (160,1)
|
|
SSN | ;'COMPUTED-FIELD' EXPRESSION' for SSN (160,2)
|
|
DOB | ;'COMPUTED-FIELD' EXPRESSION for DOB (160,3)
|
|
DOB1 | ;DOB (160,3) in internal FileMan format
|
|
TRM | ;'COMPUTED-FIELD' EXPRESSION for TERMINAL DIGIT (160,4.1)
|
|
OCC | ;'COMPUTED-FIELD' EXPRESSION for CURRENT OCCUPATION (160,12)
|
|
REL | ;'COMPUTED-FIELD' EXPRESSION for RELIGION (160,13)
|
|
MS | ;'COMPUTED-FIELD' EXPRESSION for MARITAL STATUS (160,14)
|
|
EMP | ;'COMPUTED-FIELD' EXPRESSION for EMPLOYMENT STATUS (160,47)
|
|
BS | ;'COMPUTED-FIELD' EXPRESSION for BRANCH OF SERVICE (160,68)
|
|
HEIGHT | ;'COMPUTED-FIELD' EXPRESSION for HEIGHT (160,1011)
|
|
WEIGHT | ;'COMPUTED-FIELD' EXPRESSION for WEIGHT (160,1012)
|
|
RACE | ;RACE 1 (160,8) default
|
|
ENVIRON | ;Environmental exposure and service indicator defaults
|
|
TLEEOT | ;TUMOR LEVEL-ENDOSCOPIC EXAM (165.5,752) OUTPUT TRANSFORM
|
|
ASPIT | ;ADDITIONAL SURGICAL PROCEDURES (165.5,763)INPUT TRANSFORM
|
|
ASPOT | ;ADDITIONAL SURGICAL PROCEDURES (165.5,763) OUTPUT TRANSFORM
|
|
ASPHP | ;ADDITIONAL SURGICAL PROCEDURES (165.5,763) EXECUTABLE HELP
|
|
SETASP | ;Build ADDITIONAL SURGICAL PROCEDURES array
|
|
PTRDOT | ;PRIMARY TUMOR RAD DOSE (cGy) (165.5,786) OUTPUT TRANSFORM
|
|
DPTLRT(D0) | ;Determine if patient resides in PATIENT (2) or REFERRAL PATIENT (67)
|
|
DATECLC | ;Output Transform of (165.5,198)
|
|
DATEOT | ;Date OUTPUT TRANSFORM
|
|
DD | ;Format date values
|
|
EXIT | ;Kill variables
|
|
SETUP | ;Old code
|
|
CLEANUP | ;Cleanup
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | MNI+2, MNI+3, SA1+2, SA1+3, SA2+2, SA2+3, SA3+2, SA3+3, ST+2, ST+3 , ST+4, ZIP+2, ZIP+3, CTY+3, ZIPCT+3, ZIPCT+4, ZIPCT+5, ZIPCT+6, ZIPCT+8, ZIPCT+9 , ZIPCT+10, ZIPCT+11, ZIPCT+12, ADD+2, ADD+3, PH+2, PH+3, SSN+2, SSN+3, DOB+2 , DOB+3, DOB1+2, DOB1+3, TRM+2, TRM+3, OCC+3, REL+2, REL+3, MS+2, MS+3 , EMP+3, BS+3, RACE+3, ENVIRON+15, ENVIRON+16, ENVIRON+17, ENVIRON+18, ENVIRON+19, ENVIRON+20, ENVIRON+21 , ENVIRON+22, ENVIRON+23 |
EN6^GMRVUTL | HEIGHT+6, WEIGHT+6 |
DEM^VADPT | RACE+4 |
SVC^VADPT | ENVIRON+25 |
$$FMTE^XLFDT | DATECLC+2 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^DIC(5 - [#5] | GET1^DIQ |
^LRT(67 - [#67] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(5 - [#5] | CTY+4, ZIPCT+13 |
^DPT - [#2] | ALIAS+3 |
^ONCO(160 - [#160] | MNI+1, SA1+1, SA2+1, SA3+1, ST+1, ZIP+1, CTY+1, ZIPCT+1, ADD+1, PH+1 , ALIAS+1, SSN+1, DOB+1, DOB1+1, TRM+1, OCC+1, REL+1, MS+1, EMP+1, BS+1 , HEIGHT+3, HEIGHT+4, WEIGHT+3, WEIGHT+4, RACE+2, ENVIRON+12, ENVIRON+14, DPTLRT+2, DPTLRT+3 |
^ONCO(165.5 - [#165.5] | DATECLC+2 |
Name | Line Occurrences |
---|---|
$$DPTLRT | MNI+2, MNI+3, SA1+2, SA1+3, SA2+2, SA2+3, SA3+2, SA3+3, ST+2, ST+3 , ZIP+2, ZIP+3, CTY+2, CTY+3, ZIPCT+2, ZIPCT+7, ADD+2, ADD+3, PH+2, PH+3 , ALIAS+2, ALIAS+3, SSN+2, SSN+3, DOB+2, DOB+3, DOB1+2, DOB1+3, TRM+2, TRM+3 , OCC+2, OCC+3, REL+2, REL+3, MS+2, MS+3, EMP+2, EMP+3, BS+2, BS+3 , RACE+3, RACE+4 |
ASPOT | ASPIT+3 |
DATEOT | DOB+4 |
DD | DATEOT+1, DATEOT+4 |
EXIT | MNI+8, SA1+4, SA2+4, SA3+4, ST+5, ZIP+4, CTY+5, ZIPCT+16, ADD+5, PH+4 , ALIAS+4, SSN+5, DOB+5, DOB1+4, TRM+6, OCC+4, REL+4, MS+4, EMP+4, BS+4 , ENVIRON+12, ENVIRON+28 |
SETASP | ASPOT+1, ASPHP+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALIAS | ALIAS+3*, EXIT+1! |
AOE | ENVIRON+13*, ENVIRON+15*, CLEANUP+1! |
ASP | ASPOT+3!, ASPHP+3! |
ASP( | ASPOT+2, ASPHP+2 |
ASP(10 | SETASP+1* |
ASP(20 | SETASP+2* |
ASP(30 | SETASP+3* |
ASP(40 | SETASP+4* |
ASP(41 | SETASP+5* |
ASP(42 | SETASP+6* |
ASP(43 | SETASP+7* |
ASP(44 | SETASP+8* |
ASP(50 | SETASP+9* |
ASP(60 | SETASP+10* |
ASP(88 | SETASP+11* |
ASP(99 | SETASP+12* |
ASPX | ASPHP+2*, ASPHP+3! |
CITY | ZIPCT+3*, ZIPCT+8*, ZIPCT+15, EXIT+1! |
COUNTY | ZIPCT+13*, EXIT+1! |
D0 | MNI+1, MNI+2, MNI+3, SA1+1, SA1+2, SA1+3, SA2+1, SA2+2, SA2+3, SA3+1 , SA3+2, SA3+3, ST+1, ST+2, ST+3, ZIP+1, ZIP+2, ZIP+3, CTY+1, CTY+2 , CTY+3, ZIPCT+1, ZIPCT+2, ZIPCT+7, ADD+1, ADD+2, ADD+3, PH+1, PH+2, PH+3 , ALIAS+1, ALIAS+2, ALIAS+3, SSN+1, SSN+2, SSN+3, DOB+1, DOB+2, DOB+3, DOB1+1 , DOB1+2, DOB1+3, TRM+1, TRM+2, TRM+3, OCC+1, OCC+2, OCC+3, REL+1, REL+2 , REL+3, MS+1, MS+2, MS+3, EMP+1, EMP+2, EMP+3, BS+1, BS+2, BS+3 , HEIGHT+3, HEIGHT+4, WEIGHT+3, WEIGHT+4, RACE+2, RACE+3, RACE+4, ENVIRON+12, ENVIRON+14, DPTLRT~ , DPTLRT+2, DPTLRT+3, DATECLC+2 |
DFN | HEIGHT+2~, HEIGHT+4*, WEIGHT+2~, WEIGHT+4*, RACE+1~, RACE+2*, RACE+3, ENVIRON+14*, ENVIRON+15, ENVIRON+16 , ENVIRON+17, ENVIRON+18, ENVIRON+19, ENVIRON+20, ENVIRON+21, ENVIRON+22, ENVIRON+23, EXIT+1! |
DPTLRT | DPTLRT+1~, DPTLRT+2*, DPTLRT+3*, DPTLRT+4 |
FNMI | MNI+4*, EXIT+1! |
GMRVSTR | HEIGHT+2~, HEIGHT+5*, WEIGHT+2~, WEIGHT+5* |
GSI | ENVIRON+13*, ENVIRON+21*, CLEANUP+1! |
IRE | ENVIRON+13*, ENVIRON+16*, CLEANUP+1! |
LSI | ENVIRON+13*, ENVIRON+19*, CLEANUP+1! |
MNI | MNI+4*, MNI+5*, MNI+6*, MNI+7, EXIT+1! |
NAME | MNI+2*, MNI+3*, MNI+4, EXIT+1! |
OEF | ENVIRON+13*, ENVIRON+24*, ENVIRON+26*, CLEANUP+1! |
OIF | ENVIRON+13*, ENVIRON+24*, ENVIRON+27*, CLEANUP+1! |
ONCDTEMP | DATECLC+2~* |
ONCOX | EXIT+1! |
ONCOX1 | EXIT+1! |
PGS | ENVIRON+13*, ENVIRON+17*, CLEANUP+1! |
PSI | ENVIRON+13*, ENVIRON+22*, CLEANUP+1! |
PT | MNI+1*, MNI+2, MNI+3, SA1+1*, SA1+2, SA1+3, SA2+1*, SA2+2, SA2+3, SA3+1* , SA3+2, SA3+3, ST+1*, ST+2, ST+3, ZIP+1*, ZIP+2, ZIP+3, CTY+1*, CTY+3 , ZIPCT+1*, ZIPCT+3, ZIPCT+4, ZIPCT+6, ZIPCT+8, ZIPCT+9, ZIPCT+11, ZIPCT+12, ADD+1*, ADD+2 , ADD+3, PH+1*, PH+2, PH+3, ALIAS+1*, ALIAS+3, SSN+1*, SSN+2, SSN+3, DOB+1* , DOB+2, DOB+3, DOB1+1*, DOB1+2, DOB1+3, TRM+1*, TRM+2, TRM+3, OCC+1*, OCC+3 , REL+1*, REL+2, REL+3, MS+1*, MS+2, MS+3, EMP+1*, EMP+3, BS+1*, BS+3 , EXIT+1! |
SSI | ENVIRON+13*, ENVIRON+18*, CLEANUP+1! |
STATE | ZIPCT+5*, ZIPCT+10*, ZIPCT+15, EXIT+1! |
U | CTY+4, ZIPCT+13, ALIAS+3, HEIGHT+3, HEIGHT+7, WEIGHT+3, WEIGHT+7, RACE+5, RACE+6, ENVIRON+12 , DPTLRT+2, DPTLRT+3, DATECLC+2 |
VADM | RACE+1~ |
VADM(12 | RACE+5 |
VADM(8 | RACE+6 |
VASV | EXIT+1! |
VASV(11 | ENVIRON+26 |
VASV(12 | ENVIRON+27 |
VSI | ENVIRON+13*, ENVIRON+20*, CLEANUP+1! |
X | MNI+1*, MNI+7*, SA1+1*, SA1+2*, SA1+3*, SA2+1*, SA2+2*, SA2+3*, SA3+1*, SA3+2* , SA3+3*, ST+1*, ST+2*, ST+3*, ST+4*, ZIP+1*, ZIP+2*, ZIP+3*, CTY+1*, CTY+2* , CTY+3*, CTY+4*, ZIPCT+1*, ZIPCT+4*, ZIPCT+5, ZIPCT+9*, ZIPCT+10, ZIPCT+13, ZIPCT+15*, ADD+1* , ADD+2*, ADD+3*, ADD+4*, PH+1*, PH+2*, PH+3*, ALIAS+1*, ALIAS+2*, ALIAS+3*, SSN+1* , SSN+2*, SSN+3*, SSN+4*, DOB+1*, DOB+2*, DOB+3*, DOB1+1*, DOB1+2*, DOB1+3*, TRM+1* , TRM+2*, TRM+3*, TRM+4*, TRM+5*, OCC+1*, OCC+2*, OCC+3*, REL+1*, REL+2*, REL+3* , MS+1*, MS+2*, MS+3*, EMP+1*, EMP+2*, EMP+3*, BS+1*, BS+2*, BS+3*, HEIGHT+3* , HEIGHT+7*, HEIGHT+8*, HEIGHT+9*, HEIGHT+10*, WEIGHT+3*, WEIGHT+7*, WEIGHT+8*, WEIGHT+9*, RACE+2*, RACE+3* , RACE+5*, RACE+6*, ASPIT+1!, ASPIT+2!, ASPIT+3, DATECLC+2*, DATEOT+1, DATEOT+2*, DATEOT+3*, DD+1* |
Y | CTY+3*, CTY+4, ZIPCT+12*, ZIPCT+13, TLEEOT+1*, TLEEOT+2*, TLEEOT+3*, TLEEOT+4*, TLEEOT+5*, TLEEOT+6* , TLEEOT+7*, TLEEOT+8*, TLEEOT+9*, TLEEOT+10*, TLEEOT+11*, ASPIT+3*, ASPIT+4!, ASPOT+2*, PTRDOT+1*, PTRDOT+2* , PTRDOT+3*, PTRDOT+4*, DATECLC+2*, DD+1* |
YSI | ENVIRON+13*, ENVIRON+23*, CLEANUP+1! |
Z | EXIT+1! |
ZIP | ZIPCT+6*, ZIPCT+11*, ZIPCT+15, EXIT+1! |