ECXUTL3 ;ALB/GTS - Utilities for DSS Extracts ;9/4/18 13:18
Source file <ECXUTL3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
OUTPTTM(ECXDFN,ECXDT) | ;* Return PC Team from PCMM files or DPT
; Variables - ; ECXDFN - IEN from Patient file (Required) ; ECXDT - Relevant Date for Primary Care Team ; (Defaults to DT) |
|
OUTPTPR(ECXDFN,ECXDT) | ;* Return PC Provider from PCMM files or DPT
; Variables - ; ECXDFN - IEN from Patient file (Required) ; ECXDT - Relevant Date for Primary Care Provider ; (Defaults to DT) |
|
PAT(ECXDFN,ECXDATE,ECXDATA,ECXPAT) | ;Return basic patient data for extract
; Will not return data associated with test patients (SSN begin w 00000) ; Variables - ; Input ECXDFN - Patient internal entry number, DFN file#2; required ; ECXDATE- Date used to get specific data from GETSTAT^DGMSTAPI ; for MST. If no date, defaults to today's date, ; standard FM format, optional ; ECXDATA- Code indicating which data to return, optional. ; If code not specified then returns all. Codes are: ; 1 - DEM^VADPT (demographic data) ; 2 - ADD^VADPT (current address) ; 3 - ELIG^VADPT (eligibility & enrollment location) ; 4 - OPD^VADPT (other patient data) ; 5 - SVC^VADPT & GETSTAT^DGMSTAPI (service & MST inf) ; ECXPAT(- Passed by reference; required |
|
ELIG(ECXELIG,ECXSVCP) | ;Converts veteran eligibility code to NPCD code
; Variables - ; Input ECXELIG - Pointer to MAS ELIGIBILITY CODE file #8.1 ; ECXSVCP - Number value rep. service connected percentage. |
|
ELGTXT | ;Eligibility codes
|
|
CPT(ECXCPT,ECXMOD,ECXQUA) | ;Returns a str with CPT code and modifier codes
|
|
CPT3Q6M(ECXCPT,ECXMOD,ECXQUA) | ;
|
|
CPTOUT(ECXCPT) | ;output transform for CPT code plus modifiers
|
|
CHECKRC(RACEIEN) | ;144 API added to check RACE for non-stardard values that can be converted. If the value can be converted then it will be stored in RACE1 upon return
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^DIC(22 - [#22] | GET1^DIQ |
^HL(779.004 - [#779.004] | GET1^DIQ |
^DIC(8 - [#8] | GET1^DIQ |