Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ECXUTL

Package: DSS Extracts

Routine: ECXUTL


Information

ECXUTL ;ALB/JAP - Utilities for DSS Extracts ;3/29/24 12:44

Source Information

Source file <ECXUTL.m>

Entry Points

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 ;

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(8 - [#8] GET1^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call