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

Package: Pharmacy Data Management

Routine: PSSREMCH


Information

PSSREMCH ;BIR/RTR-Pre release Orderable Item report ;02/14/00

Source Information

Source file <PSSREMCH.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 1 ^%ZISC  
Pharmacy Data Management 1 (ADDRP,TEXT)^PSSUTLPR  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Pharmacy Data Management 2 PSSUTLPR  PSSUTLPZ  

Entry Points

Name Comments DBIA/ICR reference
END
SOLH ;
ADDHS ;
PDIR ;
SOL ;
SEND ;
ADDX ;
SOLHS ;
ADD ;
ADDH ;

External References

Name Field # of Occurrence
^%ZISC END+3
^DIR ADDH+2, ADDHS+1, SOLH+2, SOLH+3, SOLHS+1, PDIR+2
ADDRP^PSSUTLPR PSSREMCH+3
TEXT^PSSUTLPR PSSREMCH+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "("_$G(ADDIEN)_") "_$P(ZERO,"^")_$S($G(PSSADID)'="":" "_$G(PSSADID),1:"")_$G(PAD)_$G(OINAME)_" "_$G(OIDOSE)_$S($G(OIDATED)'="":" "_$G(OIDATED),1:"")_" "_$G(PSSIVID)
  • Line Location: ADD+23
Function Call: WRITE
  • Prompt: "("_$G(ADDIEN)_") "_$P(ZERO,"^")_$S($G(PSSADID)'="":" "_$G(PSSADID),1:"")_$G(PAD) W !,"=====> ",$G(OINAME)_" "_$G(OIDOSE)_$S($G(OIDATED)'="":" "_$G(OIDATED),1:"")_" "_$G(PSSIVID)
  • Line Location: ADD+24
Function Call: WRITE
  • Prompt: !?5,"cannot re-match, no Orderable Item for the Dispense Drug"
  • Line Location: ADD+25
Function Call: WRITE
  • Prompt: ?55,"(Additive link)"
  • Line Location: ADD+38
Function Call: WRITE
  • Prompt: "("_$G(SOLIEN)_") "_$G(SNAME)_$S($G(SDAT)'="":" "_$G(SDAT),1:"")_$G(PAD)_$G(SOINAME)_" "_$G(SOIDOSE)_$S($G(SDOID)'="":" "_$G(SDOID),1:"")_" "_$G(PSSIVID)
  • Line Location: SOL+20
Function Call: WRITE
  • Prompt: "("_$G(SOLIEN)_") "_$G(SNAME)_$S($G(SDAT)'="":" "_$G(SDAT),1:"")_$G(PAD) D:($Y+4)>IOSL SOLH Q:$G(PSSOUT) W !,"=====> ",$G(SOINAME)_" "_$G(SOIDOSE)_$S($G(SDOID)'="":" "_$G(SDOID),1:"")_" "_$G(PSSIVID)
  • Line Location: SOL+21
Function Call: WRITE
  • Prompt: !?5,"cannot rematch, no Item for the Dispense Drug"
  • Line Location: SOL+22
Function Call: WRITE
  • Prompt: ?59,"(Solution link)"
  • Line Location: SOL+34
Function Call: WRITE
  • Prompt: ?67,"(Solution)"
  • Line Location: SOL+44
Function Call: WRITE
  • Prompt: !
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ADDH+1
Function Call: WRITE
  • Prompt: !?5,"ADDITIVE REPORT (Additive Internal number in parenthesis)",?67,"PAGE: "_$G(PSSCOT)
  • Line Location: ADDH+1
Function Call: WRITE
  • Prompt: ?67,"PAGE: "_$G(PSSCOT)
  • Line Location: ADDH+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ADDHS+2
Function Call: WRITE
  • Prompt: !!?5,"ADDITIVE SUMMARY"
  • Line Location: ADDHS+2
Function Call: WRITE
  • Prompt: !!?5,"ADDITIVE SUMMARY"
  • Line Location: ADDHS+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SOLH+1
Function Call: WRITE
  • Prompt: !?5,"SOLUTION REPORT (Solution Internal number in parenthesis)",?67,"PAGE: "_$G(PSSCOT)
  • Line Location: SOLH+1
Function Call: WRITE
  • Prompt: ?67,"PAGE: "_$G(PSSCOT)
  • Line Location: SOLH+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SOLHS+2
Function Call: WRITE
  • Prompt: !!?5,"SOLUTION SUMMARY"
  • Line Location: SOLHS+2
Function Call: WRITE
  • Prompt: !!?5,"SOLUTION SUMMARY"
  • Line Location: SOLHS+2
