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

Package: Lab Service

Routine: LRGV1


Information

LRGV1 ;DALOI/RWF - PART2 OF INSTRUMENT GROUP VERIFY DATA ;2/8/91 09:29

Source Information

Source file <LRGV1.m>

Entry Points

Name Comments DBIA/ICR reference
STUFF ;from LRGV
NOP ; unlock from above
INFO ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"*** Report requested to stop by TaskMan ***"
  • Line Location: STUFF+5
Function Call: WRITE
  • Prompt: !,"*** Task #",$G(ZTQUEUED,"UNKNOWN")," stopped at ",$$HTE^XLFDT($H)," ***"
  • Line Location: STUFF+6
Function Call: WRITE
  • Prompt: !,"Unable to obtain lock on sequence #",LRSQ
  • Line Location: STUFF+13
Function Call: WRITE
  • Prompt: !?5,"Corrupt Accession ",!
  • Line Location: STUFF+21
Function Call: WRITE
  • Prompt: " Auto Sequence #",LRSQ
  • Line Location: STUFF+34
Function Call: WRITE
  • Prompt: ?40,"Accession NOT found."
  • Line Location: STUFF+36
Function Call: WRITE
  • Prompt: ?45,"There's NO Instrument Data "
  • Line Location: STUFF+54
Function Call: WRITE
  • Prompt: !
  • Line Location: STUFF+61
Function Call: WRITE
  • Prompt: !,"Unable to obtain lock on LAB DATA file"
  • Line Location: STUFF+64
Function Call: WRITE
  • Prompt: !,"DATA HEADER MISSING "
  • Line Location: STUFF+67
Function Call: WRITE
  • Prompt: !," Specimen: ",LRSPNAM
  • Line Location: STUFF+71
Function Call: WRITE
  • Prompt: ?26," Collection date/time: ",$$FMTE^XLFDT($P(LR0,"^"),"1M"),!
  • Line Location: STUFF+72
Function Call: WRITE
  • Prompt: !," << SPECIMEN IS NOT ",LRSPNAM," >> "
  • Line Location: STUFF+75
Function Call: WRITE
  • Prompt: !,"Some Data Already Verified ",!
  • Line Location: STUFF+79
Function Call: WRITE
  • Prompt: !,"Some Unverified Data Already Entered. "
  • Line Location: STUFF+82
Function Call: WRITE
  • Prompt: !,">> Accession: ",LRAN," NOT VERIFIED <<"
  • Line Location: NOP+3
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: NOP+4
Function Call: WRITE
  • Prompt: !,"Sequence #: ",LRSQ
  • Line Location: INFO+2
Function Call: WRITE
  • Prompt: ?20,"TRAY: ",$P(X,"^")
  • Line Location: INFO+6
Function Call: WRITE
  • Prompt: ?33,"CUP: ",$P(X,"^",2)
  • Line Location: INFO+7
Function Call: WRITE
  • Prompt: ?45,"DUPLICATE "
  • Line Location: INFO+9
Info |  Source |  Entry Points |  Interaction Calls