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

Package: Remote Order Entry System

Routine: RMPFDD3


Information

RMPFDD3 ;DDC/KAW-ENTER/EDIT ELIGIBILITY [ 06/16/95 3:06 PM ]

Source Information

Source file <RMPFDD3.m>

Entry Points

Name Comments DBIA/ICR reference
E0
E01
E1
END
READ

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?29,"ENTER/EDIT ELIGIBILITY"
  • Line Location: RMPFDD3+5
Function Call: WRITE
  • Prompt: !!,"Patient: ",RMPFNAM,?40,"SSN: ",RMPFSSN,?63,RMPFDOB,!
  • Line Location: RMPFDD3+6
Function Call: WRITE
  • Prompt: "-"
  • Line Location: RMPFDD3+7
Function Call: WRITE
  • Prompt: !!,"Eligibility for ROES transactions cannot be determined from the DHCP database",!,"for this veteran."
  • Line Location: RMPFDD3+8
Function Call: WRITE
  • Prompt: !!,"Do you wish to enter an eligibility? YES// "
  • Line Location: E0+0
Function Call: WRITE
  • Prompt: !!,"Enter a <Y> if you wish to select an eligibility",!?6,"a <N> if you wish to exit"
  • Line Location: E01+0
Function Call: WRITE
  • Prompt: !
  • Line Location: E1+0
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: READ+1
Function Call: READ
  • Variable: Y
  • Timeout: 5
  • Line Location: READ+1
Info |  Source |  Entry Points |  Interaction Calls