PXRMPDEM ;SLC/PKR - Computed findings for patient demographics. ;09/27/2012
Source file <PXRMPDEM.m>
| Package | Total | Call Graph | 
|---|---|---|
| Clinical Reminders | 3 | $$AGE^PXRMAGE ($$EDATE,$$ISLEAP,$$NOW)^PXRMDATE $$OVERLAP^PXRMINDX | 
| Kernel | 2 | ($$FMDIFF,$$FMTE)^XLFDT $$UP^XLFSTR | 
| Registration | 1 | (DEM,ELIG,INP,KVA)^VADPT | 
| VA Fileman | 1 | $$GET1^DIQ | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DFA(DFN,NGET,BDT,EDT,NFOUND,TEST,DATE,VALUE,TEXT) | ;This computed finding | |
| HDISCH(DFN,NGET,BDT,EDT,NFOUND,TEST,DATE,DATA,TEXT) | ;Computed finding for | |
| DOD(DFN,TEST,DATE,VALUE,TEXT) | ||
| WASINP(DFN,NGET,BDT,EDT,NFOUND,TEST,DATE,VALUE,TEXT) | ;Computed finding for | |
| SEX(DFN,TEST,DATE,VALUE,TEXT) | ;Computed finding for returning a patient's | |
| AGE(DFN,TEST,DATE,VALUE,TEXT) | ;Computed finding for returning a patient's | |
| INP(DFN,NGET,BDT,EDT,NFOUND,TEST,DATE,VALUE,TEXT) | ;Computed finding for | |
| DOB(DFN,TEST,DATE,VALUE,TEXT) | ;Computed finding for a patient's | |
| RACE(DFN,TEST,DATE,VALUE,TEXT) | ;Computed finding for checking a patient's race. | |
| NEWRACE(DFN,NGET,BDT,EDT,NFOUND,TEST,DATE,VALUE,TEXT) | ;Computed finding | |
| ETHNY(DFN,NGET,BDT,EDT,NFOUND,TEST,DATE,VALUE,TEXT) | ;Computed finding for | |
| EMPLOYE(DFN,NGET,BDT,EDT,NFOUND,TEST,DATE,VALUE,TEXT) | ;This computed finding | |
| PATTYPE(DFN,TEST,DATE,VALUE,TEXT) | ;Computed finding to return the patient | 
| Name | Field # of Occurrence | 
|---|---|
| $$GET1^DIQ | WASINP+19, WASINP+26, WASINP+32 | 
| $$AGE^PXRMAGE | AGE+12 | 
| $$EDATE^PXRMDATE | DOB+6, DOD+6 | 
| $$ISLEAP^PXRMDATE | DFA+12 | 
| $$NOW^PXRMDATE | AGE+2, AGE+12, DFA+4, DFA+15, DOB+5, DOD+5, EMPLOYE+4, ETHNY+8, INP+4, NEWRACE+9 , PATTYPE+4, RACE+2, SEX+2, WASINP+30 | 
| $$OVERLAP^PXRMINDX | WASINP+18, WASINP+31 | 
| DEM^VADPT | ETHNY+3, NEWRACE+3 | 
| ELIG^VADPT | PATTYPE+5 | 
| INP^VADPT | INP+5 | 
| KVA^VADPT | ETHNY+4, ETHNY+11, INP+6, INP+15, NEWRACE+5, NEWRACE+11, PATTYPE+8 | 
| $$FMDIFF^XLFDT | WASINP+41 | 
| $$FMTE^XLFDT | DFA+15, INP+14, WASINP+42, WASINP+43 | 
| $$UP^XLFSTR | HDISCH+4 | 
| FileNo | Call Tags | 
|---|---|
| ^DGPM - [#405] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DGPM - [#405] | WASINP+14, WASINP+17, WASINP+25, WASINP+30 | 
| ^DGPM("ATID1" | WASINP+22, WASINP+24 | 
| ^DGPM("ATID3" | WASINP+12, WASINP+13 | 
| ^DGPT - [#45] | HDISCH+10, HDISCH+11 | 
| ^DGPT("B" | HDISCH+9 | 
| ^DPT - [#2] | AGE+10, AGE+11, DFA+8, DOB+4, DOD+4, EMPLOYE+5, RACE+4, SEX+5 | 
| ^VA(200 - [#200] | EMPLOYE+8, EMPLOYE+10, EMPLOYE+13, EMPLOYE+17 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ADATE | WASINP+4~, WASINP+17*, WASINP+18, WASINP+20, WASINP+26*, WASINP+27, WASINP+31, WASINP+33, WASINP+35*, WASINP+36* , WASINP+38, WASINP+40, WASINP+41, WASINP+42, WASINP+48 | 
| ADM | WASINP+4~, WASINP+16*, WASINP+17, WASINP+19 | 
| ADML | WASINP+4~ | 
| ADML( | WASINP+20*, WASINP+27, WASINP+33*, WASINP+36, WASINP+38 | 
| AWARD | WASINP+4~, WASINP+19*, WASINP+20, WASINP+26*, WASINP+33, WASINP+38*, WASINP+45, WASINP+49 | 
| BDAY | DFA+6~, DFA+10*, DFA+12*, DFA+13 | 
| BDT | DFA~, EMPLOYE~, EMPLOYE+19, ETHNY~, HDISCH~, HDISCH+11, INP~, NEWRACE~, WASINP~, WASINP+18 , WASINP+31 | 
| CNT | ETHNY+2~, ETHNY+6*, ETHNY+7*, ETHNY+9 | 
| CNT1 | ETHNY+2~, ETHNY+6*, ETHNY+7, ETHNY+8*, ETHNY+9, ETHNY+10 | 
| DAS | HDISCH+3~ | 
| DATA | HDISCH~ | 
| DATE | AGE~, AGE+2*, DFA~, DOB~, DOB+6*, DOD~, DOD+6*, EMPLOYE~, ETHNY~, HDISCH~ , INP~, NEWRACE~, PATTYPE~, PATTYPE+4*, RACE~, RACE+2*, SEX~, SEX+2*, WASINP~ | 
| DATE( | ETHNY+8*, HDISCH+28*, NEWRACE+9*, WASINP+40* | 
| DATE(1 | DFA+4*, DFA+13*, DFA+15, EMPLOYE+4*, INP+4* | 
| DDATE | HDISCH+3~, HDISCH+10*, HDISCH+11, HDISCH+16*, HDISCH+18*, HDISCH+19, HDISCH+21, HDISCH+22, HDISCH+25, HDISCH+28 , WASINP+4~, WASINP+15*, WASINP+18, WASINP+20, WASINP+30*, WASINP+31, WASINP+33, WASINP+38*, WASINP+39*, WASINP+40 , WASINP+41, WASINP+43, WASINP+50 | 
| DDATEL | HDISCH+3~ | 
| DDATEL( | HDISCH+11*, HDISCH+18, HDISCH+21, HDISCH+22, HDISCH+25 | 
| DFN | AGE~, AGE+10, AGE+11, DFA~, DFA+8, DOB~, DOB+4, DOD~, DOD+4, EMPLOYE~ , EMPLOYE+5, ETHNY~, HDISCH~, HDISCH+9, INP~, NEWRACE~, PATTYPE~, RACE~, RACE+4, SEX~ , SEX+5, WASINP~, WASINP+12, WASINP+13, WASINP+22, WASINP+24 | 
| DOB | AGE+8~, AGE+10*, AGE+12, DFA+6~, DFA+8*, DFA+9, DFA+10 | 
| DOD | AGE+8~, AGE+11*, AGE+12, AGE+13, AGE+14 | 
| DONE | HDISCH+3~, HDISCH+15*, HDISCH+17, HDISCH+19*, HDISCH+21, HDISCH+31* | 
| DWARD | WASINP+4~, WASINP+19*, WASINP+20, WASINP+32*, WASINP+33, WASINP+38*, WASINP+46, WASINP+51 | 
| EDATE | EMPLOYE+3~, EMPLOYE+13*, EMPLOYE+14, EMPLOYE+15 | 
| EDT | DFA~, EMPLOYE~, EMPLOYE+15, ETHNY~, HDISCH~, HDISCH+11, INP~, NEWRACE~, WASINP~, WASINP+18 , WASINP+31 | 
| FDATE | WASINP+4~, WASINP+5*, WASINP+40 | 
| FEEBASIS | HDISCH+3~, HDISCH+22*, HDISCH+23, HDISCH+29 | 
| IEN | EMPLOYE+3~, EMPLOYE+8*, EMPLOYE+9, EMPLOYE+10, EMPLOYE+13, EMPLOYE+17, HDISCH+3~, HDISCH+8*, HDISCH+9*, HDISCH+10 , HDISCH+11, HDISCH+20*, HDISCH+21*, HDISCH+22, HDISCH+25, WASINP+4~, WASINP+13*, WASINP+14, WASINP+19, WASINP+24* , WASINP+25, WASINP+26, WASINP+28*, WASINP+30, WASINP+32 | 
| INCEN | HDISCH+3~, HDISCH+7*, HDISCH+26 | 
| IND | HDISCH+3~, HDISCH+17*, NEWRACE+2~, NEWRACE+8*, NEWRACE+9, NEWRACE+10 | 
| INDT | WASINP+4~, WASINP+11*, WASINP+12*, WASINP+13, WASINP+22*, WASINP+23, WASINP+24 | 
| INFEE | HDISCH+3~, HDISCH+6*, HDISCH+23 | 
| LOS | WASINP+4~, WASINP+41*, WASINP+44, WASINP+52 | 
| NF | HDISCH+3~, HDISCH+15*, HDISCH+27*, HDISCH+28, HDISCH+29, HDISCH+30, HDISCH+31, HDISCH+32 | 
| NFOUND | DFA~, DFA+4*, DFA+7*, EMPLOYE~, EMPLOYE+4*, EMPLOYE+20*, ETHNY~, ETHNY+4*, ETHNY+10*, HDISCH~ , HDISCH+8*, HDISCH+11*, HDISCH+12, HDISCH+17, HDISCH+32*, INP~, INP+3*, NEWRACE~, NEWRACE+4*, NEWRACE+5 , NEWRACE+7*, NEWRACE+8, WASINP~, WASINP+8*, WASINP+36, WASINP+37*, WASINP+40, WASINP+47, WASINP+48, WASINP+49 , WASINP+50, WASINP+51, WASINP+52 | 
| NGET | DFA~, EMPLOYE~, ETHNY~, ETHNY+5*, ETHNY+7, HDISCH~, HDISCH+13, HDISCH+14*, HDISCH+31, INP~ , NEWRACE~, NEWRACE+6*, NEWRACE+7, WASINP~, WASINP+6, WASINP+7 | 
| NOCC | WASINP+4~, WASINP+7*, WASINP+36 | 
| PAID | EMPLOYE+3~, EMPLOYE+10*, EMPLOYE+11 | 
| >> PXRMDATE | WASINP+39, WASINP+43 | 
| >> PXRMDOB | DFA+8 | 
| >> PXRMPDEM | AGE+3, AGE+7, DOB+2, DOB+4, DOD+2, DOD+4, SEX+3, SEX+5 | 
| >> PXRMPDEM("AGE" | AGE+4 | 
| >> PXRMPDEM("DOB" | DOB+2 | 
| >> PXRMPDEM("DOD" | AGE+5, AGE+6, DOD+2 | 
| >> PXRMPDEM("SEX" | SEX+3 | 
| RACE | RACE+1~, RACE+4*, RACE+5 | 
| SDIR | HDISCH+3~, HDISCH+13*, HDISCH+18, WASINP+4~, WASINP+6*, WASINP+36 | 
| SSN | EMPLOYE+3~, EMPLOYE+5*, EMPLOYE+6, EMPLOYE+8 | 
| TDATE | EMPLOYE+3~, EMPLOYE+17*, EMPLOYE+18, EMPLOYE+19 | 
| TEMP | HDISCH+3~, HDISCH+4*, HDISCH+5*, HDISCH+6, HDISCH+7, WASINP+4~, WASINP+14*, WASINP+15, WASINP+16, WASINP+25* , WASINP+26, WASINP+28, WASINP+42*, WASINP+43*, WASINP+44*, WASINP+45*, WASINP+46*, WASINP+47 | 
| TEST | AGE~, AGE+2*, DFA~, DFA+4, DFA+5*, DFA+11, DFA+15, DOB~, DOB+5*, DOB+6 , DOD~, DOD+5*, DOD+6, EMPLOYE~, ETHNY~, HDISCH~, HDISCH+4, INP~, NEWRACE~, PATTYPE~ , PATTYPE+6*, RACE~, RACE+5*, SEX~, SEX+2*, WASINP~, WASINP+5 | 
| TEST( | ETHNY+8*, HDISCH+28*, NEWRACE+9*, WASINP+37* | 
| TEST(1 | DFA+4*, DFA+14*, EMPLOYE+4*, EMPLOYE+20*, INP+6*, INP+7* | 
| TEXT | AGE~, AGE+6*, AGE+14*, DFA~, DOB~, DOB+6*, DOD~, DOD+6*, EMPLOYE~, ETHNY~ , HDISCH~, INP~, NEWRACE~, PATTYPE~, RACE~, SEX~, WASINP~ | 
| TEXT( | ETHNY+9*, HDISCH+29*, HDISCH+30*, NEWRACE+9*, WASINP+47* | 
| TEXT(1 | DFA+15*, EMPLOYE+20*, INP+14* | 
| TYPE | HDISCH+3~, HDISCH+25*, HDISCH+26, HDISCH+30 | 
| U | AGE+10, AGE+11, DFA+8, DOB+4, DOD+4, EMPLOYE+5, EMPLOYE+10, EMPLOYE+13, EMPLOYE+17, ETHNY+9 , HDISCH+10, HDISCH+22, HDISCH+25, INP+8, INP+9, INP+10, INP+11, INP+12, INP+13, NEWRACE+10 , PATTYPE+7, RACE+4, SEX+5, WASINP+15, WASINP+16, WASINP+17, WASINP+20, WASINP+26, WASINP+28, WASINP+30 , WASINP+33, WASINP+38 | 
| VADM | ETHNY+2~, NEWRACE+2~ | 
| VADM(11 | ETHNY+4, ETHNY+7, ETHNY+9 | 
| VADM(12 | NEWRACE+4, NEWRACE+10 | 
| VAEL | PATTYPE+2~ | 
| VAEL(6 | PATTYPE+6, PATTYPE+7 | 
| VAIN | INP+2~ | 
| VAIN(1 | INP+6 | 
| VAIN(11 | INP+13 | 
| VAIN(2 | INP+8 | 
| VAIN(3 | INP+9 | 
| VAIN(4 | INP+10 | 
| VAIN(7 | INP+11 | 
| VAIN(8 | INP+12 | 
| VAINDT | INP+2~, INP+4* | 
| VALUE | AGE~, AGE+4*, AGE+12*, DFA~, DOB~, DOB+2*, DOB+4*, DOB+5, DOB+6, DOD~ , DOD+2*, DOD+4*, DOD+5, DOD+6, EMPLOYE~, ETHNY~, INP~, NEWRACE~, PATTYPE~, PATTYPE+3* , PATTYPE+7*, RACE~, RACE+5*, SEX~, SEX+3*, SEX+5*, WASINP~ | 
| VALUE( | ETHNY+9*, HDISCH+28*, NEWRACE+10*, WASINP+48*, WASINP+49*, WASINP+50*, WASINP+51*, WASINP+52* | 
| VALUE("DECEASED" | AGE+5*, AGE+6*, AGE+13*, AGE+14* | 
| VALUE(1 | DFA+13*, EMPLOYE+14*, EMPLOYE+18*, INP+8*, INP+9*, INP+10*, INP+11*, INP+12*, INP+13*, INP+14 | 
| YEAR | DFA+6~, DFA+11*, DFA+12, DFA+13 | 
| YOB | DFA+6~, DFA+9*, DFA+11 |