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 |  Local Variables  | All
Print Page as PDF
Routine: PSOSPML4

Package: Outpatient Pharmacy

Routine: PSOSPML4


Information

PSOSPML4 ;BIRM/MFR - Single Prescription ASAP Data Listman Driver ;09/01/12

Source Information

Source file <PSOSPML4.m>

Call Graph

Call Graph

Call Graph Total: 27

Package Total Call Graph
Outpatient Pharmacy 13 ($$ASAP95,$$TH09,$$TH13)^PSOASAP0  $$RXNUM^PSOBPSU2  ($$RXRLDT,$$RXSITE,$$RXSTATE,$$RXSTATEP)^PSOBPSUT  LST^PSOPMP0  DP^PSORXVW  $$SECKEY^PSOSPMA3  EXMSG^PSOSPML2  EN^PSOSPML3  
LOADASAP^PSOSPMU0  ($$BLDBAT,LOADRTS,PAUSE,SETLN)^PSOSPMU1  $$RXFILL^PSOSPMU2  $$CUSSEG^PSOSPMU3  ($$PREIEN,$$RPHIEN,$$SCREEN,$$SPOK,EXPORT,SEGCOUNT,SETNAME)^PSOSPMUT  
Kernel 6 ^%ZIS  ^%ZISC  $$EC^%ZOSV  UNWIND^%ZTER  $$NOW^XLFDT  $$UP^XLFSTR  
VA FileMan 4 IX^DIC  ^DIE  $$GET1^DIQ  ^DIR  
List Manager 3 EN^VALM  FULL^VALM1  CLEAN^VALM10  
Registration 1 (ADD,DEM)^VADPT  

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

