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

Package: Outpatient Pharmacy

Routine: PSOERX1F


Information

PSOERX1F ;ALB/MR - Accept/Un-Accept eRx function; Sep 6, 2025@14:52

Source Information

Source file <PSOERX1F.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Outpatient Pharmacy 10 REF^PSOERSE1  $$UNACCBEF^PSOERX1H  TXT2ARY^PSOERXD1  POST^PSOERXO1  (MSGDIR,UPDSTAT)^PSOERXU1  ($$GETREQ,RRDELTA)^PSOERXU2  PREFRES^PSOERXU3  $$LSIG^PSOERXU6  
($$DONOTFIL,$$ERXSIG,$$PROXYDUZ,$$VALPTADD,PRDRVAL)^PSOERXUT  EN^PSOHLSNC  
VA FileMan 6 (,$$FIND1)^DIC  FILE^DICN  (,FILE,WP)^DIE  (EN1,IX)^DIK  ($$GET1,GETS)^DIQ  ^DIR  
List Manager 1 FULL^VALM1  

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

Package Total Caller Graph
Outpatient Pharmacy 2 PSOERSE3  PSOERXA5  

Entry Points

Name Comments DBIA/ICR reference
SETUP ;
ADD(QUIET) ;Add CHCS message to Outpatient Pending Orders file
ORDNUM() ; Returns the correct IEN for the ORDER file (#100) for the Rx

External References

Name Field # of Occurrence
^DIC SETUP+81
$$FIND1^DIC ADD+45
FILE^DICN ADD+15
^DIE ADD+23, ADD+63
FILE^DIE ADD+25, ADD+47
WP^DIE ADD+40, ADD+78
EN1^DIK ADD+26
IX^DIK ADD+59
$$GET1^DIQ SETUP+4, SETUP+9, SETUP+20, SETUP+41, SETUP+52, SETUP+57, SETUP+75, SETUP+77, SETUP+80, SETUP+91
SETUP+100, ADD+2, ADD+8, ADD+9, ADD+46, ADD+71, ADD+73, ADD+82, ORDNUM+1, ORDNUM+2
, ORDNUM+3
GETS^DIQ SETUP+14
^DIR SETUP+12, SETUP+75, SETUP+120, ADD+57, ADD+88, ADD+89, ADD+90
REF^PSOERSE1 SETUP+121
$$UNACCBEF^PSOERX1H ADD+84
TXT2ARY^PSOERXD1 SETUP+62, SETUP+65, SETUP+111
POST^PSOERXO1 ADD+86
MSGDIR^PSOERXU1 SETUP+25, SETUP+31, SETUP+37, SETUP+40, SETUP+43
UPDSTAT^PSOERXU1 SETUP+27, ADD+17, ADD+18, ADD+66, ADD+67, ADD+70, ADD+72, ADD+73
$$GETREQ^PSOERXU2 SETUP+19, ADD+18, ADD+73
RRDELTA^PSOERXU2 SETUP+23
PREFRES^PSOERXU3 SETUP+21
$$LSIG^PSOERXU6 SETUP+62, SETUP+65, SETUP+111
$$DONOTFIL^PSOERXUT SETUP+8
$$ERXSIG^PSOERXUT ADD+77
$$PROXYDUZ^PSOERXUT SETUP+75
$$VALPTADD^PSOERXUT SETUP+41
PRDRVAL^PSOERXUT SETUP+39
EN^PSOHLSNC ADD+42
FULL^VALM1 SETUP+7, ADD+43

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Cannot accept a prescription with a status of 'Rejected', 'Removed',",!,"or 'Processed",!
  • Line Location: SETUP+11
Function Call: WRITE
  • Prompt: !!,"Current Clinic assigned to the eRx: ",$$GET1^DIQ(52.49,PSOIEN,20.6),!
  • Line Location: SETUP+77
Function Call: WRITE
  • Prompt: !,PSOEXMS
  • Line Location: SETUP+120
Function Call: WRITE
  • Prompt: !!,"External order, unable to successfully transmit to CPRS."
  • Line Location: ADD+56
Function Call: WRITE
  • Prompt: !!,"eRx #"_PSOHY("CHNUM")_" sent to PENDING ORDERS Queue."
  • Line Location: ADD+81
Function Call: WRITE
  • Prompt: !!,"Sending rxVerify Message to prescriber."
  • Line Location: ADD+85
Function Call: WRITE
  • Prompt: !,$P(PSSRET(0),U,2)
  • Line Location: ADD+88
Function Call: WRITE
  • Prompt: !,PSSRET("errorMessage")
  • Line Location: ADD+89
Routine Call
  • DIC
  • Line Location:
    • SETUP+81
Routine Call
  • DIC
  • Line Location:
    • ADD+45
Routine Call
  • DIE
  • Line Location:
    • ADD+23
    • ADD+63
Routine Call
  • DIE
  • Line Location:
    • ADD+25
    • ADD+47
Routine Call
  • DIE
  • Line Location:
    • ADD+40
    • ADD+78
Routine Call
  • DIR
  • Line Location:
    • SETUP+12
    • SETUP+75
    • SETUP+120
    • ADD+57
    • ADD+88
    • ADD+89
    • ADD+90

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORPA(101.52 - [#101.52] FIND1^DIC
^SC - [#44] GET1^DIQ
^PSDRUG - [#50] GET1^DIQ
^PSRX - [#52] GET1^DIQ
^PS(52.41 - [#52.41] Classic Fileman Calls,  GET1^DIQ,  WP^DIE
^PS(52.49 - [#52.49] Classic Fileman Calls,  GET1^DIQ
^PS(59 - [#59] GET1^DIQ
^PS(59.7 - [#59.7] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.41 - [#52.41] ADD+20*, ADD+21*, ADD+22*, ADD+27*, ADD+28*, ADD+29*, ADD+30*, ADD+31*, ADD+32*, ADD+34*
, ADD+37*, ADD+38*, ADD+39*, ADD+44, ADD+50*, ADD+52!, ADD+53!, ADD+54*, ADD+62
^PS(52.45 - [#52.45] ADD+61
^PS(52.49 - [#52.49] SETUP+68, SETUP+69, SETUP+70, SETUP+105, SETUP+106, ADD+71
^SC - [#44] ADD+6

Label References

Name Line Occurrences
ADD SETUP+28, SETUP+30, SETUP+119

Naked Globals

Name Field # of Occurrence
^("EXT" ADD+22*
^("INI" ADD+52
^(0 ADD+20*, ADD+21*, ADD+53

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CSERRMSG SETUP+3~, SETUP+39, SETUP+40, SETUP+43
CSERRMSG(1 SETUP+42*
DA ADD+1~, ADD+23*!, ADD+26~*, ADD+59*, ADD+63*!
DD ADD+11!, ADD+15!
DELTAS SETUP+3~, SETUP+23
DELTAS( SETUP+24, SETUP+26, SETUP+28
DFN SETUP+98*, SETUP+122!
DIC SETUP+3~, SETUP+78!*, ADD+11!*, ADD+15!
DIC("A" SETUP+79*
DIC("B" SETUP+80*
DIC("DR" ADD+13*, ADD+14*
DIC("S" SETUP+78*
DIC(0 SETUP+78*, ADD+11*
DIE ADD+23*!, ADD+63*!
DIK ADD+26~*, ADD+59*
DIK(1 ADD+26*
DIR SETUP+2~, SETUP+75!, SETUP+120!, ADD+88!, ADD+89!, ADD+90!
DIR(0 SETUP+12*, SETUP+75*, SETUP+120*, ADD+57*, ADD+88*, ADD+89*, ADD+90*
DMVAL SETUP+2~, SETUP+35*
DO ADD+11!, ADD+15!
DR ADD+23*!, ADD+63*!
DT ADD+27
>> DTOUT SETUP+81
>> DUOUT SETUP+81
DUZ SETUP+75, SETUP+94
EFFDT SETUP+1~, SETUP+51*, SETUP+54*, SETUP+55*, SETUP+95
ERXMSG SETUP+3~
ERXNUM SETUP+1~, SETUP+49*, SETUP+92
ERXSTA SETUP+31*, ADD+1~, ADD+61*
F SETUP+1~, SETUP+5*, SETUP+14, SETUP+16, SETUP+17, SETUP+22, SETUP+31, SETUP+33, SETUP+34, SETUP+35
SETUP+41, SETUP+45, SETUP+46, SETUP+47, SETUP+48, SETUP+49, SETUP+50, SETUP+51, SETUP+52, SETUP+56
SETUP+58, SETUP+59, SETUP+60, SETUP+64, SETUP+109, SETUP+110, SETUP+112
FDA ADD+25!
FDA( ADD+25*
I SETUP+3~
IARY ADD+1~
ILOOP ADD+1~
INDARY SETUP+3~, SETUP+111
INDARY( SETUP+113, SETUP+114
LOC SETUP+1~, SETUP+52*, SETUP+76*, SETUP+82*, SETUP+87
MBMSITE SETUP+1~, SETUP+4*, SETUP+7, SETUP+75, ADD+1~, ADD+2*, ADD+82
MTYPE SETUP+3~, SETUP+16*, SETUP+18, SETUP+32, ADD+17, ADD+66, ADD+67, ADD+69, ADD+84
OC SETUP+1~
>> ORD ORDNUM+2
ORDERTYP SETUP+2~, SETUP+86*, SETUP+98
ORDNUM ADD+1~, ADD+62*, ADD+63
ORXIEN SETUP+3~
PAINDFU SETUP+3~, SETUP+109*, SETUP+111
PATIEN SETUP+1~, SETUP+46*, SETUP+98
PATINST SETUP+2~, SETUP+60*, SETUP+62, ADD+25
PCNT SETUP+2~, SETUP+66*, SETUP+67*
PINARY SETUP+3~, SETUP+62
PINARY( SETUP+116, SETUP+117
PINARY(0 ADD+40
PLOOP SETUP+2~, SETUP+66*, SETUP+67
PMVAL SETUP+2~, SETUP+33*
POORD SETUP+2~, SETUP+45*
PRMVAL SETUP+2~, SETUP+34*
PROVIEN SETUP+1~, SETUP+47*, SETUP+95
PRVARY SETUP+1~, SETUP+65
PRVARY( SETUP+66, SETUP+67
PRVCOMM SETUP+1~, SETUP+64*, SETUP+65
>> PSOCLNC SETUP+30, SETUP+75, SETUP+80, SETUP+89, SETUP+90
PSOCPEND ADD+1~, ADD+19*, ADD+20, ADD+21, ADD+22, ADD+23, ADD+25, ADD+26, ADD+27, ADD+28
, ADD+29, ADD+30, ADD+31, ADD+32, ADD+34, ADD+37, ADD+38, ADD+39, ADD+40, ADD+42
, ADD+44, ADD+50, ADD+52, ADD+53, ADD+54, ADD+59, ADD+62, ADD+63, ADD+78
PSODAT SETUP+1~, SETUP+21
PSODAT( SETUP+16, SETUP+17, SETUP+22, SETUP+31, SETUP+33, SETUP+34, SETUP+35, SETUP+41, SETUP+45, SETUP+46
SETUP+47, SETUP+48, SETUP+49, SETUP+50, SETUP+51, SETUP+52, SETUP+56, SETUP+58, SETUP+59, SETUP+60
SETUP+64, SETUP+109, SETUP+110, SETUP+112
PSOEXCNT SETUP+2~, SETUP+15*, SETUP+21, SETUP+31*, SETUP+33*, SETUP+34*, SETUP+35*, SETUP+45*, SETUP+46*, SETUP+47*
SETUP+48*, SETUP+49*, SETUP+50*, SETUP+57*, SETUP+59*, SETUP+68*, ADD+4*, ADD+10*, ADD+16*, ADD+17
, ADD+50*, ADD+55*
PSOEXMS SETUP+2~, SETUP+21, SETUP+25, SETUP+31, SETUP+37, SETUP+120, ADD+18
PSOEXMS( SETUP+31*, SETUP+33*, SETUP+34*, SETUP+35*, SETUP+45*, SETUP+46*, SETUP+47*, SETUP+48*, SETUP+49*, SETUP+50*
SETUP+57*, SETUP+59*, SETUP+68*, ADD+4*, ADD+10*, ADD+16*, ADD+17, ADD+50*, ADD+55*
PSOEXMS(0 SETUP+24, SETUP+26, SETUP+37
PSOHINI ADD+1~, ADD+5*
PSOHINLO ADD+1~, ADD+5*, ADD+6*, ADD+9*, ADD+10, ADD+32
PSOHQ ADD+1~, ADD+28*, ADD+31*, ADD+35*, ADD+36, ADD+37, ADD+38, ADD+39
PSOHQT ADD+1~, ADD+27, ADD+28*, ADD+30, ADD+31*, ADD+34, ADD+35*, ADD+36*, ADD+37, ADD+38
, ADD+39
PSOHY SETUP+1~, SETUP+21
PSOHY("CHNUM" SETUP+92*, ADD+11, ADD+22, ADD+81
PSOHY("DAYS" SETUP+103*, ADD+14
PSOHY("DRUG" SETUP+96*, ADD+3, ADD+13
PSOHY("EDT" SETUP+100*, ADD+20
PSOHY("ENTER" SETUP+94*, ADD+13
PSOHY("EXAPP" SETUP+102*, ADD+22
PSOHY("IND" SETUP+109*, ADD+29
PSOHY("INDO" SETUP+110*, ADD+29
PSOHY("ITEM" SETUP+96*, ADD+13
PSOHY("LOC" SETUP+87*, SETUP+88, SETUP+90*, SETUP+91*, ADD+6, ADD+20, ADD+82
PSOHY("OCC" SETUP+98*, ADD+20
PSOHY("PAT" SETUP+98*, ADD+20
PSOHY("PICK" SETUP+93*, ADD+12*, ADD+21
PSOHY("PRCOM" SETUP+67*, ADD+27, ADD+28
PSOHY("PREVORD" ADD+14
PSOHY("PRIOR" SETUP+100*, ADD+21
PSOHY("PROV" SETUP+22*, SETUP+95*, ADD+13
PSOHY("QTSUB" SETUP+70*, ADD+34, ADD+35, ADD+36, ADD+37, ADD+38, ADD+39
PSOHY("QTY" SETUP+97*, ADD+14
PSOHY("REF" SETUP+97*, ADD+14
PSOHY("SDT" SETUP+95*, ADD+13
PSOHY("SIG" SETUP+107*, SETUP+114*, SETUP+117*, ADD+30, ADD+31
>> PSOIEN SETUP+6, SETUP+8, SETUP+9, SETUP+13, SETUP+19, SETUP+21, SETUP+23, SETUP+27, SETUP+39, SETUP+41
SETUP+68, SETUP+69, SETUP+70, SETUP+75, SETUP+77, SETUP+100, SETUP+105, SETUP+106, ADD+8, ADD+9
, ADD+17, ADD+18, ADD+63, ADD+66, ADD+67, ADD+70, ADD+71, ADD+73, ADD+77, ADD+84
, ADD+86
PSOIENS SETUP+1~, SETUP+13*, SETUP+14, SETUP+16, SETUP+17, SETUP+22, SETUP+31, SETUP+33, SETUP+34, SETUP+35
SETUP+41, SETUP+45, SETUP+46, SETUP+47, SETUP+48, SETUP+49, SETUP+50, SETUP+51, SETUP+52, SETUP+56
SETUP+58, SETUP+59, SETUP+60, SETUP+64, SETUP+109, SETUP+110, SETUP+112
PSOQUIT SETUP+3~, SETUP+74*, SETUP+75, SETUP+81*
PSORDEA ADD+1~, ADD+45*, ADD+46*, ADD+47
PSORDFDA ADD+1~
PSORDFDA( ADD+47*
PSORDNUM ADD+1~, ADD+44*, ADD+45
>> PSOSITE SETUP+52, SETUP+91
PSSRET ADD+1~, ADD+86
PSSRET("errorMessage" ADD+89
PSSRET(0 ADD+88
QTCNT SETUP+2~, SETUP+69*, SETUP+70*
QTLOOP SETUP+2~, SETUP+69*, SETUP+70
QUIET ADD~, ADD+55, ADD+56, ADD+57, ADD+80, ADD+93!
REQIEN SETUP+3~, SETUP+19*, SETUP+20, SETUP+23, ADD+18*, ADD+73*
RESTYPE SETUP+3~, SETUP+17*, SETUP+18, SETUP+24, SETUP+26, SETUP+32, ADD+8*, ADD+84
>> RTHID ADD+71*
>> RTHIEN ADD+71*, ADD+72
RXIEN SETUP+3~, SETUP+20*
>> RXN ORDNUM+1, ORDNUM+3
RXSTAT SETUP+2~, SETUP+9*, SETUP+10
SCNT SETUP+2~, SETUP+105*, SETUP+107*, SETUP+114*, SETUP+117*
SIGDAT SETUP+2~, SETUP+106*, SETUP+107
SLOOP SETUP+2~, SETUP+105*, SETUP+106
SLOOP2 SETUP+3~, SETUP+116*, SETUP+117
SLOOP3 SETUP+3~, SETUP+113*, SETUP+114
U ADD+44, ADD+62, ADD+88
UNEXINS ADD+77~
UNEXINS(1 ADD+77*, ADD+78
UNEXPI SETUP+3~
VADAYS SETUP+3~, SETUP+56*, SETUP+103
VADRUG SETUP+1~, SETUP+48*, SETUP+57, SETUP+96
>> VALMBCK SETUP+7*
>> VALMKEY ORDNUM+1, ORDNUM+2, ORDNUM+3
VAOI SETUP+1~, SETUP+57*, SETUP+96
VAPRIOR SETUP+1~, SETUP+84*, SETUP+100
VAREF SETUP+1~, SETUP+58*, SETUP+97
VAROUT SETUP+1~, SETUP+59*, SETUP+93
VQTY SETUP+1~, SETUP+50*, SETUP+97
WRITDT SETUP+3~, SETUP+51*, SETUP+55
>> X ADD+11*
>> XQY0 ORDNUM+1, ORDNUM+2, ORDNUM+3
>> Y SETUP+81, SETUP+82, ADD+15, ADD+19
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