ECXUTL ;ALB/JAP - Utilities for DSS Extracts ;3/29/24 12:44
Source file <ECXUTL.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | $$LJ^XLFSTR ($$GET,$$IEN2DATA)^XUA4A72 |
| VA FileMan | 2 | DD^%DT $$GET1^DIQ |
| DSS Extracts | 1 | $$TYPE^ECXUTL5 |
| Inpatient Medications | 1 | EN^PSJBCMA1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ECXYM(ECXFMDT) | ;extrinsic function
|
|
| ECXYMX(ECXYM) | ;extrinsic function
|
|
| ECXDATE(ECXFMDT,ECXYM) | ;extrinsic function
|
|
| ECXDATEX(ECXDATE) | ;extrinsic function
|
|
| ECXDOB(ECXFMDT) | ;extrinsic function
|
|
| ECXTIME(ECXFMDT) | ;extrinsic function
|
|
| ECXTIMEX(ECXTIME,ECXMIL) | ;extrinsic function
|
|
| AOIRPOW(ECXDFN,ECXAIP) | ;get data on ao, ir, pow status
|
|
| PRVCLASS(PERS,DATE) | ;determine the person class and return va code
; input ; PERS = pointer to file #200 (required) ; DATE = date on which person class must be active (required) ; (internal Fileman format) ; output ; VACODE = VA code field from file #8932.1 ; (exactly 7 characters in length) |
|
| PATCAT(DFN) | ; Extrinsic function to return OTHER ELIGIBILITY CODE
; in patcat field in the extract file if the PATIENT TYPE ; = active duty, retire, tricare ; INPUT DFN - ien in file #2 (required) ; OUTPUT PATCAT - Patient Category mapping to be filed in extracts |
|
| ORDPROV(DFN,ON,PSJTMP) | ; get provider using order reference number
; input: ; dfn ; on - order reference number ; psjtmp - 1 if temp global node = PSJ1, else global node = PSJ |
|
| PRVX12(PERS,DATE) | ;184 - Provider Taxonomy
; input ; PERS = pointer to file #200 (required) ; DATE = date on which person class must be active (required) ; (internal Fileman format) ; output ; X12CODE = X12 code field from file #8932.1 ; (exactly 7 characters in length) |
|
| ELIGCDS | ;
|
| FileNo | Call Tags |
|---|---|
| ^DIC(8 - [#8] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | AOIRPOW+15, AOIRPOW+16, PATCAT+12 |
| ^RAO(75.1 - [#75.1] | PRVCLASS+15, PRVX12+15 |
| ^TMP("PSJ" | ORDPROV+14 |
| Name | Field # of Occurrence |
|---|---|
| ^( | AOIRPOW+15, AOIRPOW+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | ECXTIMEX+24*, ECXTIMEX+25 |
| %DT | ECXYMX+12~, ECXDATEX+12~ |
| CENTURY | ECXYM+8~, ECXYM+15*, ECXYM+16, ECXYMX+12~, ECXYMX+21*, ECXYMX+22, ECXDATE+11~, ECXDATE+31*, ECXDATE+32, ECXDATEX+12~ , ECXDATEX+19*, ECXDATEX+20, ECXDOB+10~, ECXDOB+24*, ECXDOB+25 |
| DATE | PRVCLASS~, PRVCLASS+11, PRVCLASS+14~, PRVCLASS+15*, PRVCLASS+16, PRVX12~, PRVX12+11, PRVX12+14~, PRVX12+15*, PRVX12+16 |
| DAY | ECXDATE+11~, ECXDATE+27*, ECXDATE+32, ECXDOB+10~, ECXDOB+20*, ECXDOB+22*, ECXDOB+25 |
| DFN | PATCAT~, PATCAT+8, PATCAT+9, PATCAT+12, ORDPROV~, ORDPROV+11, ORDPROV+13 |
| DT | ECXDOB+18 |
| >> EC1 | PRVCLASS+15, PRVX12+15 |
| >> ECDATA | PRVCLASS+15, PRVX12+15 |
| >> ECHEAD | PRVCLASS+10*, PRVCLASS+15, PRVX12+10*, PRVX12+15 |
| ECX | PRVCLASS+8~, PRVCLASS+11*, PRVCLASS+13, PRVCLASS+16*, PRVCLASS+18, PRVX12+8~, PRVX12+11*, PRVX12+13, PRVX12+16*, PRVX12+18 |
| ECXAIP | AOIRPOW~ |
| ECXAIP( | AOIRPOW+17* |
| ECXAIP("AO" | AOIRPOW+14*, AOIRPOW+15* |
| ECXAIP("IR" | AOIRPOW+14*, AOIRPOW+15* |
| ECXAIP("POW" | AOIRPOW+14*, AOIRPOW+16*, AOIRPOW+18 |
| ECXAIP("POWL" | AOIRPOW+14*, AOIRPOW+16*, AOIRPOW+18* |
| ECXDATE | ECXDATE+11~, ECXDATE+15*, ECXDATE+16*, ECXDATE+17*, ECXDATE+18*, ECXDATE+20*, ECXDATE+22*, ECXDATE+23*, ECXDATE+24*, ECXDATE+32* , ECXDATE+33, ECXDATEX~, ECXDATEX+15, ECXDATEX+16, ECXDATEX+17, ECXDATEX+19, ECXDATEX+21 |
| ECXDATEX | ECXDATEX+12~, ECXDATEX+15*, ECXDATEX+16*, ECXDATEX+17*, ECXDATEX+21*, ECXDATEX+24*, ECXDATEX+25*, ECXDATEX+26 |
| ECXDFN | AOIRPOW~, AOIRPOW+15, AOIRPOW+16 |
| ECXDOB | ECXDOB+10~, ECXDOB+14*, ECXDOB+16*, ECXDOB+17*, ECXDOB+18*, ECXDOB+25*, ECXDOB+26 |
| ECXFMDT | ECXYM~, ECXYM+11, ECXYM+12, ECXYM+13, ECXYM+15, ECXDATE~, ECXDATE+13*, ECXDATE+20, ECXDATE+22, ECXDATE+23 , ECXDATE+24, ECXDATE+25*, ECXDATE+27, ECXDATE+29, ECXDATE+30, ECXDATE+31, ECXDOB~, ECXDOB+12*, ECXDOB+14, ECXDOB+16 , ECXDOB+17, ECXDOB+18, ECXDOB+20, ECXDOB+22, ECXDOB+23, ECXDOB+24, ECXTIME~, ECXTIME+13, ECXTIME+15 |
| >> ECXIEN | PRVCLASS+15, PRVX12+15 |
| ECXMIL | ECXTIMEX~, ECXTIMEX+21 |
| ECXTIME | ECXTIME+11~, ECXTIME+13*, ECXTIME+17*, ECXTIME+22*, ECXTIME+25*, ECXTIME+26, ECXTIMEX~, ECXTIMEX+15, ECXTIMEX+16, ECXTIMEX+18 , ECXTIMEX+23 |
| ECXTIMEX | ECXTIMEX+13~, ECXTIMEX+15*, ECXTIMEX+16*, ECXTIMEX+17, ECXTIMEX+19*, ECXTIMEX+21*, ECXTIMEX+26*, ECXTIMEX+27 |
| ECXYM | ECXYM+8~, ECXYM+11*, ECXYM+12*, ECXYM+13*, ECXYM+16*, ECXYM+17, ECXYMX~, ECXYMX+15, ECXYMX+16, ECXYMX+17 , ECXYMX+18, ECXYMX+19, ECXYMX+21, ECXYMX+23, ECXDATE~, ECXDATE+15, ECXDATE+16, ECXDATE+17, ECXDATE+18, ECXDATE+20 , ECXDATE+22, ECXDATE+23, ECXDATE+24, ECXDATE+29 |
| ECXYMX | ECXYMX+12~, ECXYMX+15*, ECXYMX+16*, ECXYMX+17*, ECXYMX+18*, ECXYMX+19*, ECXYMX+23*, ECXYMX+26*, ECXYMX+27*, ECXYMX+28 |
| ELIG | PATCAT+6~, PATCAT+12*, PATCAT+15 |
| FMCENT | ECXYMX+12~, ECXYMX+22*, ECXYMX+23, ECXDATEX+12~, ECXDATEX+20*, ECXDATEX+21 |
| HH | ECXTIME+11~, ECXTIME+21*, ECXTIME+22, ECXTIME+25, ECXTIMEX+13~, ECXTIMEX+18*, ECXTIMEX+19, ECXTIMEX+21 |
| I | PATCAT+6~, PATCAT+16* |
| J | ECXTIME+11~, ECXTIMEX+13~, ECXTIMEX+16*, AOIRPOW+13~, AOIRPOW+17* |
| JJ | ECXTIME+11~, ECXTIMEX+13~, ECXTIMEX+16* |
| MM | ECXTIME+11~, ECXTIME+21*, ECXTIME+23*, ECXTIME+25, ECXTIMEX+13~, ECXTIMEX+18*, ECXTIMEX+19, ECXTIMEX+21 |
| MONTH | ECXYM+8~, ECXYM+15*, ECXYM+16, ECXDATE+11~, ECXDATE+29*, ECXDATE+32, ECXDOB+10~, ECXDOB+22*, ECXDOB+25 |
| ON | ORDPROV~, ORDPROV+12, ORDPROV+13 |
| PATCAT | PATCAT+6~, PATCAT+7*, PATCAT+8, PATCAT+12, PATCAT+16*, PATCAT+17 |
| PCAT | PATCAT+6~, PATCAT+15*, PATCAT+16 |
| PERS | PRVCLASS~, PRVCLASS+11, PRVCLASS+16, PRVX12~, PRVX12+11, PRVX12+16 |
| PSJTMP | ORDPROV~, ORDPROV+13 |
| SS | ECXTIME+11~, ECXTIME+21*, ECXTIME+24*, ECXTIME+25, ECXTIMEX+13~, ECXTIMEX+18*, ECXTIMEX+19, ECXTIMEX+21 |
| TIME | ECXTIME+11~, ECXTIME+15*, ECXTIME+17, ECXTIME+19*, ECXTIME+21, ECXTIMEX+13~ |
| TYPE | PATCAT+6~, PATCAT+9*, PATCAT+10 |
| U | AOIRPOW+15, AOIRPOW+16, PRVCLASS+15, PRVCLASS+18, PRVX12+15, PRVX12+18 |
| VACODE | PRVCLASS+8~, PRVCLASS+9*, PRVCLASS+18*, PRVCLASS+19 |
| >> X | ECXTIMEX+23*, ECXTIMEX+24*, ECXTIMEX+25*, ECXTIMEX+26 |
| X12CODE | PRVX12+8~, PRVX12+9*, PRVX12+18*, PRVX12+19 |
| Y | ECXYMX+12~, ECXYMX+23*, ECXDATEX+12~, ECXDATEX+21* |
| YEAR | ECXYM+8~, ECXYM+15*, ECXYM+16, ECXDATE+11~, ECXDATE+30*, ECXDATE+32, ECXDOB+10~, ECXDOB+23*, ECXDOB+25 |
| Name | Field # of Occurrence |
|---|---|
| $T(ELIGCDS+I | PATCAT+16 |