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 |  Interaction Calls
Print Page as PDF
Routine: DGENCLEA

Package: Registration

Routine: DGENCLEA


Information

DGENCLEA ;ALB/JLS - Camp Lejeune Eligibility API - Retrieve Eligibility ;11/28/14 4:25pm

Source Information

Source file <DGENCLEA.m>

Entry Points

Name Comments DBIA/ICR reference
CLE(DFN) ;
ADDEDTCL(DFN) ; DG*5.3*909 Enter/Edit Camp Lejeune Indicator
AECL2
SAVECL(DFN,DGCLIND,DGCLDAT,DGSITE,DGSOURCE) ; DG*5.3*909 Save CL-V info
; Check if CL-V Indicator already No or Yes, then use old date.
SETCLNO ; DG*5.3*909 Set Camp Lejeune to No when no longer CL Eligible

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Camp Lejeune indicator cannot be deleted if already "
  • Line Location: AECL2+20
Function Call: WRITE
  • Prompt: "indicated.",!,"Enter '^' to exit.",!
  • Line Location: AECL2+21
Info |  Source |  Entry Points |  Interaction Calls