Routine Call
  • DIR
  • Line Location:
    • ADDH+2
    • ADDHS+1
    • SOLH+2
    • SOLH+3
    • SOLHS+1
    • PDIR+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.606 - [#50.606] ADD+16, ADD+26, ADD+28, SOL+13, SOL+23, SOL+25
^PS(50.7 - [#50.7] ADD+16, ADD+17, ADD+26, ADD+28, ADD+29, ADD+45, SOL+13, SOL+14, SOL+23, SOL+25
, SOL+26, SOL+41
^PS(52.6 - [#52.6] ADD+10, ADD+11, ADD+12, ADD+13, ADD+48
^PS(52.7 - [#52.7] SOL+6, SOL+7, SOL+8, SOL+10, SOL+44
^PS(59.7 - [#59.7] ADD+4
^PSDRUG - [#50] ADD+25, ADD+36, ADD+38, ADD+53, ADD+54, SOL+22, SOL+32, SOL+34, SOL+49, SOL+50
^PSDRUG("ASP" ADD+34, ADD+51, SOL+30, SOL+47
^TMP($J ADD+8!, ADD+27*, ADD+42, ADD+43, ADD+46, ADDX+1!, SOL+1!, SOL+24*, SOL+38, SOL+39
, SOL+42, SEND+1!

Label References

Name Line Occurrences
ADDH ADD+9, ADD+21, ADD+35, ADD+44, ADD+47, ADD+52
ADDHS ADD+40
ADDX ADD+39, ADD+40
END ADDX+4
PDIR ADDX+3, SOL+51
SEND SOL+5, SOL+35, SOL+36
SOL ADD+5, ADDX+2
SOLH SOL+4, SOL+18, SOL+21, SOL+31, SOL+40, SOL+43, SOL+48
SOLHS SOL+36

Naked Globals

Name Field # of Occurrence
^("I" ADD+48, ADD+53, ADD+54, SOL+44, SOL+49, SOL+50
^(0 ADD+16, ADD+26, ADD+28, ADD+45, SOL+13, SOL+23, SOL+25, SOL+41, SOL+44
^(31 ADD+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AA ADD+7~, ADD+42*, ADD+43, ADD+45, ADD+46
AAZ ADD+1~, ADD+43*
AAZZ ADD+1~, ADD+43*, ADD+45, ADD+51
ADD ADD+7~, ADD+10*
ADDIEN ADD+7~, ADD+10*, ADD+11, ADD+12, ADD+13, ADD+18, ADD+23, ADD+24, ADD+27
ADDLT ADD+7~, ADD+18*, ADD+19, ADD+20
AOILT ADD+7~
COUNT ADD+7~
DIR ADDH+2!, ADDHS+1!, SOLH+2!, SOLH+3!, SOLHS+1!, PDIR+2!
DIR("A" ADDH+2*, ADDHS+1*, SOLH+2*, SOLH+3*, SOLHS+1*, PDIR+2*
DIR(0 ADDH+2*, ADDHS+1*, SOLH+2*, SOLH+3*, SOLHS+1*, PDIR+2*
IO ADD+2
IOF END+1, ADDH+1, ADDH+3, ADDHS+2, SOLH+1, SOLH+4, SOLHS+2
IOSL ADD+21, ADD+35, ADD+44, ADD+47, ADD+52, SOL+18, SOL+21, SOL+31, SOL+40, SOL+43
, SOL+48
IOST ADD+3
LEN ADD+7~, ADD+12*, ADD+14*, ADD+15, SOL+9*, SOL+11*, SOL+12
NEWOI ADD+7~, ADD+28*, ADD+32
NEWOIL ADD+7~
OI ADD+7~, ADD+25*, ADD+26, ADD+27, ADD+28, ADD+29, ADD+34
OIDATE ADD+7~, ADD+17*
OIDATED ADD+7~, ADD+17!*, ADD+19, ADD+23, ADD+24
OIDOSE ADD+7~, ADD+16*, ADD+23, ADD+24
OILT ADD+7~, ADD+16*, ADD+19
OINAME ADD+7~, ADD+16*, ADD+23, ADD+24
OIZD ADD+7~, ADD+29*
OIZDZ ADD+7~, ADD+29!*, ADD+32
PAA ADD+7~, ADD+34*, ADD+36, ADD+38
PAD ADD+7~, ADD+15!*, ADD+23, ADD+24, SOL+12!*, SOL+20, SOL+21
PDD ADD+7~, ADD+51*, ADD+53, ADD+54
>> PDOID SOL+16
PSINDAT ADD+7~, ADD+36*, ADD+37
PSINDATE ADD+7~, ADD+36!*, ADD+38
PSSAD ADD+7~
PSSADID ADD+7~, ADD+13!*, ADD+14, ADD+23, ADD+24
PSSADIN ADD+7~, ADD+13*
PSSADSUM ADD+2!, ADD+41*, END+2!, ADDH+3
PSSATMP ADD+1~, ADD+26*, ADD+27
PSSCOT ADD+3*, END+2!, ADDH+1*, ADDH+3*, ADDHS+2*, SOLH+1*, SOLH+2, SOLH+4*, SOLHS+2*
PSSCOTX SOL+1!, SOL+4*, END+2!, SOLH+1
PSSDV ADD+3*, END, END+2!, ADDH+2, ADDHS+1, SOLH+2, SOLH+3, SOLHS+1, PDIR+1
PSSIVID ADD+2!, ADD+4*, ADD+23, ADD+24, SOL+20, SOL+21, END+2!
PSSIVIDL ADD+2!, ADD+4*, ADD+19, SOL+16, END+2!
PSSOUT PSSREMCH+2*!, ADD+2*, ADD+10, ADD+21, ADD+34, ADD+35, ADD+39, ADD+40, ADD+42, ADD+44
, ADD+46, ADD+47, ADD+49, ADD+51, ADD+52, ADDX+2, ADDX+3, SOL+5, SOL+6, SOL+18
, SOL+21, SOL+30, SOL+31, SOL+35, SOL+36, SOL+38, SOL+40, SOL+42, SOL+43, SOL+45
, SOL+47, SOL+48, SOL+51, END+2!, ADDH+2*, ADDHS+1*, SOLH+1, SOLH+2*, SOLH+3*, SOLHS+1*
, PDIR+2*
PSSPADX ADD+7~, ADD+30*
PSSPADZ ADD+7~, ADD+20*, ADD+30
PSSPADZZ ADD+7~, ADD+30!*, ADD+31*, ADD+32
PSSSOLZ SOL+3~, SOL+17*, SOL+27
PSSSOSUM ADD+2!, SOL+37*, END+2!, SOLH+4
PSSSTMP ADD+1~, SOL+23*, SOL+24
PSSTOTAL ADD+2!, ADD+19*, ADD+23, ADD+24, SOL+16*, SOL+20, SOL+21, END+2!
PSSTYPE ADD+5, ADDX+2, END+2!
PSSWH ADD+6*, SOL+2*, END+2!
PSSYRX ADD+37, ADD+53, SOL+33, SOL+49, END+2!
PZZ ADD+7~, ADD+46*, ADD+48
SAA SOL+3~, SOL+30*, SOL+32, SOL+34
SDA SOL+3~, SOL+10*
SDAT SOL+3~, SOL+10!*, SOL+11, SOL+20, SOL+21
SDOI SOL+3~, SOL+14*
SDOID SOL+3~, SOL+14!*, SOL+20, SOL+21
SLDD SOL+3~, SOL+47*, SOL+49, SOL+50
SLID SOL+3~, SOL+32!*, SOL+34
SLIDD SOL+3~, SOL+32*, SOL+33
SLNEWOI SOL+3~, SOL+25*, SOL+28
SLOI SOL+3~, SOL+22*, SOL+23, SOL+24, SOL+25, SOL+26, SOL+30
SNAME SOL+3~, SOL+9*, SOL+20, SOL+21
SOIDOSE SOL+3~, SOL+13*, SOL+20, SOL+21
SOILT SOL+3~, SOL+13*, SOL+16
SOILTX SOL+3~
SOINAME SOL+3~, SOL+13*, SOL+20, SOL+21
SOIZD SOL+3~, SOL+26*
SOIZDZ SOL+3~, SOL+26!*, SOL+28
SOL SOL+3~, SOL+6*
SOLAA SOL+3~, SOL+38*, SOL+39, SOL+41, SOL+42
SOLIEN SOL+3~, SOL+6*, SOL+7, SOL+8, SOL+10, SOL+15, SOL+20, SOL+21, SOL+24
SOLLT SOL+3~, SOL+15*, SOL+16, SOL+17
SSZ ADD+1~, SOL+39*
SSZZ ADD+1~, SOL+39*, SOL+41, SOL+47
STOTAL SOL+3~
SZL SOL+3~, SOL+27!*, SOL+28
SZLA SOL+3~, SOL+27*
SZZ SOL+3~, SOL+42*, SOL+44
TOTAL ADD+7~
>> Y ADDH+2, ADDHS+1, SOLH+2, SOLH+3, SOLHS+1, PDIR+2
ZERO ADD+7~, ADD+12*, ADD+16, ADD+17, ADD+23, ADD+24, ADD+25, ADD+38, SOL+8*, SOL+9
, SOL+13, SOL+14, SOL+22, SOL+34
>> ZTQUEUED END+3
>> ZTREQ END+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All