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

Package: Lab Service

Routine: LRBLD


Information

LRBLD ;AVAMC/REG - CK BLOOD DONOR ENTRY ; 10/19/88 18:28 ;

Source Information

Source file <LRBLD.m>

Entry Points

Name Comments DBIA/ICR reference
W
M

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Your entry: ",LRP,?43,"DOB: ",$E(T,4,5)_"/"_$E(T,6,7)_"/"_$E(T,2,3),!!,"Want to delete your entry "
  • Line Location: LRBLD+5
Function Call: WRITE
  • Prompt: !!,"Ok, ",LRP," deleted.",!
  • Line Location: LRBLD+5
Function Call: WRITE
  • Prompt: W:F=1
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,"Donors with same last name, first name initial and sex as your entry:",!
  • Condition for execution: F=1
  • Line Location: W+0
Function Call: WRITE
  • Prompt: ?12,A,?43,"DOB: ",$E(Z,4,5)_"/"_$E(Z,6,7)_"/"_$E(Z,2,3),!
  • Line Location: W+0
Function Call: READ
  • Formatting: "Press <CR>
  • Prompt: 'ENTER' or 'RETURN' key: "
  • Variable: X(1)
  • Timeout: DTIME
  • Line Location: M+0
Function Call: WRITE
  • Prompt: $C(13),$J("",80),$C(13)
  • Line Location: M+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LRE - [#65.5] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call