Routine: LRBLPT1

Select the objects that you wish to see in the downloaded PDF

Info
Source
Entry Points
Interaction Calls
FileMan Files Accessed Via FileMan Db Call

Information

LRBLPT1 ;AVAMC/REG - TRANSFUSION RESULTS (COND'T) ;12/11/92 07:38 ;

Source file <LRBLPT1.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: LRBLPT1+3
Function Call: WRITE	Prompt: $C(7)," Enter date & TIME" Line Location: DT+0
Function Call: WRITE	Prompt: $C(7),!!,"DATE/TIME MUST BE AFTER DATE UNIT RECEIVED IN INVENTORY",! Line Location: DT+1
Function Call: READ	Timeout: %'=1 Line Location: DT+2
Function Call: WRITE	Prompt: !!,"TRANSFUSION REACTION " Line Location: T+0
Function Call: WRITE	Prompt: $P(X,"^"),?17,$E(M,1,22),?40,$J($P(X,"^",7),2),?43,$P(X,"^",8),?48 Line Location: U+0
Function Call: WRITE	Prompt: Y,?64,F Line Location: U+0

FileNo	Call Tags
^LRD(65 - [#65]	Classic Fileman Calls
^LAB(65.4 - [#65.4]	Classic Fileman Calls