©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DGQEUT2 ;ALB/RPM - VIC REPLACEMENT UTILITIES #2 ; 3/13/06 11:12am
Source file <DGQEUT2.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 2 | ($$FINDLST,$$GETREQ)^DGQEREQ $$ISENRPND^DGQEUT1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VICELIG(DGELG) | ;is applicant eligible for a Veteran ID Card?
; This function determines if an applicant is eligible for a Veteran ; Identification Card (VIC). |
|
| REQFLD(DGVIC,DGERR) | ;required field check
; This function is used to check for required fields in the VIC data ; array. |
|
| PENDDT(DGDFN) | ;check for pending request date
|
|
| HOLD(DGVIC,DGMSG) | ;check for pending ICN, Enrollment Status, Purple Heart
; This function checks for a pending ICN, Enrollment Status, and/or ; Purple Heart confirmation and builds the appropriate message text ; when a pending condition exists. |
|
| CPRSTAT(DGVIC) | ;determine card print release status
; This procedure is used to determine Card Print Release Status from ; the data contained in the input array (DGVIC). Once determined, the ; status and remarks are placed into the VIC data array. |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | CPRSTAT+16 |
| Name | Line Occurrences |
|---|---|
| $$HOLD | CPRSTAT+30 |
| $$REQFLD | CPRSTAT+23 |
| $$VICELIG | CPRSTAT+37 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DGCNT | HOLD+24~, HOLD+28*, HOLD+34*, HOLD+35, HOLD+40*, HOLD+41, HOLD+46*, HOLD+47, HOLD+50, HOLD+52 |
| DGDAT | PENDDT+8~, PENDDT+12*, PENDDT+20*, PENDDT+22 |
| DGDFN | PENDDT~, PENDDT+15 |
| DGELG | VICELIG~ |
| DGELG("COMBVET" | VICELIG+26 |
| DGELG("ELIGSTAT" | VICELIG+20, VICELIG+25 |
| DGELG("ENRSTAT" | VICELIG+17, VICELIG+19, VICELIG+24 |
| DGELG("MST" | VICELIG+21, VICELIG+28 |
| DGELG("SC" | VICELIG+22, VICELIG+27 |
| DGENRST | HOLD+23~, HOLD+29*, HOLD+38 |
| DGERR | CPRSTAT+10~, CPRSTAT+23, CPRSTAT+25, CPRSTAT+30, CPRSTAT+32, REQFLD~, REQFLD+17*, REQFLD+18, REQFLD+22*, REQFLD+23* , REQFLD+24, REQFLD+27, REQFLD+28*, REQFLD+31*, REQFLD+32, REQFLD+35*, REQFLD+36, REQFLD+39, REQFLD+42*, REQFLD+43 , REQFLD+46, REQFLD+47*, REQFLD+48, REQFLD+51, REQFLD+52*, REQFLD+54 |
| DGI | HOLD+22~, HOLD+52* |
| DGMSG | HOLD~, HOLD+51*, HOLD+52*, HOLD+53* |
| DGMSG( | HOLD+35*, HOLD+41*, HOLD+47*, HOLD+52 |
| DGREQ | PENDDT+10~, PENDDT+17 |
| DGREQ("CPRSTAT" | PENDDT+20 |
| DGREQ("REQDT" | PENDDT+20 |
| DGRIEN | PENDDT+9~, PENDDT+15*, PENDDT+16, PENDDT+17 |
| DGRSLT | HOLD+25~, HOLD+27*, HOLD+33*, HOLD+39*, HOLD+45*, HOLD+55, VICELIG+11~, VICELIG+14*, VICELIG+17*, VICELIG+19 , VICELIG+21*, VICELIG+22*, VICELIG+24, VICELIG+26*, VICELIG+27*, VICELIG+28*, VICELIG+30 |
| DGSUB | REQFLD+12~, REQFLD+27*, REQFLD+28, REQFLD+31, REQFLD+39*, REQFLD+40, REQFLD+42, REQFLD+46*, REQFLD+47, REQFLD+51* , REQFLD+52 |
| DGTYPE | REQFLD+11~, REQFLD+41*, REQFLD+42 |
| DGVIC | CPRSTAT~, CPRSTAT+23, CPRSTAT+30, CPRSTAT+37, REQFLD~, HOLD~ |
| DGVIC( | REQFLD+28, REQFLD+31, REQFLD+40, REQFLD+47, REQFLD+52 |
| DGVIC("ADRTYPE" | REQFLD+35, REQFLD+41 |
| DGVIC("DFN" | CPRSTAT+16 |
| DGVIC("DOB" | REQFLD+21, REQFLD+22 |
| DGVIC("ENRSTAT" | HOLD+29 |
| DGVIC("ICN" | HOLD+32 |
| DGVIC("PH" | HOLD+44 |
| DGVIC("REMARKS" | CPRSTAT+18*, CPRSTAT+25*, CPRSTAT+32*, CPRSTAT+40* |
| DGVIC("SSN" | REQFLD+17 |
| DGVIC("STAT" | CPRSTAT+17*, CPRSTAT+19, CPRSTAT+24*, CPRSTAT+26, CPRSTAT+31*, CPRSTAT+33, CPRSTAT+37*, CPRSTAT+39* |