Package Total Caller Graph
Outpatient Pharmacy 13 PSO SPMP SINGLE RX VIEW/EXPORT  PSO SPMP VIEW/EXPORT RX  PSO SPMP4 EXPORT RX  PSO SPMP4 MEDICATION PROFILE  PSO SPMP4 MENU  PSO SPMP4 VIEW ASAP DEFINITION  PSO SPMP4 VIEW RX  PSOERSE1  
PSOERUT6  PSOREJP2  PSOSPML2  PSOSPML3  PSOSPML5  
Kernel 2 ^DIC(19  ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
RX ; - Prescription prompt
EN(RXIEN,FILLNUM,RECTYPE) ; Entry point
HDR ; - Builds the Header section
INIT ; Builds the Body section
SETSEG(ARRNAM) ; Sets list body with ASAP (non-1995) info (Uses Recurisivity - Call itself)
ERROR ; Error Trap Handling to catch errors on user-entered M expression
SETSEG95(LSTSUB,RECORD) ; Sets list body with ASAP 1995 info
ASAPDEF ; - Invokes Listman for ASAP Definitions
EXPORT ; - Export Rx
VIEW ; - Rx View Action
; Most of these variables most be NEWed because they are being killed by PSORXVW
MP ; - Patient Medication Profile
EXIT ; Listman Exit
HELP ; Listman Help
RXLKP(RXNUM) ; - Peforms Lookup on the PRESCRIPTION file
VRECMSG(X,RXIEN,FILLNUM,PSOSECK) ; Inform user if VOID selected without PSO SPMP ADMIN key

External References

Name Field # of Occurrence
^%ZIS EXPORT+65
^%ZISC EXPORT+67
$$EC^%ZOSV ERROR+1
UNWIND^%ZTER ERROR+2
IX^DIC RXLKP+3
^DIE EXPORT+69
$$GET1^DIQ EN+7, EN+9, EN+11, HDR+2, HDR+4, ASAPDEF+3, EXPORT+14, EXPORT+46, EXPORT+47, EXPORT+51
, EXPORT+52, EXPORT+55, EXPORT+64, MP+4
^DIR RX+2, EXPORT+34, EXPORT+41, EXPORT+72
$$ASAP95^PSOASAP0 INIT+5
$$TH09^PSOASAP0 SETSEG+20
$$TH13^PSOASAP0 SETSEG+20
$$RXNUM^PSOBPSU2 RX+7
$$RXRLDT^PSOBPSUT RX+16, EXPORT+22, VRECMSG+2
$$RXSITE^PSOBPSUT EN+8, EXPORT+55, MP+3
$$RXSTATE^PSOBPSUT EN+6, ASAPDEF+2, EXPORT+13, EXPORT+44
$$RXSTATEP^PSOBPSUT EXPORT+45
LST^PSOPMP0 MP+5
DP^PSORXVW VIEW+14
$$SECKEY^PSOSPMA3 EXPORT+20
EXMSG^PSOSPML2 EXPORT+65
EN^PSOSPML3 ASAPDEF+5
LOADASAP^PSOSPMU0 INIT+8
$$BLDBAT^PSOSPMU1 EXPORT+61
LOADRTS^PSOSPMU1 EN+14
PAUSE^PSOSPMU1 RX+13
SETLN^PSOSPMU1 SETSEG+8, SETSEG+22, SETSEG+23, ERROR+1, SETSEG95+3, SETSEG95+4, SETSEG95+5, SETSEG95+6, SETSEG95+7, SETSEG95+8
, SETSEG95+9, SETSEG95+10, SETSEG95+11, SETSEG95+12, SETSEG95+13, SETSEG95+14, SETSEG95+15, SETSEG95+16, SETSEG95+17, SETSEG95+18
, SETSEG95+19, SETSEG95+20, SETSEG95+21, SETSEG95+22, SETSEG95+23, SETSEG95+24, SETSEG95+25, SETSEG95+26, SETSEG95+27, SETSEG95+28
, SETSEG95+29, SETSEG95+30, SETSEG95+31, SETSEG95+32
$$RXFILL^PSOSPMU2 RX+9
$$CUSSEG^PSOSPMU3 SETSEG+8
$$PREIEN^PSOSPMUT EN+15
$$RPHIEN^PSOSPMUT EN+16
$$SCREEN^PSOSPMUT RX+11, EXPORT+5
$$SPOK^PSOSPMUT EXPORT+56, EXPORT+57
EXPORT^PSOSPMUT EXPORT+66, EXPORT+70
SEGCOUNT^PSOSPMUT SETSEG+9
SETNAME^PSOSPMUT EN+10
ADD^VADPT EN+10, EXPORT+46
DEM^VADPT EN+10
EN^VALM EN+17
FULL^VALM1 EN+18, ASAPDEF+4, EXPORT+4, MP+2
CLEAN^VALM10 INIT+3
$$NOW^XLFDT EXPORT+68
$$UP^XLFSTR RX+3, VRECMSG+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: RX+2
Function Call: WRITE
  • Prompt: !?5,"The ECME# must be 7 digits long!",$C(7)
  • Line Location: RX+6
Function Call: WRITE
  • Prompt: " ??"
  • Line Location: RX+7
Function Call: WRITE
  • Prompt: !!?1,$S($P(SCREEN,"^",3)="E":"ERROR",1:"WARNING"),": ",$P(SCREEN,"^",2),$C(7)
  • Line Location: RX+13
Function Call: WRITE
  • Prompt: !!?1,"Only prescription fills dispensed on or after Feb 11, 2013 can be exported.",$C(7)
  • Line Location: RX+17
Function Call: WRITE
  • Prompt: !
  • Line Location: ASAPDEF+4
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: EXPORT+7
Function Call: WRITE
  • Prompt: !!,"WARNING: ",$P(SCREEN,"^",2)
  • Line Location: EXPORT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EXPORT+37
Function Call: WRITE
  • Prompt: ?40,"Please wait..."
  • Line Location: EXPORT+42
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: EXPORT+55
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: EXPORT+57
Function Call: WRITE
  • Prompt: !!!,VALMSG,"...NO BATCH SENT!",!
  • Line Location: EXPORT+58
Function Call: WRITE
  • Prompt: !
  • Line Location: EXPORT+65
Function Call: WRITE
  • Prompt: !
  • Line Location: EXPORT+66
Function Call: WRITE
  • Prompt: !
  • Line Location: MP+2
Routine Call
  • %ZIS
  • Line Location:
    • EXPORT+65
Routine Call
  • DIC
  • Line Location:
    • RXLKP+3
Routine Call
  • DIE
  • Line Location:
    • EXPORT+69
Routine Call
  • DIR
  • Line Location:
    • RX+2
    • EXPORT+34
    • EXPORT+41
    • EXPORT+72
Routine Call
  • VALM
  • Line Location:
    • EN+17

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("PSOSPML4" INIT+3!, EXIT+1!
^TMP("PSOSPMRX" EXPORT+60!*

Label References

Name Line Occurrences
$$RXLKP RX+4
EN RX+19
EXIT RX+2, RX+9
INIT ASAPDEF+5
RX RX+4, RX+5, RX+12, RX+16, RX+21
SETSEG INIT+9, SETSEG+7, SETSEG+25
SETSEG95 INIT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% VIEW+4~
%H VIEW+4~
%I VIEW+4~
%ZIS EXPORT+65!*
ARRAY SETSEG+3~, SETSEG+4*, SETSEG+5, SETSEG+7, SETSEG+25
ARRNAM SETSEG~, SETSEG+4
ASAP EN+1~, INIT+1~, INIT+8, SETSEG+16, SETSEG+17
ASAP( SETSEG+7, SETSEG+8, SETSEG+9, SETSEG+11, SETSEG+14, SETSEG+15, SETSEG+18, SETSEG+19
BATCHIEN EN+2~, EN+3*, EXPORT+62*
BATIEN EXPORT+1~, EXPORT+61*, EXPORT+62, EXPORT+64, EXPORT+66, EXPORT+67, EXPORT+70
BPSVRX VIEW+2~, VIEW+13*
COLUMN SETSEG+3~, SETSEG+5*
D RXLKP+1~, RXLKP+2*
DA EXPORT+67~*, VIEW+12~, VIEW+13*
DAT VIEW+3~
DETLN SETSEG+3~
DFN PSOSPML4+3~, EN+9*, EN+10, EXPORT+1~, EXPORT+46*, VIEW+2~, VIEW+4~, MP+1~
DIC VIEW+5~, RXLKP+1~, RXLKP+2*
DIC(0 RXLKP+2*
DIE EXPORT+67~*
DIR PSOSPML4+3~, RX+1!, EXPORT+1~, EXPORT+16!, EXPORT+34!, EXPORT+37!, EXPORT+72!, VIEW+2~, VIEW+6~
DIR("?" RX+1*
DIR("??" RX+1*, EXPORT+21*
DIR("A" RX+1*, EXPORT+16*, EXPORT+39*, EXPORT+40*, EXPORT+72*
DIR("B" EXPORT+29*, EXPORT+33*, EXPORT+40*
DIR("L" EXPORT+17*, EXPORT+18*, EXPORT+25*, EXPORT+26*, EXPORT+27*, EXPORT+32*
DIR("PRE" EXPORT+23*
DIR(0 RX+1*, EXPORT+24*, EXPORT+31*, EXPORT+40*, EXPORT+72*
DIROUT VIEW+2~
DIRUT PSOSPML4+3~, RX+2, EXPORT+1~, EXPORT+34!, VIEW+2~, VIEW+3~
DR EXPORT+67~, EXPORT+68*
DRUGIEN EN+1~, EN+11*
DSPL SETSEG95+1~, SETSEG95+3*, SETSEG95+4*, SETSEG95+5*, SETSEG95+6*, SETSEG95+7*, SETSEG95+8*, SETSEG95+9*, SETSEG95+10*, SETSEG95+11*
, SETSEG95+12*, SETSEG95+13*, SETSEG95+14*, SETSEG95+15*, SETSEG95+16*, SETSEG95+17*, SETSEG95+18*, SETSEG95+19*, SETSEG95+20*, SETSEG95+21*
, SETSEG95+22*, SETSEG95+23*, SETSEG95+24*, SETSEG95+25*, SETSEG95+26*, SETSEG95+27*, SETSEG95+28*, SETSEG95+29*, SETSEG95+30*, SETSEG95+31*
, SETSEG95+32*
DTOUT EXPORT+37!, EXPORT+41, VIEW+6~, VRECMSG+1
DTT VIEW+3~
DUOUT EXPORT+1~, EXPORT+34!, EXPORT+37!, EXPORT+41, VIEW+6~
DUZ EXPORT+68
EXDT VIEW+6~
FFX VIEW+3~
FILLIEN EN+1~, EN+12*
FILLNUM RX+9*, RX+11, RX+16, RX+19, EN~, EN+5*, EN+12, EN+14, EN+15, EN+16
, HDR+3, INIT+5, EXPORT+5, EXPORT+22, EXPORT+60, VIEW+14~, VRECMSG~, VRECMSG+2
GMRA VIEW+4~
GMRAL VIEW+4~
HDR VIEW+4~
I SETSEG+3~, SETSEG+13*, SETSEG+14, SETSEG+15, SETSEG+18, SETSEG+19, SETSEG+22*, SETSEG+23*, VIEW+4~
IFN VIEW+6~
II VIEW+3~
IO EXPORT+65
IOP EXPORT+65!
J VIEW+3~
L1 VIEW+3~
LBL VIEW+4~
LINE INIT+1~, INIT+3*, INIT+5, INIT+9, VIEW+14~
LINE1 HDR+1~
LINE2 HDR+1~
LST EXPORT+1~, EXPORT+49*, EXPORT+50
LSTELM SETSEG+3~, SETSEG+11*, SETSEG+13
LSTSUB SETSEG95~, SETSEG95+2, SETSEG95+3, SETSEG95+4, SETSEG95+5, SETSEG95+6, SETSEG95+7, SETSEG95+8, SETSEG95+9, SETSEG95+10
, SETSEG95+11, SETSEG95+12, SETSEG95+13, SETSEG95+14, SETSEG95+15, SETSEG95+16, SETSEG95+17, SETSEG95+18, SETSEG95+19, SETSEG95+20
, SETSEG95+21, SETSEG95+22, SETSEG95+23, SETSEG95+24, SETSEG95+25, SETSEG95+26, SETSEG95+27, SETSEG95+28, SETSEG95+29, SETSEG95+30
, SETSEG95+31, SETSEG95+32
M1 VIEW+3~
MBMST EXPORT+1~, EXPORT+47*, EXPORT+48
MED VIEW+3~
N VIEW+3~
P0 VIEW+6~
P1 VIEW+6~
PATIEN EN+1~, EN+9*
PATIENT MP+1~, MP+4*, MP+5
PHYS VIEW+3~
PL VIEW+6~
POERR VIEW+4~
POP EXPORT+65!
PREIEN EN+1~, EN+15*
PS VIEW+12~, VIEW+13*
PSDIV VIEW+3~
PSEXDT VIEW+3~
PSOASVER EN+7*, HDR+4, INIT+4, INIT+6, INIT+8, SETSEG+8, SETSEG+20, ASAPDEF+3*, ASAPDEF+5, EXPORT+1~
, EXPORT+11, EXPORT+14*, EXPORT+51*, EXPORT+61
PSOBCK VIEW+5~
PSOCOL SETSEG95+1~, SETSEG95+2*, SETSEG95+3, SETSEG95+4, SETSEG95+5, SETSEG95+6, SETSEG95+7, SETSEG95+8, SETSEG95+9, SETSEG95+10
, SETSEG95+11, SETSEG95+12, SETSEG95+13, SETSEG95+14, SETSEG95+15, SETSEG95+16, SETSEG95+17, SETSEG95+18, SETSEG95+19, SETSEG95+20
, SETSEG95+21, SETSEG95+22, SETSEG95+23, SETSEG95+24, SETSEG95+25, SETSEG95+26, SETSEG95+27, SETSEG95+28, SETSEG95+29, SETSEG95+30
, SETSEG95+31, SETSEG95+32
PSODFN VIEW+2~, VIEW+5~
PSOELSE VIEW+6~
PSOHD VIEW+5~
PSOLSTLN PSOSPML4+3~, VIEW+2~
PSONAME EN+1~
PSOQUIT PSOSPML4+3~, RX+3*, RX+5, RX+6*, RX+7*
PSOSECK EXPORT+1~, EXPORT+20*, EXPORT+24, EXPORT+27, VRECMSG~, VRECMSG+2
>> PSOSITE MP+3
PSOTITLE VIEW+2~, VIEW+8*, VIEW+14~, VIEW+16
PSOTPCNT PSOSPML4+3~, INIT+7*
PSOTTCNT PSOSPML4+3~, INIT+7*
PSOTXRTS EXPORT+1~, EXPORT+52*, EXPORT+64
PSOVDA VIEW+12~, VIEW+13*
PTST VIEW+4~
QUIT VIEW+2~, VIEW+5~
R3 VIEW+6~
REA VIEW+5~
RECORD SETSEG95~, SETSEG95+4, SETSEG95+5, SETSEG95+6, SETSEG95+7, SETSEG95+8, SETSEG95+9, SETSEG95+10, SETSEG95+11, SETSEG95+12
, SETSEG95+13, SETSEG95+14, SETSEG95+15, SETSEG95+16, SETSEG95+17, SETSEG95+18, SETSEG95+19, SETSEG95+20, SETSEG95+21, SETSEG95+22
, SETSEG95+23, SETSEG95+24, SETSEG95+25, SETSEG95+26, SETSEG95+27, SETSEG95+28, SETSEG95+29, SETSEG95+30, SETSEG95+31, SETSEG95+32
RECTYPE EN~, EN+14, EN+15, EN+16, EXPORT+1~, EXPORT+35*, EXPORT+38, EXPORT+60, EXPORT+61
REFL VIEW+4~
RF VIEW+4~
RFDATE VIEW+4~
RFL VIEW+3~
RFL1 VIEW+3~
RFLL VIEW+3~
RFT VIEW+4~
RLD VIEW+4~
RN VIEW+4~
RPHIEN EN+1~, EN+16*
RSTREC EN+1~
RTN VIEW+6~
RTSDATA EN+1~, EN+14!
RTSREC EN+1~, EN+14*
RX0 VIEW+3~
RX2 VIEW+2~
RX3 VIEW+4~
RXIEN PSOSPML4+3~, RX+4*, RX+7*, RX+9, RX+11, RX+16, RX+19, EN~, EN+6, EN+8
, EN+9, EN+11, EN+14, EN+15, EN+16, HDR+2, HDR+4, INIT+5, ASAPDEF+2, EXPORT+5
, EXPORT+13, EXPORT+22, EXPORT+44, EXPORT+45, EXPORT+46, EXPORT+55, EXPORT+60, VIEW+13, VIEW+14~, MP+3
, MP+4, VRECMSG~, VRECMSG+2
RXLN SETSEG+3~, SETSEG+17*, SETSEG+18*, SETSEG+19
RXN VIEW+5~
RXNUM RXLKP~, RXLKP+2
RXOR VIEW+5~
SCREEN PSOSPML4+3~, RX+11*, RX+12, RX+13, EXPORT+1~, EXPORT+5*, EXPORT+6, EXPORT+7, EXPORT+8
SEGID SETSEG+3~, SETSEG+5*, SETSEG+7, SETSEG+8, SETSEG+9, SETSEG+10, SETSEG+11, SETSEG+14, SETSEG+15, SETSEG+18
, SETSEG+19
SEGTXT SETSEG+3~, SETSEG+10*, SETSEG+16*, SETSEG+20*, SETSEG+22*
SG VIEW+5~
SIG VIEW+6~
SITE MP+1~, MP+3*
SITEIEN EN+1~, EN+8*, MP+1~, MP+3*, MP+5
ST VIEW+3~
STA VIEW+6~
STATE ASAPDEF+1~, ASAPDEF+2*, ASAPDEF+3, EXPORT+12~, EXPORT+13*, EXPORT+14, EXPORT+44*, EXPORT+45
STATEIEN PSOSPML4+3~, EN+6*, EN+7, EXPORT+1~, EXPORT+50*, EXPORT+51, EXPORT+52, EXPORT+54, EXPORT+56, EXPORT+57
, EXPORT+60
STATELST EXPORT+1~, EXPORT+45*, EXPORT+48*, EXPORT+49, EXPORT+50
TMPARR SETSEG+3~, SETSEG+10!
TMPARR( SETSEG+19*, SETSEG+23
TRXTYPE EN+1~, EN+13*
VA VIEW+5~
VADM VIEW+5~
VAERR VIEW+5~
VALM PSOSPML4+3~
VALM("TITLE" VIEW+8, VIEW+16*
VALMBCK PSOSPML4+3~, ASAPDEF+5*, EXPORT+2*, VIEW+5~, VIEW+16*, MP+5*
VALMCNT PSOSPML4+3~, INIT+3*, INIT+5*, INIT+9*, VIEW+2~
VALMHDR PSOSPML4+3~, HDR+2!
VALMHDR(1 HDR+2*, HDR+3*
VALMHDR(2 HDR+4*
VALMSG PSOSPML4+3~, INIT+10*, EXPORT+7*, EXPORT+55*, EXPORT+57*, EXPORT+58
VALUE SETSEG+3~, SETSEG+14*, SETSEG+15*, SETSEG+16, SETSEG+17
VAPA VIEW+5~
VAPA(5 EXPORT+46, EXPORT+47, EXPORT+48
X PSOSPML4+3~, RX+2, RX+3*, RX+4, RX+5, RX+6, RX+7, HDR+1~, EXPORT+1~, VIEW+2~
, VIEW+5~, RXLKP+1~, RXLKP+2*, VRECMSG~, VRECMSG+1, VRECMSG+2
XX VIEW+2~
Y EXPORT+1~, EXPORT+35, EXPORT+41, VIEW+2~, RXLKP+1~, RXLKP+4
Z0 VIEW+6~
Z1 VIEW+6~
ZD VIEW+5~
ZTSK EXPORT+65!
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 |  Local Variables  | All