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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRPHITEM

Package: Lab Service

Routine: LRPHITEM


Information

LRPHITEM ;SLC/CJS/RWF-ITEMIZED LOGIN ;6/24/91 10:49 [ 04/08/2003 9:05 AM ]

Source Information

Source file <LRPHITEM.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Lab Service 9 NEW^LR7OB1  $$VER^LR7OU1  FNDLOC^LRDRAW  END^LRPHITE1  OUT^LRPHITE2  EXCEPT^LRPHITE3  FX2^LRTSTOUT  OR^LRWLST  
PT^LRX  
Automated Lab Instruments 1 EN^LA7ADL  
IHS Changes To Lab 1 ^BLREVTQ  
Kernel 1 $$NOW^XLFDT  
VA Fileman 1 YN^DICN  

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Lab Service 6 LRHYPH2  LROE1  LROE2  LRPHEXPT  LRPHITE1  LRPHITEM  
IHS Changes To Lab 1 BLRAG05D  

Entry Points

Name Comments DBIA/ICR reference
198 ;
SKP
P15A ;
TEXT
POLY ;
SINGLE ;
LP1 ;from LRPHEXPT
V1
V2 ;
P15 ;from LROE1, LRPHEXPT
  • ICR #5588
    • Status: Active
    • Usage: Private
    P16 ;from LRPHITE1
    P17
    P18
    LRSN ;
    LEFT
    E1 ;
    MULT ;
    E2 ;

    External References

    Name Field # of Occurrence
    ^BLREVTQ P15A+5
    YN^DICN V1+1
    EN^LA7ADL P15+33
    NEW^LR7OB1 P15+29
    $$VER^LR7OU1 P15A+1
    FNDLOC^LRDRAW V1
    END^LRPHITE1 V1, V1+1, V2+2, V2+9, V2+11, E1+1
    OUT^LRPHITE2 P18+1
    EXCEPT^LRPHITE3 V2+6
    FX2^LRTSTOUT P17+4
    OR^LRWLST P15A+1
    PT^LRX P15+7
    $$NOW^XLFDT LRPHITEM+7, P15+11

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"All locations"
    • Line Location: V1+1
    Function Call: WRITE
    • Prompt: !,"Location ",LRLLOC," not found on collection list.",$C(7)
    • Line Location: V1+2
    Function Call: WRITE
    • Prompt: !!,$C(7),"Enter Order Numbers NOT collected: "
    • Line Location: V2+2
    Function Call: WRITE
    • Prompt: !,"Exceptions first."
    • Line Location: V2+4
    Function Call: WRITE
    • Prompt: !!,"Enter Order Numbers COLLECTED: "
    • Line Location: V2+9
    Function Call: WRITE
    • Prompt: !!,"DID NOT FIND THESE ORDERS:"
    • Line Location: LEFT+0
    Function Call: WRITE
    • Prompt: $J(LROR(I),10)
    • Line Location: LEFT+0
    Function Call: WRITE
    • Prompt: !
    • Condition for execution: $X>69
    • Line Location: LEFT+0
    Function Call: WRITE
    • Prompt: !,LRLLOC," ",LRSTORE(1)
    • Line Location: E2+10
    Function Call: WRITE
    • Prompt: !?5,"Accession Information Corrupt for this Order",!!
    • Line Location: P16+6
    Function Call: WRITE
    • Prompt: !,$C(7),"CAN'T DO IT. The data has been verified for accession ",$P(^(0),U,6)
    • Line Location: P16+7
    Function Call: WRITE
    • Prompt: !,"REASON FOR NON-DRAW ON ORDER ",LROR(LROR)
    • Line Location: P17+0
    Function Call: WRITE
    • Prompt: " ",$G(LRCCOM)
    • Line Location: P17+1
    Function Call: WRITE
    • Prompt: !?5,"You must enter a reason.",!
    • Line Location: P17+3
    Function Call: READ
    • Timeout: DTIME
    • Variable: X
    • Line Location: LP1+3
    Function Call: WRITE
    • Prompt: !
    • Line Location: LP1+3
    Function Call: WRITE
    • Prompt: !,"Enter a string of numbers separated with A ',' UP TO 80 CHARACTERS LONG ",!
    • Line Location: LP1+3
    Function Call: WRITE
    • Prompt: !
    • Line Location: LP1+4
    Function Call: WRITE
    • Prompt: !
    • Condition for execution: $X>70
    • Line Location: TEXT+0
    Function Call: WRITE
    • Prompt: +LRSN,$S(Y:" OK, ",1:" NOT ON LIST, ")
    • Line Location: TEXT+0

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^LR - [#63] P16+6, P16+7
    ^LRO(68 - [#68] P15+22, P15+23*, P15+24*, P15A+2, P15A+11, P16+3, P16+4, P16+5, P18+1
    ^LRO(69 - [#69] V2+10, E2+6, E2+7, P15+3, P15+14*, P15+16*, P15+18, P15+19, P15+20, P15A+1*
    , P15A+3*, P16+2, SKP*, P18*, LP1+5, LP1+7, SINGLE+8*, SINGLE+9, SINGLE+10*, SINGLE+11*
    , POLY+3, POLY+4, POLY+5*, POLY+6*, MULT+2, LRSN+6, LRSN+7, LRSN+9, LRSN+10
    ^LRO(69.1 - [#69.1] V1+2

    Label References

    Name Line Occurrences
    E1 V2+10
    E2 V2+10, E1+1
    LEFT V2+11, E1+1
    LP1 V2+2, V2+9, LP1+3, 198+2
    LRSN MULT+2
    P15 E2+9
    P15A P15+21
    P17 SKP
    P18 P17
    SINGLE LRSN+12
    TEXT LP1+6, LP1+7
    V1 V1+1, V1+2

    Naked Globals

    Name Field # of Occurrence
    ^( P15A+3
    ^(0 P15+3, P16+4, P16+7, SINGLE+9, POLY+4
    ^(1 P15+3, P15A+3*, SKP*
    ^(3 P16+5

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % V1+1*
    >> BLRLOG P15A+5
    >> BLROPT LRPHITEM+5*, P15A+5
    >> BLROPT(0 LRPHITEM+5*
    CONTROL P15+27~, P15+28*, P15+29
    DIE POLY+7!
    DT LRPHITEM+7, SINGLE+11, POLY+6
    DTIME LP1+3
    DUZ P15+14, SKP
    DUZ(2 P15A+3
    >> I LEFT*, LP1+4*
    >> J1 P15+3*
    >> LRAA P15+17*, P15+20*, P15+22, P15+23, P15+24, P15A+1, P15A+2, P15A+5, P15A+11, P16+3
    , P16+4, P16+5, P18+1
    >> LRAD P15+17*, P15+20*, P15+22, P15+23, P15+24, P15A+2, P15A+5, P15A+11, P16+4, P16+5
    , P18+1
    >> LRAN P15+17*, P15+20*, P15+22, P15+23, P15+24, P15A+2, P15A+5, P15A+11, P16+4, P16+5
    , P18+1
    >> LRBATCH SKP
    LRCCOM P17+1, P17+4~, LP1+2!, SINGLE+6, SINGLE+10, SINGLE+12!, POLY+5, POLY+8
    LRCCOM1 P17+4~, SINGLE+10, POLY+5
    LRCCOMX P17+4~
    LRCOM V2+1!, V2+8!, SINGLE+12!, POLY+9!
    LRCOM( SKP+1, 198+1*
    LRCOM(999 SKP+1
    LRCOM0 LP1+2!, POLY+8*
    >> LRDFN P15+4*, P16+4*, P16+6, P16+7
    LRDPF P15+4!, P15+26, P15A+1, P16+4*
    >> LRDTM P16+5*
    >> LREND P17+3*, P17+5
    LREPISOD P17+2!, SINGLE+2, SINGLE+3*, POLY+7!
    >> LRFIRST V2+2*
    >> LRFORD LP1+2*, 198+1
    >> LRIDT P16+5*, P16+6, P16+7
    LRITN SINGLE+5*, SINGLE+9, SINGLE+10, SINGLE+11, POLY+3*, POLY+4, POLY+5, POLY+6, LRSN+11~*
    >> LRIX SINGLE+5
    LRLLOC V1, V1+1, V1+2, V2+5~, V2+10*, E2+7, E2+10, P15+16, LP1+7
    LRNOCOM V2+1!, V2+9*
    >> LRNOP P16+6*, P16+7*
    >> LRNT LRPHITEM+7*, P15+11*, P15+16, P15+23, P15+24, P15A+3
    LRODT LRPHITEM+7*, V2+5~, V2+10, E2+6, E2+7, P15+3, P15+14, P15+16, P15+18, P15+19
    , P15+20, P15+29, P15A+1, P15A+3, P15A+5, P16+2, SKP, P18, LP1+5, LP1+7
    , SINGLE+8, SINGLE+9, SINGLE+10, SINGLE+11, POLY+3, POLY+4, POLY+5, POLY+6, MULT+2, LRSN+6
    , LRSN+7, LRSN+9, LRSN+10
    >> LROLLOC P15+8*
    LROR V2+1!, V2+2*, V2+4*, V2+6*, V2+8!, V2+9*, E2+2*, E2+3*, E2+4, E2+12
    , SKP+1, P17, LP1+2, LP1+7*
    LROR( V2+6, LEFT, E2+3, E2+4, E2+12!, P17, LP1+7*
    LROR(0 V2+4, LEFT
    LRORIFN P15+1~, P15+10*, P15+20*, P15+28, P15A+1
    LRRB P15+6~, P15A+3*
    >> LRRND SKP+1*, P17, P17+3, P17+4*, P18, SINGLE+6*, SINGLE+8
    LRSAMP P17+3*, 198+1*, SINGLE+12!, POLY+9!
    LRSN V2+1!, V2+8!, E2+5*, E2+6*, E2+7, P15+3, P15+14, P15+16, P15+18, P15+19
    , P15+20, P15+29, P15A+1, P15A+3, P15A+5, P16+2, SKP, P18, LP1+4*, LP1+5
    , LP1+7, TEXT, SINGLE+4*, SINGLE+7, SINGLE+8, SINGLE+9, SINGLE+10, SINGLE+11, POLY+3, POLY+4
    , POLY+5, POLY+6, MULT+2
    >> LRSN0 LP1+6*, SINGLE+4, MULT+1*, MULT+2*, LRSN+6, LRSN+7, LRSN+9, LRSN+10
    LRSPEC P17+3*, 198+1*, SINGLE+12!, POLY+9!
    >> LRSS P16+3*, P16+6, P16+7
    LRSTORE E2+1~, E2+8*, E2+11, P15A+7*
    LRSTORE(1 E2+4*, E2+6, E2+10
    LRTCOM V2+1!, V2+8!
    LRTIC POLY+1~, POLY+2*, POLY+3*, LRSN+8*, LRSN+9*, LRSN+10
    >> LRTN P15+17*, P15+18*, P15+19, P15+20, P15A+1
    >> LRTREA P15+9*
    LRTT3 LRSN+4~, LRSN+5*, LRSN+6*, LRSN+7, LRSN+9, LRSN+10, LRSN+11
    LRUIDA P15+1~
    LRUIDA( P15+33, P15A+12*
    >> LRWD LP1+7*
    LRX P15+31~, P15+32*, P15+33*
    LRX712 P15+1~, P15+3*, P15+4, P15+8, P15+10
    U LRPHITEM+5, P15+3, P15+8, P15+10, P15+14, P15+16, P15+20, P15+23, P15A+1, P15A+3
    , P15A+11, P16+4, P16+5, P16+7, SKP, P18, LP1+7, SINGLE+8, SINGLE+9, SINGLE+11
    , POLY+4, POLY+6, LRSN+7
    >> VAIN(3 P15+9
    X V2+2, V2+9, P15+20*, P15A+10~, P15A+11*, P15A+12, P16+1~, SKP+1*, LP1+3*, LP1+4
    , SINGLE+1~, SINGLE+9*, SINGLE+10*, SINGLE+11, POLY+4*, POLY+5*, POLY+6
    X(1 SINGLE+9*, SINGLE+10*, SINGLE+11, POLY+4*, POLY+5*, POLY+6
    >> XQY0 LRPHITEM+5
    >> Y LP1+6*, LP1+7*, TEXT*
    Y1 LP1+1~, LP1+5*, LP1+6, LP1+7
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All