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

Package: Outpatient Pharmacy

Routine: PSOORFI3


Information

PSOORFI3 ;BIR/RTR-finish CPRS orders by Clinic ; 4/26/11 2:05pm

Source Information

Source file <PSOORFI3.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Outpatient Pharmacy 9 $$CHK^PSODPT  ($$L,UL)^PSOERX1A  $$ERXIEN^PSOERXUT  LAN^PSOORED5  POST^PSOORFI1  (INSTNM,PROFILE)^PSOORFI2  ($$CHKFLTR,$$DIR)^PSOORFI6  (EX,KLL,KLLP,LBL,LK,LK1,ORD,QU,SDFN,SQR,ULP)^PSOORFIN  
OERR^PSORX1  
VA FileMan 4 NOW^%DTC  ^DIC  $$GET1^DIQ  ^DIR  
Kernel 1 $$DT^XLFDT  
Order Entry Results Reporting 1 UNLK1^ORX2  
Pharmacy Data Management 1 (PSOL,PSOUL)^PSSLOCK  
Registration 1 $$SITE^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Outpatient Pharmacy 3 PSOORFI4  PSOORFI6  PSOORFIN  

Entry Points

Name Comments DBIA/ICR reference
CLIN
SORT
START
EXIT
CHECK ; check Institution
EOP
L1 ;Lock single order
UL1 ;Unlock single order
DOSE ;pending orders
DOSE1
DU
DOSE2 ;displays pending order after edits
DOSE3
DO
FMD
SQR ;
SQN ;

External References

Name Field # of Occurrence
NOW^%DTC START+27
^DIC CLIN, SORT
$$GET1^DIQ START+8, START+9, L1+4
^DIR PSOORFI3+8, SORT+7, EOP, L1+6
UNLK1^ORX2 UL1+3
$$CHK^PSODPT START+18
$$L^PSOERX1A START+10
UL^PSOERX1A START+11
$$ERXIEN^PSOERXUT START+7
LAN^PSOORED5 FMD+5
POST^PSOORFI1 START+23
INSTNM^PSOORFI2 CLIN+1
PROFILE^PSOORFI2 START+22
$$CHKFLTR^PSOORFI6 START+21, START+28
$$DIR^PSOORFI6 START+3
EX^PSOORFIN EXIT
KLL^PSOORFIN START+22
KLLP^PSOORFIN START+22
LBL^PSOORFIN START+16, START+30
LK^PSOORFIN START+17
LK1^PSOORFIN START+29
ORD^PSOORFIN START+29
QU^PSOORFIN START+22
SDFN^PSOORFIN START+23
SQR^PSOORFIN SQR+1
ULP^PSOORFIN START+18, START+22, START+23, START+29
OERR^PSORX1 START+22
PSOL^PSSLOCK L1+6
PSOUL^PSSLOCK UL1+5
$$SITE^VASITE CHECK+7
$$DT^XLFDT CHECK+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PSOORFI3+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PSOORFI3+8
Function Call: WRITE
  • Prompt: !
  • Line Location: CLIN+0
Function Call: WRITE
  • Prompt: !!,"You are signed in under the "_$G(PSODINST)_" CPRS Ordering",!,"Institution, which does not match the Institution for this Clinic!",!
  • Line Location: CLIN+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SORT+0
Function Call: WRITE
  • Prompt: !!,"There are no Clinics associated with this Sort Group!",!
  • Line Location: SORT+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SORT+5
Function Call: WRITE
  • Prompt: !,"Orders for these Clinics in the Sort Group will not be displayed for Finishing",!,"because the CPRS Ordering Institution does not match the Institution that is",!,"associated with the Clinic:",!
  • Line Location: SORT+5
Function Call: WRITE
  • Prompt: !,$P($G(^SC(PSCLP,0)),"^")
  • Line Location: SORT+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SORT+7
Function Call: WRITE
  • Prompt: !!,"There are no Clinics that have a matching Institution!",!
  • Line Location: SORT+9
Function Call: WRITE
  • Prompt: !
  • Line Location: EOP+0
Routine Call
  • DIC
  • Line Location:
    • CLIN
    • SORT
