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

Package Total Caller Graph
Outpatient Pharmacy 11 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  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
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+58
^%ZISC EXPORT+60
$$EC^%ZOSV ERROR+1
UNWIND^%ZTER ERROR+2
IX^DIC RXLKP+3
^DIE EXPORT+62
$$GET1^DIQ EN+7, EN+9, EN+11, HDR+2, HDR+4, ASAPDEF+3, EXPORT+40, EXPORT+41, EXPORT+45, EXPORT+46
EXPORT+49, EXPORT+57, MP+4
^DIR RX+2, EXPORT+28, EXPORT+35, EXPORT+65
$$ASAP95^PSOASAP0 INIT+5
$$TH09^PSOASAP0 SETSEG+20
$$TH13^PSOASAP0 SETSEG+20
$$RXNUM^PSOBPSU2 RX+7
$$RXRLDT^PSOBPSUT RX+16, EXPORT+16, VRECMSG+2
$$RXSITE^PSOBPSUT EN+8, EXPORT+49, MP+3
$$RXSTATE^PSOBPSUT EN+6, ASAPDEF+2, EXPORT+38
$$RXSTATEP^PSOBPSUT EXPORT+39
LST^PSOPMP0 MP+5
DP^PSORXVW VIEW+8
$$SECKEY^PSOSPMA3 EXPORT+14
EXMSG^PSOSPML2 EXPORT+58
EN^PSOSPML3 ASAPDEF+5
LOADASAP^PSOSPMU0 INIT+8
$$BLDBAT^PSOSPMU1 EXPORT+55
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+50, EXPORT+51
EXPORT^PSOSPMUT EXPORT+59, EXPORT+63
SEGCOUNT^PSOSPMUT SETSEG+9
SETNAME^PSOSPMUT EN+10
ADD^VADPT EN+10, EXPORT+40
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+61
$$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+31
Function Call: WRITE
  • Prompt: ?40,"Please wait..."
  • Line Location: EXPORT+36
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: EXPORT+49
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: EXPORT+51
Function Call: WRITE
  • Prompt: !!!,VALMSG,"...NO BATCH SENT!",!
  • Line Location: EXPORT+52
Function Call: WRITE
  • Prompt: !
  • Line Location: EXPORT+58
Function Call: WRITE
  • Prompt: !
  • Line Location: EXPORT+59
Function Call: WRITE
  • Prompt: !
  • Line Location: MP+2
Routine Call
  • %ZIS
  • Line Location:
    • EXPORT+58
Routine Call
  • DIC
  • Line Location:
    • RXLKP+3
Routine Call
  • DIE
  • Line Location:
    • EXPORT+62
