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

Package: Lab Service

Routine: LRDCOM


Information

LRDCOM ;SLC/BA - REPORT OF DELETED OR EDITED COMMENTS ;2/19/91 10:32 ;

Source Information

Source file <LRDCOM.m>

Entry Points

Name Comments DBIA/ICR reference
BEGIN
END
ASK
DCOM
DQ
DATE
SETUP
DELCOM
WAIT
HDR
TIME

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: "Audit report of deletions/edited comments for a single patient"
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: "Audit report of deletions/edited comments for a single patient"
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !,?5,"No deleted/edited comments for ",PNM," ",SSN,!
  • Line Location: DQ+1
Function Call: WRITE
  • Prompt: !,LRACC,?15,PNM," ",SSN,!,?15,"Collected: ",LRTIME
  • Line Location: SETUP+2
Function Call: WRITE
  • Prompt: !?15,"Verified: ",Y," by ",LRUSNM,!?15,"Comment deleted/edited: ",LRDTIME," by ",LRDUSNM,!,?5,$P(LRDCOM,U,3),!
  • Line Location: DELCOM+0
Function Call: READ
  • Formatting: !
  • Prompt: "PRESS '^' TO STOP "
  • Variable: X
  • Timeout: DTIME
  • Line Location: WAIT+0
Function Call: WRITE
  • Prompt: @IOF,!,?24,"DELETED/EDITED COMMENTS",?65,LRNOW,!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: ?24,"from ",$S(Y="00/00/00":"LAST",1:Y)
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: ?24,"from ",$S(Y="00/00/00":"LAST",1:Y)
  • Line Location: HDR+0
Info |  Source |  Entry Points |  Interaction Calls