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

Package: Registration

Routine: DGREGG


Information

DGREGG ;ALB/MRL,LBD - CONTINUATION OF REGISTRATION PROCESS ; 3/10/11 4:32pm

Source Information

Source file <DGREGG.m>

Entry Points

Name Comments DBIA/ICR reference
GETMSE ;Get Last Discharge Type and Service Entry Dates (DG*5.3*797)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: DGREGG+3
Function Call: WRITE
  • Prompt: !,"Patient is ineligible for benefits."
  • Line Location: DGREGG+3
Function Call: WRITE
  • Prompt: $S($D(DEF)\10:", He",1:"Patient")
  • Line Location: DGREGG+6
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>70
  • Line Location: DGREGG+6
Function Call: WRITE
  • Prompt: " did not receive an honorable discharge."
  • Line Location: DGREGG+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: DGREGG+7
Function Call: WRITE
  • Prompt: !,"Entered Service ",Y
  • Line Location: DGREGG+10
Info |  Source |  Entry Points |  Interaction Calls