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

Package: Automated Medical Information Exchange

Routine: DVBCSIS


Information

DVBCSIS ;ALB/JEH SOCIAL AND INDUSTRIAL SURVEY ; 5 MARCH 1997

Source Information

Source file <DVBCSIS.m>

Entry Points

Name Comments DBIA/ICR reference
EN
HD2
SETIOF ; ** Set device control var's

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?22,"VETERANS HEALTH ADMINISTRATION",!,?(IOM-$L(DVBAX)\2),DVBAX,!?19,"COMPENSATION AND PENSION EXAMINATION #1790",!!!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: "Social Worker's Name & Title:",!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: "Date 2507/Consult Received:",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: "Originating VARO:",!!
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !?28,"EXAM INFORMATION",!?28,"----------------",!!
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: "Name: ",NAME,?45,"SSN: ",SSN,!!,"DOB: ___________",?45,"C#: ",CNUM,!!,"Date of exam: ____________________",!!,"Place of exam: ___________________",!!
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: "ADDRESS: ______________________________________",!?9,"Street or P.O. Box",!?9,"______________________________________",!?9,"City,State,Zip Code",!!
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: "PHONE: ________________________________________",!?7,"(Home,work or message-phone,if available)",!!
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: @IOF,!,"Page: ",PG,!!,"Compensation and Pension Exam for "_NAME,!
  • Line Location: HD2+0
Function Call: WRITE
  • Prompt: "For SOCIAL AND INDUSTRIAL SURVEY",!!!
  • Line Location: HD2+1
Info |  Source |  Entry Points |  Interaction Calls