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

Package: Outpatient Pharmacy

Routine: PSOSUPRX


Information

PSOSUPRX ;BIR/RTR - Suspense pull early ;3/1/96

Source Information

Source file <PSOSUPRX.m>

Call Graph

Call Graph Total: 22

Package Total Call Graph
Outpatient Pharmacy 15 ^PSOBING1  ($$LSTRFL,ECMESND)^PSOBPSU1  CAN^PSOCAN  ICN^PSODPT  EN^PSOHLUP  ^PSOLSET  ^PSOPRF  $$TRIC^PSOREJP1  
$$HDLG^PSOREJU1  $$FIND^PSOREJUT  Q^PSORXL  (,CKDIV,MAIL,PSOINST,RESET)^PSOSUPAT  GETMW^PSOSUPOE  EX^PSOSUTL  NEXT^PSOUTIL  
VA Fileman 5 NOW^%DTC  ^DIC  ^DIE  ^DIK  ^DIR  
Pharmacy Data Management 1 (PSOL,PSOUL)^PSSLOCK  
Registration 1 DEM^VADPT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Outpatient Pharmacy 2 PSO PNDRX  PSOSUPAT  

Entry Points

Name Comments DBIA/ICR reference
UNLK ;Unlock prescription
PRF
LIST
BEG
DEAD
ST
QUES
LU
EXIT
CHKDEAD
NEXT
WIND ;

External References

Name Field # of Occurrence
NOW^%DTC LU
^DIC LU+4, LIST
^DIE BEG+1, QUES+3, NEXT+1
^DIK BEG+1
^DIR ST+3, LU+3, LU+6, QUES, QUES+4
^PSOBING1 BEG+16
$$LSTRFL^PSOBPSU1 QUES+10
ECMESND^PSOBPSU1 QUES+11
CAN^PSOCAN DEAD
ICN^PSODPT BEG+4
EN^PSOHLUP LU+10
^PSOLSET ST
^PSOPRF PRF
$$TRIC^PSOREJP1 QUES+12
$$HDLG^PSOREJU1 QUES+13
$$FIND^PSOREJUT QUES+13
Q^PSORXL BEG+8
^PSOSUPAT ST+3
CKDIV^PSOSUPAT LU+11
MAIL^PSOSUPAT QUES+2
PSOINST^PSOSUPAT LU+3
RESET^PSOSUPAT LU+12
GETMW^PSOSUPOE QUES+1
EX^PSOSUTL BEG+2
NEXT^PSOUTIL NEXT
PSOL^PSSLOCK LU+6
PSOUL^PSSLOCK UNLK+2
DEM^VADPT CHKDEAD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: ST+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LU+2
Function Call: WRITE
  • Prompt: !
  • Line Location: LU+4
Function Call: WRITE
  • Prompt: !
  • Line Location: LU+4
Function Call: WRITE
  • Prompt: !,$P($G(PSOMSG),"^",2),!
  • Line Location: LU+7
Function Call: WRITE
  • Prompt: !?10,"PATIENT UNKNOWN"
  • Line Location: CHKDEAD+0
Function Call: WRITE
  • Prompt: !,">>> Rx #",$P(^PSRX(+$P(^(0),"^"),0),"^")," ALREADY PRINTED FROM SUSPENSE.",!,?5,"USE THE REPRINT OPTION TO REPRINT LABEL.",!
  • Line Location: BEG+0
Function Call: WRITE
  • Prompt: !,"Rx # "_$P(^PSRX(RXREC,0),"^")_" has expired!"
  • Line Location: BEG+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: BEG+1
Function Call: WRITE
  • Prompt: !!,"LABEL QUEUED TO PRINT",!
  • Line Location: BEG+9
Function Call: WRITE
  • Prompt: !
  • Line Location: QUES+0
Function Call: WRITE
  • Prompt: !!?5,"Nothing pulled from suspense!",!
  • Line Location: QUES+0
Function Call: WRITE
  • Prompt: $C(7),!!?5,"Nothing pulled from suspense!",!
  • Line Location: QUES+4
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+0
Routine Call
  • DIE
  • Line Location:
    • BEG+1
    • QUES+3
    • NEXT+1
