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

Package: Outpatient Pharmacy

Routine: PSOSUPOE


Information

PSOSUPOE ;BIR/RTR - Suspense pull via Listman ;3/1/96

Source Information

Source file <PSOSUPOE.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Outpatient Pharmacy 7 ($$LSTRFL,ECMESND)^PSOBPSU1  $$STATUS^PSOBPSUT  $$TRIC^PSOREJP1  $$HDLG^PSOREJU1  $$FIND^PSOREJUT  MAILS^PSOSUPAT  EX^PSOSUTL  
VA Fileman 4 ^DIE  ^DIK  $$GET1^DIQ  ^DIR  
Pharmacy Data Management 1 (PSOL,PSOUL)^PSSLOCK  
Registration 1 FULL^VALM1  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Outpatient Pharmacy 4 PSORX1  PSORXL  PSOSUPRX  PSOTPRX1  

Entry Points

Name Comments DBIA/ICR reference
RESET ;
PPLADD ;
END
SELONE ;Pull one Rx through Listman
EHOLD ;
BBADD ;
BEG ;
CKDIV ;
ULRX ;
GETMW ;
ADD ;Add Rx to SPSORX array
TRIC(PSOTRX) ;
WIND ;
SEL
SELQ
DIR ;
BEGQ

External References

Name Field # of Occurrence
^DIE BEGQ+5, RESET+9, RESET+10
^DIK BEGQ+5
$$GET1^DIQ SELONE+8, EHOLD+2, EHOLD+4
^DIR SEL+2, SELQ+1, SELQ+2, SELQ+3, DIR+1, CKDIV+2, EHOLD+7
$$LSTRFL^PSOBPSU1 BEGQ+19, TRIC+1
ECMESND^PSOBPSU1 BEGQ+20
$$STATUS^PSOBPSUT TRIC+3
$$TRIC^PSOREJP1 TRIC+2
$$HDLG^PSOREJU1 BEGQ+22
$$FIND^PSOREJUT BEGQ+21
MAILS^PSOSUPAT BEGQ+14
EX^PSOSUTL BEGQ+6
PSOL^PSSLOCK BEGQ+1
PSOUL^PSSLOCK ULRX+2
FULL^VALM1 SELQ, EHOLD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Rx# ",$P(^PSRX(RXREC,0),"^")," is not on Suspense!"
  • Line Location: BEGQ+2
Function Call: WRITE
  • Prompt: !,">>> Rx #",$P(^PSRX(+$P(^(0),"^"),0),"^")," ALREADY PRINTED FROM SUSPENSE.",!,?5,"USE THE REPRINT OPTION TO REPRINT LABEL."
  • Line Location: BEGQ+4
Function Call: WRITE
  • Prompt: !,"Rx # "_$P(^PSRX(RXREC,0),"^")_" has expired!"
  • Line Location: BEGQ+5
Function Call: WRITE
  • Prompt: !!,"A reprint has already been requested for Rx # ",$P($G(^PSRX(RXREC,0)),"^")
  • Line Location: BEGQ+7
Function Call: WRITE
  • Prompt: !!,"A partial has already been requested for Rx # ",$P($G(^PSRX(RXREC,0)),"^")
  • Line Location: BEGQ+8
Function Call: WRITE
  • Prompt: !
  • Line Location: DIR+1
Function Call: WRITE
  • Prompt: !!?10,"Rx # ",$P(^PSRX(RXREC,0),"^")," is not a valid choice (Different Division)"
  • Line Location: CKDIV+1
Function Call: WRITE
  • Prompt: $C(7),$C(7)
  • Line Location: SELONE+1
Function Call: WRITE
  • Prompt: !,"This is an ePharmacy billable fill which is Suspended until "_$$GET1^DIQ(52.5,ESIEN,10)_", based"
  • Line Location: EHOLD+4
Function Call: WRITE
  • Prompt: !,"on the 3/4 Days rule.",!
  • Line Location: EHOLD+5
Routine Call
  • DIE
  • Line Location:
    • BEGQ+5
    • RESET+9
    • RESET+10
Routine Call
  • DIR
  • Line Location:
    • SEL+2
    • SELQ+1
    • SELQ+2
    • SELQ+3
    • DIR+1
    • CKDIV+2
    • EHOLD+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] Classic Fileman Calls,  GET1^DIQ
