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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: DG311RPT

Package: Registration

Routine: DG311RPT


Information

DG311RPT ;ALB/JJG-Patch DG*5.3*311 Means Test Update Report ; 07 AUG 2000

Source Information

Source file <DG311RPT.m>

Entry Points

Name Comments DBIA/ICR reference
MAIN ; Main Driver
SEL ;
; Select IO Device
QUEUE ;
START ;
; Produce Report
HEADER ; Report Header
FOOTER ; Report Footer

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"Report cancelled!"
  • Line Location: SEL+4
Function Call: WRITE
  • Prompt: !!?5,"Report cancelled!"
  • Line Location: QUEUE+3
Function Call: WRITE
  • Prompt: !!?5,"Report queued!"
  • Line Location: QUEUE+4
Function Call: WRITE
  • Prompt: !!,$E(DGVET,1,25),?28,DGSSN,?42,DGYR,?48,$E(DGOLDSTA,1,15),?65,$E(DGNEWSTA,1,15)
  • Line Location: START+14
Function Call: WRITE
  • Prompt: !!,DGVET,?36,DGSSN,?53,DGYR,?62,DGOLDSTA,?87,DGNEWSTA
  • Line Location: START+15
Function Call: WRITE
  • Prompt: @IOF,!!!,?(IOM-26/2),"Updated Means Test Listing"
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !!,"Run Date: ",NOW
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !!,"Veteran Name",?28,"Veteran SSN",?42,"Year",?48,"Old Status",?65,"New Status"
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !,"============",?28,"===========",?42,"====",?48,"==========",?65,"=========="
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !!,"Veteran Name",?36,"Veteran SSN",?49,"Income Year",?62,"Old Means Test Status",?87,"New Means Test Status"
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,"============",?36,"===========",?49,"===========",?62,"=====================",?87,"====================="
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !!!,?(IOM-19/2),"***End Of Report***"
  • Line Location: FOOTER+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGMT(408.31 - [#408.31] EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call