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: DGENCD

Package: Registration

Routine: DGENCD


Information

DGENCD ;ALB/CJM,Zoltan,ISA/KWP,JAN,BRM,DJS - Catastrophic Disability Enter/Edit Option;May 24, 1999,Nov 14, 2001 ; 8/4/03 3:01pm

Source Information

Source file <DGENCD.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
EDITCD(DFN) ;
AGAIN(ERROR) ;
PATIENT() ;
EDIT(DGCDIS) ;
CKDOAD()
QEXIT()
DBPROC()

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Catastrophic disability can only be entered for eligible veterans!"
  • Line Location: PATIENT+9
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+21
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+25
Function Call: WRITE
  • Prompt: !!,"Must enter at least one CD Descriptor or ""^"" to exit"
  • Line Location: EDIT+28
Function Call: WRITE
  • Prompt: !!,"CD Descriptor previously selected, cannot select same CD Descriptor twice"
  • Line Location: EDIT+34
Function Call: WRITE
  • Prompt: !!,"VETERAN IS CATASTROPHICALLY DISABLED",!
  • Line Location: EDIT+49
Function Call: WRITE
  • Prompt: !!,"VETERAN IS NOT CATASTROPHICALLY DISABLED",!
  • Line Location: EDIT+53
Function Call: WRITE
  • Prompt: !,"Has the Amputation, Disarticulation or Detachment occurred on more "
  • Line Location: CKDOAD+3
Function Call: WRITE
  • Prompt: !,"than one limb? "
  • Line Location: CKDOAD+4
Function Call: WRITE
  • Prompt: !!,"Enter 'YES' or 'NO'.",!
  • Line Location: CKDOAD+6
Function Call: WRITE
  • Prompt: !!,"The Descriptor does not meet the criteria to be added."
  • Line Location: CKDOAD+8
Info |  Source |  Entry Points |  Interaction Calls