Routine Call
  • DIR
  • Line Location:
    • RX+2
    • EXPORT+28
    • EXPORT+35
    • EXPORT+65
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+54!*

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
%ZIS EXPORT+58!*
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*
BATIEN EXPORT+1~, EXPORT+55*, EXPORT+57, EXPORT+59, EXPORT+60, EXPORT+63
COLUMN SETSEG+3~, SETSEG+5*
D RXLKP+1~, RXLKP+2*
DA EXPORT+60~*, VIEW+6~, VIEW+7*
DETLN SETSEG+3~
DFN PSOSPML4+3~, EN+9*, EN+10, EXPORT+1~, EXPORT+40*, VIEW+1~, MP+1~
DIC RXLKP+1~, RXLKP+2*
DIC(0 RXLKP+2*
DIE EXPORT+60~*
DIR PSOSPML4+3~, RX+1!, EXPORT+1~, EXPORT+10!, EXPORT+28!, EXPORT+31!, EXPORT+65!
DIR("?" RX+1*
DIR("??" RX+1*, EXPORT+15*
DIR("A" RX+1*, EXPORT+10*, EXPORT+33*, EXPORT+34*, EXPORT+65*
DIR("B" EXPORT+23*, EXPORT+27*, EXPORT+34*
DIR("L" EXPORT+11*, EXPORT+12*, EXPORT+19*, EXPORT+20*, EXPORT+21*, EXPORT+26*
DIR("PRE" EXPORT+17*
DIR(0 RX+1*, EXPORT+18*, EXPORT+25*, EXPORT+34*, EXPORT+65*
DIRUT PSOSPML4+3~, RX+2, EXPORT+1~, EXPORT+28!
DR EXPORT+60~, EXPORT+61*
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+31!, EXPORT+35, VRECMSG+1
DUOUT EXPORT+1~, EXPORT+28!, EXPORT+31!, EXPORT+35
DUZ EXPORT+61
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+16, EXPORT+54, VIEW+8~, VRECMSG~, VRECMSG+2
I SETSEG+3~, SETSEG+13*, SETSEG+14, SETSEG+15, SETSEG+18, SETSEG+19, SETSEG+22*, SETSEG+23*
IO EXPORT+58
IOP EXPORT+58!
LINE INIT+1~, INIT+3*, INIT+5, INIT+9, VIEW+8~
LINE1 HDR+1~
LINE2 HDR+1~
LST EXPORT+1~, EXPORT+43*, EXPORT+44
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
MBMST EXPORT+1~, EXPORT+41*, EXPORT+42
PATIEN EN+1~, EN+9*
PATIENT MP+1~, MP+4*, MP+5
POP EXPORT+58!
PREIEN EN+1~, EN+15*
PS VIEW+6~
PSOASVER EN+7*, HDR+4, INIT+4, INIT+6, INIT+8, SETSEG+8, SETSEG+20, ASAPDEF+3*, ASAPDEF+5, EXPORT+1~
EXPORT+45*, EXPORT+55
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
PSOLSTLN PSOSPML4+3~, VIEW+1~
PSONAME EN+1~
PSOQUIT PSOSPML4+3~, RX+3*, RX+5, RX+6*, RX+7*
PSOSECK EXPORT+1~, EXPORT+14*, EXPORT+18, EXPORT+21, VRECMSG~, VRECMSG+2
>> PSOSITE MP+3
PSOTITLE VIEW+1~, VIEW+2*, VIEW+8~, VIEW+10
PSOTPCNT PSOSPML4+3~, INIT+7*
PSOTTCNT PSOSPML4+3~, INIT+7*
PSOTXRTS EXPORT+1~, EXPORT+46*, EXPORT+57
PSOVDA VIEW+6~, VIEW+7*
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+29*, EXPORT+32, EXPORT+54, EXPORT+55
RPHIEN EN+1~, EN+16*
RSTREC EN+1~
RTSDATA EN+1~, EN+14!
RTSREC EN+1~, EN+14*
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+16, EXPORT+38, EXPORT+39, EXPORT+40, EXPORT+49, EXPORT+54, VIEW+7, VIEW+8~, MP+3, MP+4
, VRECMSG~, VRECMSG+2
RXLN SETSEG+3~, SETSEG+17*, SETSEG+18*, SETSEG+19
RXNUM RXLKP~, RXLKP+2
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*
SITE MP+1~, MP+3*
SITEIEN EN+1~, EN+8*, MP+1~, MP+3*, MP+5
STATE ASAPDEF+1~, ASAPDEF+2*, ASAPDEF+3, EXPORT+38*, EXPORT+39
STATEIEN PSOSPML4+3~, EN+6*, EN+7, EXPORT+1~, EXPORT+44*, EXPORT+45, EXPORT+46, EXPORT+48, EXPORT+50, EXPORT+51
EXPORT+54
STATELST EXPORT+1~, EXPORT+39*, EXPORT+42*, EXPORT+43, EXPORT+44
TMPARR SETSEG+3~, SETSEG+10!
TMPARR( SETSEG+19*, SETSEG+23
TRXTYPE EN+1~, EN+13*
VALM PSOSPML4+3~
VALM("TITLE" VIEW+2, VIEW+10*
VALMBCK PSOSPML4+3~, ASAPDEF+5*, EXPORT+2*, VIEW+10*, MP+5*
VALMCNT PSOSPML4+3~, INIT+3*, INIT+5*, INIT+9*, VIEW+1~
VALMHDR PSOSPML4+3~, HDR+2!
VALMHDR(1 HDR+2*, HDR+3*
VALMHDR(2 HDR+4*
VALMSG PSOSPML4+3~, INIT+10*, EXPORT+7*, EXPORT+49*, EXPORT+51*, EXPORT+52
VALUE SETSEG+3~, SETSEG+14*, SETSEG+15*, SETSEG+16, SETSEG+17
>> VAPA(5 EXPORT+40, EXPORT+41, EXPORT+42
X PSOSPML4+3~, RX+2, RX+3*, RX+4, RX+5, RX+6, RX+7, HDR+1~, EXPORT+1~, RXLKP+1~
, RXLKP+2*, VRECMSG~, VRECMSG+1, VRECMSG+2
Y EXPORT+1~, EXPORT+29, EXPORT+35, RXLKP+1~, RXLKP+4
ZTSK EXPORT+58!
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