Routine Call
  • DIC
  • Line Location:
    • LU+4
    • LIST
Routine Call
  • DIR
  • Line Location:
    • ST+3
    • LU+3
    • LU+6
    • QUES
    • QUES+4

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.5 - [#52.5] LU+11, CHKDEAD+2, BEG, BEG+3, BEG+5, BEG+6, BEG+7, QUES+1, QUES+2*, PRF
^PS(55 - [#55] LU+10, CHKDEAD+2
^PSRX - [#52] LU+4, BEG, BEG+1, BEG+4, QUES+1, QUES+3, PRF, WIND+4, WIND+5, WIND+6
, WIND+7, WIND+8

Label References

Name Line Occurrences
BEG LU+12
CHKDEAD LU+12
DEAD CHKDEAD+2
EXIT ST+3
LU LU+3, LU+4, LU+6, LU+11, LU+12
PRF BEG+10
QUES BEG+7
ST ST, LU+3, LU+4
UNLK LU+11, LU+12
WIND BEG+8

Naked Globals

Name Field # of Occurrence
^("STA" BEG+1
^(0 CHKDEAD+2, BEG, BEG+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LU
ASKED EXIT!
BBRX ST+1~, LU+1!, BEG+16!
BBRX(1 BEG+15*
BINGRTE BEG+16!, WIND+2*, WIND+4, WIND+5*, WIND+7*, WIND+8*
CBD EXIT!
CNT EXIT!
COM EXIT!, DEAD*
DA EXIT!, CHKDEAD+2*, DEAD*, BEG+1*!, BEG+6*, QUES+3*, NEXT+1*
DEAD LU+12, EXIT!, CHKDEAD*, CHKDEAD+1*, DEAD*
DEL EXIT!
DFN EXIT!, CHKDEAD*, CHKDEAD+2, PRF*
DIC LU+4!*, LIST*!
DIC("S" LU+5*, LIST*
DIC(0 LU+4*, LIST*
DIE BEG+1*!, QUES+3*, NEXT+1*!
DIK BEG+1*!
DIR ST+3!, LU+3!, LU+6!, QUES!, QUES+4!
DIR("?" ST+2*, LU+2*, QUES+5*, QUES+6*
DIR("??" LU+2*
DIR("A" ST+1*, LU+2*, LU+6*, QUES*, QUES+4*
DIR("B" QUES*, QUES+4*
DIR(0 ST+1*, LU+2*, LU+6*, QUES*, QUES+4*
DIRUT ST+3, LU+3, EXIT!
>> DISGROUP BEG+16
DR EXIT!, BEG+1*, QUES+3*, NEXT+1*
DT BEG+1
DTOUT LU+4, EXIT!, QUES, QUES+3, LIST, NEXT+1
DUOUT LU+4, EXIT!, NEXT+1
DUZ CHKDEAD+2, BEG
HDSFN EXIT!, BEG+6*, QUES+7*
HOLD DEAD*!
HOLDDFN EXIT!, PRF*!
JJ EXIT!
JJJJ WIND+1~, WIND+4*
MW LU+2*, EXIT!, QUES*, QUES+2
NEXT NEXT*, NEXT+1, NEXT+2!
OLD EXIT!
OUT LU+3*, EXIT!
PDUZ EXIT!, CHKDEAD+2*, BEG*
>> POP LU+3*
PPL EXIT+1!, BEG+6*, BEG+8*, BEG+13*, BEG+15, WIND+3, WIND+4
PRF LU+2!, EXIT+1!
PRF( PRF*
PSDDDATE LU+12, EXIT+2!, CHKDEAD+2*, DEAD
PSDNAME LU+12, EXIT+2!, CHKDEAD*
PSINTRX WIND+1~, WIND+4*, WIND+5, WIND+6, WIND+7, WIND+8
>> PSLION ST+1*
>> PSOCLC CHKDEAD+2*
PSODBQ EXIT+1!, BEG+8*
PSODELE LU+12!, EXIT!, QUES+4*!
PSODFN EXIT!, CHKDEAD*
>> PSODIV LU+11
PSOE LU+2!, BEG+1*, BEG+3!
PSOGET EXIT!, QUES+1*
PSOGETF EXIT!, QUES+1
PSOGETFN EXIT!, QUES+1
>> PSOLAP ST+1
PSOLOUD LU+10*!
PSOMSG LU+6!, LU+7, LU+9!
PSONOPRT BEG+8*, BEG+12!
>> PSOPAR ST, QUES+3, PRF
PSOPLLRX ST~, LU+6*!, UNLK+1, UNLK+2, UNLK+3!
PSOPRFLG LU+11!, EXIT+2!, BEG+11*
PSOPROFL LU+2!, EXIT+1!, BEG+11, PRF*
PSOPSO WIND+1~, WIND+6*, WIND+7, WIND+8
PSOPULL LU+12!, EXIT+1!, BEG+8*
PSOQFLAG ST+1*, LU+12!, EXIT+1!, BEG+7, BEG+9, BEG+10*, BEG+16, QUES*, QUES+2, QUES+3*
, QUES+4*, QUES+13*
PSOSAV LU+11*!
PSOSAVO LU+11*!
>> PSOSITE LU+11
PSOSPEC LU+12!, EXIT+1!, BEG*, QUES+4
PSOSPINT LU+4!, LU+5*
PSOTRIC QUES+12~*, QUES+13
PSOWIN LU+2!, EXIT+1!, QUES+3*
PSOWINEN LU+2!, EXIT+1!, QUES+3*
PSOX NEXT, NEXT+2!
PSOX("IRXN" NEXT*
PSOX("RX3" NEXT
PSPOP LU+11*, EXIT+1!
REA DEAD*!
RF EXIT+1!
RFCNT EXIT+1!
RFL QUES+10~*, QUES+11, QUES+12, QUES+13
RRT WIND+1~, WIND+3*, WIND+4
RRTT WIND+1~, WIND+3*
RTE LU+2!, EXIT+1!, QUES*
RTETEST WIND+1~, WIND+5*, WIND+7*, WIND+8*
RX EXIT+1!, BEG+9!, NEXT, NEXT+1
RXFL LU+1!, EXIT+1!
RXFL( BEG+5*, QUES+10
RXLTOP EXIT!, BEG+8*
RXP LU+1!
RXP1 LU+2!, EXIT+1!, BEG+6*, BEG+12!, PRF
RXPR LU+1!, LU+2!, EXIT+1!, BEG+12!
RXPR( BEG+6*, WIND+5
RXREC LU+4*, LU+6, EXIT+1!, CHKDEAD+2*, DEAD, BEG+1, BEG+4, BEG+5, BEG+6, BEG+7
, BEG+8, BEG+13, QUES+1, QUES+3, QUES+10, QUES+11, QUES+12, QUES+13, PRF
RXRP LU+1!, EXIT+2!
RXRP( BEG+7*
RXRR LU+1!, EXIT!
RXRR( QUES+1*
SA ST+3*, EXIT+1!
SFN LU+4*, LU+11, EXIT+1!, BEG, BEG+1, BEG+3, BEG+5, BEG+6, BEG+7, QUES+1
, QUES+2, QUES+7, PRF
SSSS WIND+1~, WIND+6*
STOP EXIT+1!
SUSPT ST+1*, EXIT+1!
SUSROUTE ST+1~, LU+1!, BEG+15, QUES+2*
TM LU*, EXIT!
TM1 LU*, EXIT!
VADM EXIT+1!
VADM(1 CHKDEAD
VADM(6 CHKDEAD+1, CHKDEAD+2
X LU+4*, LU+5, LU+6!, EXIT+2!, LIST*
XXXX WIND+1~, WIND+3*
Y ST+3, LU+3, LU+4*!, LU+6!, LU+11*, EXIT+2!, QUES, QUES+3, QUES+4, LIST
Y(0 LU+4, LU+10, LU+11*, CHKDEAD
Z EXIT+2!
ZTSK EXIT+1!
ZZZZ EXIT+2!, CHKDEAD+2*
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