Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRFAST

Package: Lab Service

Routine: LRFAST


Information

LRFAST ;VA/DALOI/JMC - FAST ENTRY ;May 23, 2006

Source Information

Source file <LRFAST.m>

Call Graph

Call Graph Total: 22

Package Total Call Graph
Lab Service 18 SLROT^LRBEBA2  AQ1^LRBEBA3  $$CHKINP^LRBEBA4  ^LRCAPV  ^LRDPA  END^LRMIEDZ  PAT1^LRMIEDZ2  NEW^LROR6  
(,LROEND)^LRORDK  ^LROW1  REST^LROW2  ^LRPARAM  ^LRVER1  $$SELPL^LRVERA  ^LRWLST  (COLTY,DPT,LOC)^LRWU  
PRAC^LRWU1  (DEM,PT,YMD)^LRX  
VA Fileman 3 ^%DT  ^DIC  YN^DICN  
Kernel 1 $$NOW^XLFDT  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Lab Service 3 LRFAST  LRHYPH2  LROE2  
IHS Changes To Lab 1 BLRAG05D  

Entry Points

Name Comments DBIA/ICR reference
QUIT
SHORT
LROE ;from LROE1
  • ICR #5591
    • Status: Active
    • Usage: Private
    LROE1
    URG ;
    SH ; W !,"Do you want to enter draw times" S %=2 D YN^DICN S LRADT=(%=1) Q:%=-1
    Q11
    EN ; D QUIT,^LRORDK,LROEND^LRORDK D ^LRPARAM S LRLONG="" G SHORT
    Q12
    QSN2
    AMIS ;
    QSN1

    External References

    Name Field # of Occurrence
    ^%DT QSN2
    ^DIC URG+1
    YN^DICN SHORT+2, SH+1
    SLROT^LRBEBA2 QSN2+4
    AQ1^LRBEBA3 QSN2+5
    $$CHKINP^LRBEBA4 QSN2+3
    ^LRCAPV LROE1+2
    ^LRDPA AMIS+1
    END^LRMIEDZ QUIT+8
    PAT1^LRMIEDZ2 LROE1+11
    NEW^LROR6 QSN2+1
    ^LRORDK QUIT+8, EN+1
    LROEND^LRORDK EN+1
    ^LROW1 URG+2
    REST^LROW2 QSN2+7
    ^LRPARAM LRFAST+8, QUIT+9, EN+1
    ^LRVER1 LROE1+8
    $$SELPL^LRVERA SHORT+3
    ^LRWLST QSN2+8
    COLTY^LRWU Q11
    DPT^LRWU QSN1
    LOC^LRWU Q12
    PRAC^LRWU1 Q11
    DEM^LRX LROE1+8
    PT^LRX QSN1
    YMD^LRX AMIS+2
    $$NOW^XLFDT AMIS+1

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"BYPASSING ORDER ENTRY!!",$C(7)
    • Line Location: SHORT+0
    Function Call: WRITE
    • Prompt: $C(7),!,"ROLLOVER ",$S($P(^("RO"),U,2):"IS RUNNING.",1:"HAS NOT RUN.")," ACCESSIONING SHOULDN'T BE DONE NOW.",$C(7),!," Are you sure you want to continue"
    • Line Location: SHORT+1
    Function Call: WRITE
    • Prompt: !,"OK, try later."
    • Line Location: SHORT+2
    Function Call: WRITE
    • Prompt: !,"Do you want to enter draw times"
    • Line Location: SH+0
    Function Call: WRITE
    • Prompt: !,"Do you want to enter draw times"
    • Line Location: SH+1
    Function Call: WRITE
    • Prompt: !,"If you answer 'yes', you will be asked for the approximate time the specimen",!,"was taken from the patient. Otherwise, the current time will be assumed."
    • Line Location: SH+2
    Function Call: WRITE
    • Prompt: !!,$C(7),"ORDER CANCELED",!!
    • Line Location: Q11+0
    Function Call: WRITE
    • Prompt: !!,$C(7),"...process aborted"
    • Line Location: QSN2+1
    Function Call: READ
    • Timeout: DTIME
    • Variable: %
    • Line Location: EN+2
    Function Call: WRITE
    • Prompt: !,"Answer 'Y' or 'N': "
    • Line Location: EN+2
    Routine Call
    • DIC
    • Line Location:
      • URG+1

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^LAB(62.05 - [#62.05] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^LAB(62.05 - [#62.05] URG+1
    ^LAB(69.9 - [#69.9] SHORT, SHORT+1, LROE1+10
    ^LR - [#63] QSN1
    ^LRO(68 - [#68] LROE1, LROE1+2, LROE1+7
    ^LRO(69 - [#69] AMIS+2*, QSN2+7*, LROE+1, LROE+5
    ^TMP("LR" QUIT!, QUIT+3!

    Label References

    Name Line Occurrences
    % %
    LROE1 LROE+5
    QSN2 QSN2
    QUIT SHORT+4, AMIS+1, QSN1, Q12, Q11, URG+2, QSN2, QSN2+3, LROE+7, EN+1
    SH SH+2
    SHORT EN+1

    Naked Globals

    Name Field # of Occurrence
    ^( QSN1, QSN2+7, LROE+5
    ^("RO" SHORT+1
    ^(0 AMIS+2*, LROE1+10

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % SHORT+2*, SH+1*, SH+2, QSN2+1*, QUIT!, %*
    %DT QSN2*!
    %DT("A" QSN2*
    %DT(0 QSN2*
    >> %H AMIS+2*
    A QUIT!
    AGE QUIT!
    >> BLROPT EN+1*
    >> BLROPT(0 EN+1*
    D1 QUIT!
    D2 QUIT!
    DFN AMIS+1!, QUIT!
    DIC AMIS+1!, URG+1*, QUIT+1!
    DIC("B" URG+1*
    DIC("S" URG+1*
    DIC(0 AMIS+1*, URG+1*
    DIE QUIT!
    DL QUIT!
    DLAYGO QUIT!
    DOB QUIT!
    DQ QUIT!
    DR QSN1!, QUIT!
    DT AMIS+1
    DTIME %
    >> DTOUT AMIS+1, QSN2+6
    >> DUOUT AMIS+1, QSN2+6
    DUZ QSN2+2, QSN2+7
    DUZ(2 SHORT+3, SHORT+5, QSN2+7
    DX QUIT!
    H8 QUIT!
    HRCN QUIT+7!
    I QUIT!
    I1 QUIT!
    I111 LROE+4~, LROE+5*
    I5 QUIT+4!
    J QUIT!
    K QUIT!
    LRAA LROE+5*, LROE1, LROE1+2, LROE1+7, QUIT!
    LRACC QUIT!
    LRACD QUIT+3!
    LRAD AMIS+1*, LROE+5*, LROE1+7, QUIT!
    LRADDTST QUIT+3!
    LRADT SH+1*, QSN2, QUIT!
    LRALERT QUIT+5!
    LRAN QSN2+8, LROE+5*, LROE1+7, QUIT!
    LRAOD QUIT+3!
    LRAP QUIT!
    LRBED QUIT+3!
    LRBEQT LRFAST+5~, QUIT+6!
    LRBETS LRFAST+5~, QUIT+6!
    LRBETYP LRFAST+5~, QUIT+6!
    LRBEVT LRFAST+5~, QUIT+6!
    LRBEX LRFAST+5~, QUIT+6!
    LRBEY LRFAST+5~, QSN2+3*, QSN2+6, QUIT+6!
    LRBEZ LRFAST+5~, QUIT+6!
    LRCAPLOC QUIT+5!
    LRCCOM QUIT+4!
    LRCDEF0X QUIT+5!
    LRCDT AMIS+1*, QSN2*, QSN2+2, QSN2+7, QUIT!
    LRCFL QUIT+4!
    LRCOM QUIT+5!
    LRCS QUIT+4!
    LRCSN QUIT+4!
    LRCSP QUIT+4!
    LRCSS QUIT+3!
    LRCSX QUIT+4!
    LRCW QUIT!
    LRCWDT QUIT+1!
    LRD QUIT+1!
    LRDAT QUIT+1!
    LRDAX QUIT+5!
    LRDEL QUIT+1!
    LRDFN AMIS+1, QSN1, QSN2+2, QSN2+3, QUIT+1!
    LRDPF QSN2+3, QUIT+1!
    LRDTO QUIT+3!
    LRDUZ LROE1+5~
    LRDUZ(2 LROE1+5*
    LRDV QUIT+1!
    LRDVF QUIT+1!
    LREAL QUIT+1!
    LREDIT QUIT+1!
    LREND QSN1, Q12, Q11, LROE+5, LROE1+3, QUIT+1!
    LREXEC QUIT+3!
    LREXP QUIT+4!
    LRFFLG QUIT+1!
    LRFLOG QUIT+3!
    LRFP QUIT+1!
    LRGCOM QUIT+3!
    LRGVP QUIT+3!
    >> LRIDIV LROE1+1*
    LRIDT AMIS+1*, QSN2*, QUIT+1!
    LRIN QUIT+1!
    LRINI QUIT+1!
    LRIOZERO QUIT+3!
    LRIX QUIT+1!
    LRJ QUIT+5!
    LRLBLBP QUIT+2!
    LRLCT QUIT+2!
    LRLDT QUIT+2!
    LRLLOC QSN1*, QSN2+2, LROE+1*, QUIT+2!
    LRLONG LRFAST+6!, LRFAST+7*, SHORT, Q12, Q11, QUIT+2!, EN+1*
    LRLWC QSN2+2, QUIT+4!
    LRM QUIT+4!
    LRMA QUIT+5!
    LRMAX QUIT+4!
    LRMAX1 QUIT+5!
    LRMAX2 QUIT+5!
    LRMETH QUIT+2!
    LRMIDEF LROE1+10*, LROE1+12!
    LRMIOTH LROE1+10*, LROE1+12!
    LRMX QUIT+5!
    LRNAME QUIT+2!
    LRNATURE LRFAST+6!, QSN2+1!, QUIT!
    LRNCWL QSN2+7*!
    LRNG QUIT+2!
    LRNG2 QUIT+2!
    LRNG3 QUIT+2!
    LRNG4 QUIT+2!
    LRNG5 QUIT+2!
    LRNIDT QUIT+3!
    LRNN URG+2*, QUIT+4!
    LRNOCODE QUIT+5!
    LRNOLABL QSN2+8*!
    LRNOW QUIT+5!
    LRNP QUIT+2!
    LRNT AMIS+1*, QUIT+2!
    LRNTN QUIT+2!
    LRNX QUIT+2!
    LROCN QUIT+3!
    LRODT AMIS+1*, AMIS+2, QSN2+3, QSN2+7, LROE+1, LROE+5, QUIT+2!
    LRODTSV QUIT+5!
    LROE LROE+1!, QUIT+5!
    LROE( LROE+5*
    LROID QUIT+3!
    LROLLOC QUIT+5!
    LROLRDFN QUIT+3!
    LRORD QUIT+1!
    LRORDER QUIT+4!
    LRORDR QUIT+4!
    LRORDTIM QUIT+4!
    LRORIFN QUIT+4!
    LROSN QUIT+4!
    >> LROT QSN2+4
    LROUT QUIT+2!
    LROUTINE SHORT*, URG+1, QUIT+2!
    LROWDT QUIT+2!
    LROWLE QUIT+2!
    LRPANEL SHORT*, QUIT+5!
    >> LRPARAM AMIS+1, LROE1+2
    LRPER QUIT+4!
    LRPHSET QUIT+4!
    LRPL SHORT+5~*, LROE1+5
    LRPLOC QUIT+4!
    LRPR QUIT+2!
    LRPRAC Q11*, QSN2+2, QUIT+2!
    LRPTP SHORT*, LROE1+10*, QUIT+2!
    LRRB QUIT+2!
    LRSAMP AMIS+1*, QSN2+2, QUIT+2!
    LRSB QUIT+1!
    LRSN QSN2+7, LROE+1, LROE+5, QUIT+2!
    LRSNO QSN2+2*, QUIT+4!
    LRSNSV QUIT+5!
    LRSPCDSC QUIT+4!
    LRSPEC URG+2, QSN2+8*, QUIT+2!
    LRSS QSN2+3, QUIT+2!
    LRSSP QUIT+2!
    LRSSQ QUIT+4!
    LRSSX QUIT+4!
    LRST QUIT+2!
    LRSUB QUIT+2!
    LRSUF0 QUIT+6!
    LRSUM QUIT+2!
    LRSVSN QUIT+4!
    LRTB QUIT+2!
    LRTCOM QUIT+5!
    LRTD QUIT+2!
    LRTEC QUIT+4!
    LRTEST QSN2+4, QUIT+2!
    LRTJ QUIT+4!
    >> LRTM60 AMIS+2*
    LRTN QUIT+3!
    LRTNSV QUIT+5!
    LRTP QUIT+4!
    LRTREA QUIT+5!
    LRTS QUIT+3!
    LRTSTN QUIT+4!
    LRTSTNM QUIT+4!
    >> LRTSTS QSN2+8*
    LRTX QUIT+3!
    LRTY QUIT+4!
    >> LRUID LROE1+7*
    LRUNQ QUIT+3!
    LRUR QUIT+5!
    LRURG URG+1*, QUIT+3!
    LRUSI QUIT+3!
    LRUSNM QUIT+3!
    LRVF QUIT+4!
    LRVOL QUIT+5!
    LRVRM QUIT+4!
    LRWL0 QUIT+3!
    LRWLC QUIT+3!
    LRWPC QUIT+5!
    LRWRD QSN1, QUIT+3!
    LRX LROE1*, LROE1+1, LROE1+8, LROE1+9, LROE1+13!
    LRXD QUIT+3!
    LRXDH QUIT+3!
    LRXDP QUIT+3!
    LRXS QUIT+4!
    LRXST QSN2+4, QUIT+5!
    LRY QUIT+5!
    LRYR QUIT+3!
    PNM QUIT+3!, QUIT+5!
    POP QUIT+4!
    S QUIT+3!
    S2 QUIT+4!
    S5 QUIT+4!
    S9 URG+2*, QSN2+8, QUIT+3!
    SEX QUIT+3!
    SSN QUIT+3!
    T QUIT+3!
    T1 QUIT+4!
    U SHORT, SHORT+1, AMIS+1*, AMIS+2, URG+1, QSN2, QSN2+2, LROE+1, LROE+5, LROE1+1
    , LROE1+2, LROE1+8, LROE1+9, LROE1+10, EN+1
    X SHORT+3*, SHORT+4, SHORT+5, AMIS+2, LROE+5*, QUIT+3!
    X1 QUIT+3!
    X2 QUIT+4!
    X3 URG+2, QUIT+4!
    X9 QUIT+4!
    >> XQY0 EN+1
    Y AMIS+1*, URG+1, QSN2, QUIT+3!
    Z QUIT+3!
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All