^PS(52.5 - [#52.5] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.5 - [#52.5] BEGQ+3, BEGQ+4, BEGQ+9, BEGQ+10, BEGQ+11, BEGQ+12, BEGQ+14*, PPLADD+4, PPLADD+6, SELONE+7
, RESET+3, RESET+4, RESET+6*, GETMW+3
^PSRX - [#52] BEGQ, BEGQ+1, BEGQ+2, BEGQ+4, BEGQ+5, BEGQ+7, BEGQ+8, BEGQ+12, BEGQ+14*, WIND+3
, WIND+4, WIND+5, WIND+6, CKDIV+1, CKDIV+2, SELONE+5, SELONE+10, SELONE+12, RESET+8*, RESET+11*
, GETMW+4, GETMW+5, GETMW+6, GETMW+7

Label References

Name Line Occurrences
BEG SELQ+7
BEGQ SELONE+12
CKDIV BEGQ+9
DIR BEGQ+1, BEGQ+2, BEGQ+3, BEGQ+4, BEGQ+5, BEGQ+7, BEGQ+8, BEGQ+9
EHOLD SELONE+8
END SELQ+1, SELQ+2, SELQ+3
GETMW BEGQ+12
SELQ SELONE+10
TRIC PPLADD+7
ULRX BEGQ+2, BEGQ+3, BEGQ+4, BEGQ+5, BEGQ+7, BEGQ+8, BEGQ+9, BEGQ+24

Naked Globals

Name Field # of Occurrence
^("STA" BEGQ+5
^(0 BEGQ+4, BEGQ+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AAA BEGQ+6~
ACTION BEGQ+19~, BEGQ+22*
>> BBRX( BBADD+3, BBADD+4*, BBADD+5*
>> BBRX(1 BBADD+2*
DA BEGQ+5*!, RESET+1~, RESET+9*, RESET+10*
DA(1 RESET+9*
DIE BEGQ+5*!, RESET+9*!, RESET+10*!
DIK BEGQ+5*!
DIR SEL+2!, SELQ+1!, SELQ+2!, SELQ+3!, DIR+1!, CKDIV+2!, EHOLD+6!, EHOLD+7!
DIR("?" SELQ+4*, SELQ+5*
DIR("A" SEL+2*, SELQ+1*, SELQ+2*, SELQ+3*, DIR+1*, CKDIV+2*, EHOLD+6*
DIR("B" SELQ+1*, SELQ+3*, CKDIV+2*
DIR(0 SEL+2*, SELQ+1*, SELQ+2*, SELQ+3*, DIR+1*, CKDIV+2*, EHOLD+6*
>> DIRUT CKDIV+2, EHOLD+7
>> DR BEGQ+5*, RESET+9*, RESET+10*
DT BEGQ+5
DTOUT SEL+2!, SELQ+1, SELQ+2
DUOUT SEL+2!, SELQ+1, SELQ+2
DUZ BEGQ+4
EACTION TRIC+4*, PPLADD+1~, PPLADD+8
EHOLDQ SELONE+7~, SELONE+8, SELONE+9!, EHOLD+6*, EHOLD+7*
ERXIEN SELONE+7~*, SELONE+9!, EHOLD+1, EHOLD+2
ESIEN SELONE+7~*, SELONE+8, SELONE+9!, EHOLD+4
ESTAT TRIC+3*, TRIC+4, PPLADD+1~
GETCNT GETMW+1~, GETMW+6*
GETPAR GETMW+1~, GETMW+3*, GETMW+4
GETRX GETMW+1~, GETMW+6*, GETMW+7
JJJJ WIND+1~
LSFN PPLADD+1~, PPLADD+4*, PPLADD+5, PPLADD+6
MW SEL+1~, BEGQ+14*, SELONE+2~
ORD SEL+1~, SELONE+2~
ORN SEL+1~, SELONE+4, SELONE+5, SELONE+6, SELONE+7, SELONE+10, SELONE+11
>> PBINGRTE WIND+2*, WIND+3*, WIND+5*, WIND+6*
PDUZ SEL+1~, BEGQ+4*, SELONE+2~
>> PPL PPLADD+2*, PPLADD+9*, PPLADD+10*
PSCOU BEGQ+6~
PSINTRX WIND+1~, WIND+2*, WIND+3, WIND+4, WIND+5, WIND+6
PSLST SEL+1~, SEL+3*, SELQ+7, SELONE+2~
>> PSOBEDT SELONE+1
>> PSOCNT SEL, SEL+2
>> PSODFN BEGQ+11
>> PSODIV BEGQ+9
PSOEXPI BEGQ+6~
PSOGET SEL+1~, BEGQ+12*, BEGQ+13, BEGQ+24!, GETMW+4*, GETMW+5*, GETMW+7*
PSOGETF SEL+1~, BEGQ+13, BEGQ+24!, GETMW+2*, GETMW+4*, GETMW+7*
PSOGETFN SEL+1~, BEGQ+13, GETMW+2*, GETMW+4*, GETMW+7*
>> PSOLST( SELQ+7, BEG+1, SELONE+4, SELONE+5, SELONE+6, SELONE+7, SELONE+10, SELONE+11
PSOMSG BEGQ+1!, BEGQ+2!
>> PSOPAR SELQ+2
PSOPRT BEGQ+6~
PSOPSO WIND+1~, WIND+4*, WIND+5, WIND+6
>> PSORX("PSOL" PPLADD+11*, PPLADD+12, PPLADD+13*, PPLADD+14*
>> PSOSITE BEGQ+9
PSOSQ SEL+1~, SELQ+9, BEGQ+15*, SELONE+2~, SELONE+12
PSOSQMTH SEL+1~, SELQ+2*, BEGQ+14, SELONE+2~
PSOSQRTE SEL+1~, SELQ+2*, BEGQ+14, SELONE+2~
>> PSOSYS CKDIV+1, CKDIV+2
PSOTRF TRIC+1*, TRIC+2, TRIC+3, PPLADD+1~
PSOTRIC TRIC+2*, TRIC+4, PPLADD+1~, PPLADD+8
PSOTRX TRIC~, TRIC+1, TRIC+2, TRIC+3, PPLADD+1~
PSOX1 SEL+1~, ADD+2*, BBADD+1~, BBADD+3*, SELONE+2~
PSOX2 SEL+1~, ADD+2*, ADD+3, ADD+4, BBADD+1~, BBADD+3*, BBADD+4, BBADD+5, SELONE+2~
PSPOP SEL+1~, BEGQ+9*, CKDIV+1*, CKDIV+2*, SELONE+2~
PULLONE SELQ+6, END*, SELONE+2~, SELONE+3*, SELONE+10
QQQ BEGQ+6~
RFCNT BEGQ+14~
RFL BEGQ+19~*, BEGQ+20, BEGQ+21, BEGQ+22
RR BEGQ+14~
RRT WIND+1~
RRTT WIND+1~
RSDA RESET+1~, RESET+2*, RESET+3, RESET+5, RESET+8, RESET+9, RESET+10, RESET+11
RTETEST WIND+1~, WIND+3*, WIND+5*, WIND+6*
RXFILL RESET+1~, RESET+5*, RESET+7, RESET+9, RESET+10
RXFILLN RESET+1~, RESET+5*, RESET+8, RESET+9
>> RXFL( BEGQ+11*, BEGQ+19
RXLTOP SEL+1~, BEGQ+11*, SELONE+2~
RXMP RESET+1~, RESET+5*, RESET+8, RESET+11
RXMW RESET+1~, RESET+5*, RESET+6
>> RXPR( BEGQ+8, BEGQ+10*, BEGQ+18, WIND+3
RXPSRX RESET+1~, RESET+5*, RESET+8, RESET+9, RESET+10
RXR RESET+1~
RXREC SEL+1~, BEG+1*, BEGQ, BEGQ+1, BEGQ+2, BEGQ+3, BEGQ+5, BEGQ+7, BEGQ+8, BEGQ+10
, BEGQ+11, BEGQ+12, BEGQ+13, BEGQ+14, BEGQ+18, BEGQ+19, BEGQ+20, BEGQ+21, BEGQ+22, WIND+2
, WIND+3, ADD+1, ADD+3, ADD+4, BBADD+2, BBADD+4, BBADD+5, CKDIV+1, CKDIV+2, SELONE+2~
, SELONE+11*, SELONE+12, GETMW+4, GETMW+5, GETMW+6, GETMW+7, ULRX+1, ULRX+2
>> RXRP( BEGQ+7, BEGQ+10*
>> RXRS( BEGQ+11*, BEGQ+12*, BEGQ+13*, PPLADD+3, SELONE+6, RESET+2, RESET+5
RXSP RESET+1~, RESET+3*, RESET+4, RESET+6
SFN SEL+1~, BEGQ+3*, BEGQ+4, BEGQ+5, BEGQ+9, BEGQ+10, BEGQ+11, BEGQ+12, BEGQ+14, SELONE+2~
, GETMW+3
SORD SEL+1~, SELQ+7*, SELONE+2~
SORN SEL+1~, SELQ+7*, BEG+1, SELONE+2~
>> SPSORX("PSOL" ADD+1*, ADD+2, ADD+3*, ADD+4*
SPSOX1 PPLADD+1~, PPLADD+12*
SPSOX2 PPLADD+1~, PPLADD+12*, PPLADD+13, PPLADD+14
SSSS WIND+1~, WIND+4*
SZZ PPLADD+1~, PPLADD+3*, PPLADD+4, PPLADD+7, PPLADD+9, PPLADD+10, PPLADD+11, PPLADD+13, PPLADD+14
>> VALMBCK SEL*, SEL+2*, SELQ+8*, END*, SELONE+1*, SELONE+4*, SELONE+5*, SELONE+6*, SELONE+13*, EHOLD+8*
VALMCNT SEL+1~, SELONE+2~
>> VALMSG SEL*, SEL+2*, SELQ+9*, END*, SELONE+1*, SELONE+5*, SELONE+6*, SELONE+10*, SELONE+12*, EHOLD+8*
VVV BEGQ+6~
XXXX WIND+1~
>> Y SEL+2, SEL+3, SELQ+1, SELQ+2, SELQ+3, CKDIV+2, EHOLD+7
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