Routine Call
  • DIR
  • Line Location:
    • PSOORFI3+8
    • SORT+7
    • EOP
    • L1+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SC - [#44] Classic Fileman Calls
^PS(52.49 - [#52.49] GET1^DIQ
^PS(59.7 - [#59.7] GET1^DIQ
^PS(59.8 - [#59.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] CHECK+5
^DPT - [#2] START+18, START+19
^PS(50.607 - [#50.607] DOSE+4, DOSE2+3
^PS(51.2 - [#51.2] DOSE+6, DOSE2+3
^PS(52.41 - [#52.41] START+4, START+5, START+13, START+14, START+15, START+25, START+26, UL1+2, DOSE+2
^PS(55 - [#55] DU, DOSE2+6, DO, FMD+5
^PS(59.8 - [#59.8] SORT+2
^SC - [#44] SORT+2, SORT+6, CHECK+2, CHECK+3, CHECK+4
^TMP("PSOPO" DOSE+9*, DOSE+10*, DOSE1*, DOSE1+1*, DU*, DU+2*, DU+3*, DU+4*, DU+5*, DU+6*
, DU+9*, DU+10*, DOSE2+6*, DOSE2+7*, DOSE2+8*, DOSE3*, DOSE3+1*, DO*, DO+1*, DO+2*
, DO+3*, DO+4*, DO+5*, DO+6*, DO+7*, FMD+2*, FMD+3*
^TMP($J PSOORFI3+4!, CLIN+2*, SORT+2!*, SORT+3!, SORT+4*!, SORT+5, SORT+6, SORT+8, SORT+9!, START+1
, START+4, EXIT!

Label References

Name Line Occurrences
CHECK CLIN+1, SORT+4
CLIN CLIN+1
DO DOSE3
DOSE1 DOSE+2
DOSE3 DOSE2+2
DU DOSE1
EOP SORT+8, SORT+9
EXIT PSOORFI3+8, CLIN, SORT, START+1
FMD DOSE1, DOSE1+1, DOSE3, DOSE3+1
SORT PSOORFI3+9, SORT+3, SORT+9
START CLIN+2

Naked Globals

Name Field # of Occurrence
^(0 START+13, CHECK+2
^(2 DOSE+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % START+27
COJ DOSE2+2!, DOSE2+4*, DOSE2+9!, DO+7
DIC CLIN!*, SORT!*
DIC("A" CLIN*, SORT*
DIC(0 CLIN*, SORT*
>> DILOCKTM L1+5*, L1+7*
DIR PSOORFI3+6!, PSOORFI3+8!, SORT+7!, START!, EOP!, L1+6!
DIR("?" PSOORFI3+6*, PSOORFI3+7*
DIR("A" PSOORFI3+6*, SORT+7*, EOP*, L1+6*
DIR("B" PSOORFI3+6*
DIR(0 PSOORFI3+6*, SORT+7*, EOP*, L1+6*
DOENT DOSE+1!, DOSE+8*, DOSE+11!
DOSE DOSE+2*, DOSE+3, DOSE+4, DOSE+5, DOSE+6, DOSE+7, DOSE+8, DOSE+11!, DU+7, DU+8
, DU+9, DU+10
DOSE1 DOSE+2*, DOSE+3, DOSE+11!
DS DOSE+1*, DOSE+10, DOSE1, DOSE2+1*, DOSE2+8, DOSE3, FMD+4!
DT CHECK+6*, CHECK+7
>> DTOUT PSOORFI3+8, CLIN, SORT
>> DUOUT PSOORFI3+8, CLIN, SORT
DUR DU+8*, DU+9, DOSE2+4*, DOSE2+9!, DO+6
EPATIEN START+3~, START+9*, START+10, START+11
EPATLCK START+3~, START+8, START+9*, START+12*
ERXIEN START+3~, START+7*, START+8, START+9
I DOSE+2*, DOSE+3, DOSE+5, DOSE+7, DOSE+8, DOSE+9, DOSE+11!, DU, DU+1, DU+2
, DU+3, DU+4, DU+6, DOSE2+2*, DOSE2+3, DOSE2+4, DOSE2+5, DOSE2+6, DOSE2+7, DOSE2+9!
, DO, DO+1, DO+2, DO+3, DO+5
>> IEN DOSE+9*, DOSE+10*, DOSE1, DOSE1+1*, DU*, DU+2*, DU+3*, DU+4*, DU+5*, DU+6*
, DU+9*, DU+10*, DOSE2+6*, DOSE2+7*, DOSE2+8*, DOSE3, DOSE3+1*, DO*, DO+1*, DO+2*
, DO+3*, DO+4*, DO+5*, DO+6*, DO+7*, FMD+2*, FMD+3*
>> II FMD, FMD+1, FMD+5
IOF SORT+5, SORT+7
IOSL SORT+6
MAXRF SQN+1!
MBMSITE L1+2~, L1+4*, L1+5, L1+7
MEDA START!, START+22
MEDP START!, START+22
MIG FMD*, FMD+1*, FMD+2, FMD+4!
MPSDY SQN+1!
NOUN DOSE2+5*, DOSE2+9!
>> OR0 UL1+3
ORCHK SQN+1!
>> ORD START+25*, START+26, START+28, L1+1, L1+6, UL1+1, UL1+2, UL1+5, DOSE+2
ORDRG SQN+1!
>> PAT START+15*, START+16, START+17, START+18, START+19, START+22, START+23, START+24, START+25, START+27
, START+29
>> PAT( START+15, START+17*, START+18*, START+23*, START+24*
>> PATA START+4*, START+16, START+19*
>> POERR("DFLG" START!
>> POERR("QFLG" START!, START+4, START+5, START+17!, START+22*, START+23*, START+25
PSCLP PSOORFI3+5~, SORT+2*, SORT+4*, SORT+6*
PSOCFLAG PSOORFI3+5~, CLIN+1, SORT+4, CHECK+1!, CHECK+2*, CHECK+7*
PSOCLIN PSOORFI3+4!, CLIN+1*, CLIN+2!, SORT+4*, START+4*, START+5, EXIT!, CHECK+2, CHECK+3, CHECK+4
PSOCLINF PSOORFI3+4!, CLIN+1*, SORT+11*, EXIT!
PSOCLINS PSOORFI3+5~, SORT+1*, SORT+2
PSOCTMP PSOORFI3+5~
>> PSODFN START+19*, START+22, START+27*, DU, DOSE2+6, DO, FMD+5
PSODIEN PSOORFI3+5~, START+5*, START+7, START+13, START+14, START+15, START+21
PSODINST CLIN+1!
PSOFIN START+22!*
PSOINPTR PSOORFI3+5~, CHECK+7*
PSOLGD PSOORFI3+5~, START+4*, START+5
>> PSOLK START+17*, START+18*
PSOMAX SQN+1!
PSOMSG L1+6!
>> PSONEW("CONJUNCTION" DOSE+8*, DOSE2+4
>> PSONEW("DOSE ORDERED" , DOSE+3*, DOSE+9, DU, DU+1, DU+3, DOSE2+6, DOSE2+7, DO, DO+1
, DO+2, DO+3, FMD+1, FMD+5
>> PSONEW("DOSE" DOSE+3*, FMD
>> PSONEW("DURATION" DOSE+7*, DOSE2+4
>> PSONEW("ENT" DOSE+11*, DOSE2+2
>> PSONEW("NOUN" DOSE+3*, DU+4, DOSE2+5, DO+3
>> PSONEW("ODOSE" DU, DOSE2+6, DO
>> PSONEW("ROUTE" DOSE+5*, DOSE2+3
>> PSONEW("SCHEDULE" DOSE+7*, DU+6, DO+5
>> PSONEW("UNITS" DOSE+3*, DOSE2+3
>> PSONEW("VERB" DOSE+5*, DOSE+9, DU+1, DU+2, DOSE2+5, DOSE2+7, DO+1
>> PSONOLCK START+22*
PSONPTRX PSOORFI3+5~, CHECK+4*, CHECK+5*, CHECK+7
>> PSOPINST START+14, START+25, CHECK+2, CHECK+7
>> PSOPTLOK START+22*
PSOQFLG START+23!
>> PSOQQ SQN+2*
PSOQUIT START!, START+23, SQN+2!
>> PSORX("DOSING OFF" , START+16!
>> PSORX("PSOL" START+16, START+30
PSORX0 SQN+1!
PSOSIG SQN+1!
PSOSTC PSOORFI3+5~, SORT+2*
PSOXINST PSOORFI3+4!, EXIT!, CHECK+1!
ROUTE DOSE+6*, DOSE+11!, DU+5, DOSE2+3*, DOSE2+9!, DO+4
>> RXRS START+16, START+30
SAVELKTM L1+2~, L1+5*, L1+7
SECSORT START+3~*, START+21, START+26, START+28
SG FMD+2*, FMD+4!
STA SQN+1!
>> TM START+27*
>> TM1 START+27*
UNITS DOSE+4*, DOSE+11!, DOSE2+3*, DOSE2+9!, FMD+3
VERB DOSE2+5*, DOSE2+9!
>> X START+18*, START+22*, START+23*, START+29*
>> Y PSOORFI3+8, PSOORFI3+9, CLIN, CLIN+1, SORT, SORT+1, START+19*, START+22*
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