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

Package: Lab Service

Routine: LRCENDE1


Information

LRCENDE1 ;SLC/CJS-ORDER DELETE ;8/11/97

Source Information

Source file <LRCENDE1.m>

Entry Points

Name Comments DBIA/ICR reference
DO
CEN1 ;from LRCENDEL
  • ICR #5485
    • Status: Active
    • Usage: Private
    OR ;OE/RR 2.5
    SKPLR ;from LRTSTJAM,LRTSTOUT
    ZAP
    ZAP1
    ZAP2
    DC ;DC orders in OE/RR 2.5
    ZAP3(LRAA,LRCWDT,LRAN,LRTS) ;

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"You're not cleared to delete this order."
    • Line Location: DO+0
    Function Call: WRITE
    • Prompt: !!,$C(7),"NOTHING CHANGED"
    • Line Location: DO+3
    Function Call: WRITE
    • Prompt: !,"For test: "
    • Line Location: DO+6
    Function Call: WRITE
    • Prompt: !,?5,$P(^LAB(60,+X,0),"^")
    • Line Location: DO+6
    Function Call: WRITE
    • Prompt: !,"Already accessioned.",$C(7)
    • Line Location: CEN1+2
    Function Call: WRITE
    • Prompt: !?5,"This accession has already been verified",!
    • Line Location: OR+5
    Function Call: WRITE
    • Prompt: !!,"This accession is being used by someone else."
    • Line Location: OR+6
    Function Call: WRITE
    • Prompt: "."
    • Line Location: SKPLR+6

    FileMan Files Accessed Via FileMan Db Call

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