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 |