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

Package: Registration

Routine: DGOVBC2


Information

DGOVBC2 ;ALB/MRL - VBC OUTPUT, CONTINUED ; 12 FEB 87

Source Information

Source file <DGOVBC2.m>

Entry Points

Name Comments DBIA/ICR reference
1
Q
L

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DGOVBC2+4
Function Call: WRITE
  • Prompt: !,"8. Aid & Attendance: ",$S(VAMB(1):"$"_+$P(VAMB(1),"^",2),1:"NONE"),?40,"Housebound : ",$S(VAMB(2):"$"_+$P(VAMB(2),"^",2),1:"NONE"),?90,"Social Security: ",$S(VAMB(3):"$"_+$P(VAMB(3),"^",2),1:"NONE")
  • Line Location: DGOVBC2+4
Function Call: WRITE
  • Prompt: !?3,"VA Pension : ",$S(VAMB(4):"$"_+$P(VAMB(4),"^",2),1:"NONE"),?40,"Military Retirement: ",$S(VAMB(5):"$"_+$P(VAMB(5),"^",2),1:"NONE"),?90,"GI Insurance : ",$S(VAMB(9):"$"_+$P(VAMB(9),"^",2),1:"NONE")
  • Line Location: DGOVBC2+5
Function Call: WRITE
  • Prompt: !?3,"Disability : ",$S(VAMB(7):"$"_+$P(VAMB(7),"^",2),1:"NONE"),?40,"SSI : ",$S(VAMB(6):"$"_+$P(VAMB(6),"^",2),1:"NONE"),?90
  • Line Location: DGOVBC2+6
Function Call: WRITE
  • Prompt: !?3,"Other Retirement: ",$S(VAMB(8):"$"_+$P(VAMB(8),"^",2),1:"NONE"),!
  • Line Location: DGOVBC2+11
Function Call: WRITE
  • Prompt: " NOT A SERVICE-CONNECTED APPLICANT, NOT APPLICABLE!!"
  • Line Location: DGOVBC2+13
Function Call: WRITE
  • Prompt: !
  • Condition for execution: (130-$X)<$L(I2)
  • Line Location: DGOVBC2+14
Function Call: WRITE
  • Prompt: ?DGX,I2
  • Line Location: DGOVBC2+14
Function Call: WRITE
  • Prompt: " NONE ON FILE!!"
  • Line Location: DGOVBC2+15
Function Call: WRITE
  • Prompt: !
  • Line Location: 1+0
Function Call: WRITE
  • Prompt: !,"10. Former POW: ",$S(DGPOW:"YES",1:"NO"),?30,"| 11. Marital Status: ",DGMS
  • Line Location: 1+0
Function Call: WRITE
  • Prompt: ?80,"| 12. Means Test: ",$S(DGMT]"":DGMT,1:"NOT REQUIRED"),!,"______________________________|_________________________________________________|_________________________________________________"
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: !,DGLIN,!,DGLIN,!,"| DATE SEEN",?21,"| SEEN BY",?31,"| REMARKS",?129,"|"
  • Line Location: 1+2
Function Call: WRITE
  • Prompt: !,X
  • Line Location: 1+3
Function Call: WRITE
  • Prompt: !,DGLIN,!,"Date/Time Printed: "
  • Line Location: 1+4
Function Call: WRITE
  • Prompt: Y,!
  • Line Location: 1+4
Function Call: WRITE
  • Prompt: "_"
  • Line Location: L+0
Info |  Source |  Entry Points |  Interaction Calls