DGENELA4 ;ALB/CJM,KCL,RTK,LBD,EG,CKN,DLF,TDM,JLS,HM,RN,ARF,JAM - Patient Eligibility API ;5/10/11 12:03pm
Source file <DGENELA4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRIORITY(DFN,DGELG,DGELGSUB,ENRDATE,APPDATE,DGENRYN) | ; DG*5.3*993 Added 6th parameter DGENRYN
; Description: Used to compute the priority group and subgroup for a ; patient, also returning the subset of the eligibility data on which ; the priority subgroup is based. |
|
PRI(CODE,DGELG,ENRDATE,APPDATE,DGENRYN) | ; DG*5.3*993 Added 5th parameter DGENRYN
; Description: Returns the priority group and subgroup based on a ; single eligibility code. |
|
SUBPRI(DFN,PRIORITY,SUBGRP) | ;calculate sub-priority if under EGT
|
|
SUBCNV(SUBGRP) | ;return new subgrp
; DG*5.3*1109 - If there is a Combat End Date we do not flip the subgroups. Combat Vets do not get the reduced subgroup |
|
STAEXP(STATYP) | ;return expiration date for Special Treatment Authority (STA)
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^DGEN(27.11 - [#27.11] | GET1^DIQ |
^DGMT(408.21 - [#408.21] | GET1^DIQ |
^DGMT(408.31 - [#408.31] | GET1^DIQ |