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

Package: Outpatient Pharmacy

Routine: PSOERXU2


Information

PSOERXU2 ;ALB/BWF - eRx utilities ; 5/26/2017 9:57am

Source Information

Source file <PSOERXU2.m>

Call Graph

Call Graph

Call Graph Total: 19

Package Total Call Graph
Outpatient Pharmacy 9 REF^PSOERSE1  $$PRESOLV^PSOERXA1  TXT2ARY^PSOERXD1  UPDSTAT^PSOERXU1  $$RESOLV^PSOERXU2  $$FINDNRX^PSOERXU6  DIRE^PSOERXX1  (ALLERGY,REMOTE)^PSOORUT2  
^PSOORUT3  
VA FileMan 5 $$FIND1^DIC  FIELD^DID  (FILE,UPDATE)^DIE  ($$GET1,GETS)^DIQ  ^DIR  
Kernel 2 $$NOW^XLFDT  $$UP^XLFSTR  
List Manager 2 FULL^VALM1  (CNTRL,SET)^VALM10  
Adverse Reaction Tracking 1 EN1^GMRADPT  

Caller Graph

Caller Graph Total: 32

Package Total Caller Graph
Outpatient Pharmacy 31 PSO ERX ADD COMMENT  PSOERHL0  PSOERSE1  PSOERSE2  PSOERSE5  PSOERUT  PSOERUT6  PSOERX  
PSOERX1C  PSOERX1D  PSOERX1E  PSOERX1F  PSOERX1G  PSOERXA1  PSOERXA2  PSOERXA3  
PSOERXA5  PSOERXA6  PSOERXI2  PSOERXIA  PSOERXIB  PSOERXO1  PSOERXU1  PSOERXU2  
PSOERXU3  PSOERXU5  PSOERXU6  PSOERXU7  PSOERXX1  PSOORNE6  PSOORNEW  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
FINDPAT(NAME,IDOB,IGEN,SSN,AL1) ;
FINDPRE(NAME,NPI,DEA) ; Try to find an existing prescriber record in #52.48
; Input: NAME - Prescriber Name
; NPI - Prescriber NPI Number
; DEA - Prescriber DEA Number
ERR(ERXIEN,MTYPE) ;
GETSTAT(MTYPE,RTHID,RTMID) ;
ADDCOMM(ERXIEN) ;
RESOLV(IEN) ;
GETREQ(IEN) ;
GETRESP(IEN) ;
MSGHIST(RES,IEN) ;
RRDELTA(DELTAS,REFREQ,REFRES) ;
CANREQ(ERXIEN,LINE,PMODE) ;
ALG(LINE) ;
RELATED(ERXIEN) ; Finds the Related eRx based on the Prescriber Order #
; Input: ERXIEN - Pointer the ERX HOLDING QUEUE (#52.49)

External References

Name Field # of Occurrence
$$FIND1^DIC RESOLV+4, GETREQ+3, GETRESP+3
FIELD^DID RRDELTA+11, RRDELTA+31
FILE^DIE ERR+7, ADDCOMM+12
UPDATE^DIE ERR+14, GETSTAT+11
$$GET1^DIQ FINDPAT+6, FINDPAT+7, FINDPRE+11, FINDPRE+21, FINDPRE+26, ERR+15, ERR+18, GETSTAT+9, GETSTAT+14, GETSTAT+17
, GETSTAT+18, ADDCOMM+5, ADDCOMM+7, RESOLV+2, GETREQ+2, GETRESP+2, MSGHIST+4, RRDELTA+8, RRDELTA+9, RRDELTA+17
, RRDELTA+21, CANREQ+5, CANREQ+7, CANREQ+8, CANREQ+9, CANREQ+11, CANREQ+12, CANREQ+13, CANREQ+14, CANREQ+25
, CANREQ+33, CANREQ+34, ALG+3, RELATED+5, RELATED+6, RELATED+7, RELATED+8, RELATED+12, RELATED+13
GETS^DIQ RRDELTA+18, RRDELTA+22
^DIR ADDCOMM+6, ADDCOMM+7
EN1^GMRADPT ALG+4
REF^PSOERSE1 ADDCOMM+13
$$PRESOLV^PSOERXA1 ERR+12, GETSTAT+3, GETSTAT+4, GETSTAT+5, GETSTAT+7, GETSTAT+11, GETSTAT+12, GETSTAT+23
TXT2ARY^PSOERXD1 CANREQ+27
UPDSTAT^PSOERXU1 ERR+19, ERR+20, ERR+21, ERR+22, GETSTAT+10, GETSTAT+15, GETSTAT+18
$$RESOLV^PSOERXU2 CANREQ+5
$$FINDNRX^PSOERXU6 CANREQ+6
DIRE^PSOERXX1 ADDCOMM+4
ALLERGY^PSOORUT2 ALG+8
REMOTE^PSOORUT2 ALG+10
^PSOORUT3 ALG+12
FULL^VALM1 ADDCOMM+2
CNTRL^VALM10 CANREQ+17, CANREQ+18, CANREQ+19, CANREQ+20, CANREQ+21, CANREQ+22, CANREQ+23, CANREQ+31, CANREQ+32, CANREQ+35
, CANREQ+36
SET^VALM10 CANREQ+15, CANREQ+16, CANREQ+17, CANREQ+18, CANREQ+19, CANREQ+20, CANREQ+21, CANREQ+22, CANREQ+23, CANREQ+24
, CANREQ+30, CANREQ+35, CANREQ+36, CANREQ+37, ALG+17
$$NOW^XLFDT ADDCOMM+11
$$UP^XLFSTR FINDPRE+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,">>> Add Comments may not be selected at this point."
  • Line Location: ADDCOMM+4
Function Call: WRITE
  • Prompt: !!,"This option can only be used to add comments to request and response message",!,"types."
  • Line Location: ADDCOMM+6
Routine Call
  • DIC
  • Line Location:
    • RESOLV+4
    • GETREQ+3
    • GETRESP+3
Routine Call
  • DIE
  • Line Location:
    • ERR+7
    • ADDCOMM+12
Routine Call
  • DIE
  • Line Location:
    • ERR+14
    • GETSTAT+11
Routine Call
  • DIR
  • Line Location:
    • ADDCOMM+6
    • ADDCOMM+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.45 - [#52.45] GET1^DIQ
^PS(52.46 - [#52.46] GET1^DIQ
^PS(52.48 - [#52.48] GET1^DIQ
^PS(52.49 - [#52.49] FIELD^DID,  FIND1^DIC,  GET1^DIQ
52.49201 GET1^DIQ
52.4949 FIELD^DID,  GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.45 - [#52.45] GETSTAT+22
^PS(52.46 - [#52.46] FINDPAT+3, FINDPAT+5
^PS(52.48 - [#52.48] FINDPRE+10, FINDPRE+11, FINDPRE+15, FINDPRE+16, FINDPRE+20, FINDPRE+25, FINDPRE+29
^PS(52.49 - [#52.49] ERR+13, MSGHIST+3, RRDELTA+15, RRDELTA+19, RELATED+10, RELATED+11
^TMP("PSOPI" ALG+7*, ALG+8*, ALG+9*, ALG+11*, ALG+14, ALG+15, ALG+18!
^TMP($J ERR+2
^XUSEC("PSO ERX VIEW" ADDCOMM+4

Label References

Name Line Occurrences
$$RELATED RESOLV+5
$$RESOLV ERR+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AL1 FINDPAT~, FINDPAT+10
ALGINFO ALG+1~
ALGLINE ALG+1~, ALG+2*
CANSTAT CANREQ+1~, CANREQ+13*, CANREQ+14*, CANREQ+19
COMM CANREQ+1~, CANREQ+11*, CANREQ+25*, CANREQ+26*, CANREQ+27
COMMARY CANREQ+1~, CANREQ+27
COMMARY( CANREQ+28, CANREQ+29
COMMBY CANREQ+1~, CANREQ+33*, CANREQ+35
COMMDTTM CANREQ+1~, CANREQ+34*, CANREQ+36
CTXT CANREQ+1~, CANREQ+29*, CANREQ+30, CANREQ+31, CANREQ+32
DA ADDCOMM+1~, ADDCOMM+7!
DEA FINDPRE~, FINDPRE+7*, FINDPRE+9, FINDPRE+11, FINDPRE+14, FINDPRE+16, FINDPRE+19, FINDPRE+24, FINDPRE+26
DELTAS RRDELTA~
DELTAS( RRDELTA+13*, RRDELTA+33*
DESCODE ERR+1~, ERR+11*, ERR+12*, ERR+13, ERR+14
DFN ALG+1~, ALG+3*
DIR ADDCOMM+1~, ADDCOMM+6!
DIR("B" ADDCOMM+7*
DIR(0 ADDCOMM+6*, ADDCOMM+7*
DNB CANREQ+1~, CANREQ+6*, CANREQ+23
DONE ERR+1~, ERR+8*, ERR+9, ERR+10*, RRDELTA+1~, RRDELTA+5*, RRDELTA+6, RRDELTA+7*, RRDELTA+23*, RRDELTA+24
, RRDELTA+25*
DUZ ADDCOMM+4, ADDCOMM+10
ECODE ERR+1~, ERR+3*, ERR+5
ERRTEXT ERR+1~, ERR+4*, ERR+6
ERX RELATED+4~, RELATED+9*, RELATED+11*, RELATED+12, RELATED+13
ERXIEN ERR~, ERR+5, ERR+6, ERR+13, ERR+14, ERR+15, ERR+16, ERR+19, ERR+20, ERR+21
, ERR+22, ADDCOMM~, ADDCOMM+5, ADDCOMM+7, ADDCOMM+9, ADDCOMM+10, ADDCOMM+11, CANREQ~, CANREQ+4, CANREQ+5
, RELATED~, RELATED+5, RELATED+6, RELATED+7, RELATED+8
ERXPAT RELATED+4~, RELATED+8*, RELATED+10, RELATED+11
ERXTYP ERR+1~, ERR+15*
ESTAT GETSTAT+1~, GETSTAT+5*, GETSTAT+7*, GETSTAT+19, GETSTAT+20*, GETSTAT+21, GETSTAT+22, GETSTAT+23
FDA ERR+7!, ERR+14!, ADDCOMM+1~
FDA( ERR+5*, ERR+6*, ERR+14*, ADDCOMM+9*, ADDCOMM+10*, ADDCOMM+11*
FIELD RRDELTA+2~
FIELD("LABEL" RRDELTA+12
FLD RRDELTA+2~, RRDELTA+7*, RRDELTA+8, RRDELTA+9, RRDELTA+11
FLDNM RRDELTA+1~, RRDELTA+12*, RRDELTA+13
FLDS RRDELTA+1~, RRDELTA+4*, RRDELTA+7
FOUND FINDPRE+5~, FINDPRE+10*, FINDPRE+11*, FINDPRE+15*, FINDPRE+16*, FINDPRE+20*, FINDPRE+21*, FINDPRE+25*, FINDPRE+26*, RRDELTA+1~
, RRDELTA+15*, RRDELTA+17*, RRDELTA+19*, RRDELTA+21*
GL ERR+1~, ERR+2*, ERR+3, ERR+4, ERR+10, ERR+11
GMRAL ALG+1~, ALG+6, ALG+7, ALG+8, ALG+12
HUBID CANREQ+1~, CANREQ+7*
I ERR+1~, ERR+9*, ERR+10, ERR+11, RRDELTA+1~, RRDELTA+6*, RRDELTA+7, RRDELTA+24*, RRDELTA+25, CANREQ+1~
, CANREQ+28*, CANREQ+29, CANREQ+31
IDOB FINDPAT~, FINDPAT+10
IEN RESOLV~, RESOLV+2, RESOLV+5, GETREQ~, GETREQ+2, GETRESP~, GETRESP+2, MSGHIST~, MSGHIST+3, MSGHIST+4
, ALG+1~, ALG+5*, ALG+7*, ALG+8, ALG+9*, ALG+11*
IGEN FINDPAT~, FINDPAT+10
>> IOINHI CANREQ+17, CANREQ+19, CANREQ+20, CANREQ+21, CANREQ+22, CANREQ+23, CANREQ+31, CANREQ+32, CANREQ+35, CANREQ+36
>> IOINORM CANREQ+17, CANREQ+19, CANREQ+20, CANREQ+21, CANREQ+22, CANREQ+23, CANREQ+31, CANREQ+32, CANREQ+35, CANREQ+36
>> IORVOFF CANREQ+18
>> IORVON CANREQ+18
>> IOUOFF CANREQ+17
>> IOUON CANREQ+17
LDAT ALG+1~, ALG+15*, ALG+17
LINE CANREQ~, CANREQ+15*, CANREQ+16*, CANREQ+17, CANREQ+18*, CANREQ+19*, CANREQ+20*, CANREQ+21*, CANREQ+22*, CANREQ+23*
, CANREQ+24*, CANREQ+30*, CANREQ+31, CANREQ+32, CANREQ+35*, CANREQ+36*, CANREQ+37*, ALG~, ALG+16*, ALG+17
MATCH FINDPAT+1~
MATCH( FINDPAT+10*
MATCH("" FINDPAT+11
MID GETRESP+1~, GETRESP+2*, GETRESP+3
MPAT FINDPAT+1~, FINDPAT+11*, FINDPAT+12
MSGDT RELATED+4~, RELATED+9*, RELATED+10*, RELATED+11
MTCHCNT FINDPAT+1~, FINDPAT+4*, FINDPAT+10*
MTYPE ERR~, ERR+2, GETSTAT~, GETSTAT+3, GETSTAT+4, GETSTAT+5, GETSTAT+7, GETSTAT+8, GETSTAT+13, GETSTAT+16
, GETSTAT+20, ADDCOMM+1~, ADDCOMM+5*, ADDCOMM+6
NAME FINDPAT~, FINDPAT+3, FINDPAT+5, FINDPRE~, FINDPRE+7*, FINDPRE+9, FINDPRE+11, FINDPRE+19, FINDPRE+21, FINDPRE+24
, FINDPRE+26, FINDPRE+29
NPI FINDPRE~, FINDPRE+7*, FINDPRE+9, FINDPRE+10, FINDPRE+14, FINDPRE+15, FINDPRE+19, FINDPRE+20, FINDPRE+24, FINDPRE+25
NWRXIEN ERR+1~
PAL1 FINDPAT+1~, FINDPAT+7*, FINDPAT+10
PDOB FINDPAT+1~, FINDPAT+6*, FINDPAT+10
PGEN FINDPAT+1~, FINDPAT+6*, FINDPAT+10
PIEN FINDPAT+1~, FINDPAT+5*, FINDPAT+6, FINDPAT+7, FINDPAT+10
PMODE CANREQ~
PREMTCH FINDPRE+5~, FINDPRE+9, FINDPRE+10*, FINDPRE+11, FINDPRE+14, FINDPRE+15*, FINDPRE+16, FINDPRE+19, FINDPRE+20*, FINDPRE+21
, FINDPRE+24, FINDPRE+25*, FINDPRE+26
PREORDER RELATED+4~, RELATED+7*, RELATED+13
>> PSOIEN ALG+3
PSONOAL ALG+1~, ALG+8*!
PSSN FINDPAT+1~, FINDPAT+7*, FINDPAT+9
REFREQ RRDELTA~, RRDELTA+8, RRDELTA+15, RRDELTA+16
REFRES RRDELTA~, RRDELTA+9, RRDELTA+19, RRDELTA+20
RELATED RELATED+4~, RELATED+9*, RELATED+10, RELATED+11, RELATED+13*, RELATED+14
RELIEN MSGHIST+1~, MSGHIST+4*, MSGHIST+5
REQARY RRDELTA+1~
REQBY CANREQ+1~, CANREQ+8*, CANREQ+21
REQDAT RRDELTA+2~
REQDAT( RRDELTA+27
REQDTTM CANREQ+1~, CANREQ+9*, CANREQ+22
REQIEN ERR+1~, ERR+16*, ERR+17, ERR+18, ERR+20, ERR+21, CANREQ+1~, CANREQ+4*, CANREQ+5*, CANREQ+6
, CANREQ+7, CANREQ+8, CANREQ+9, CANREQ+11, CANREQ+12, CANREQ+13, CANREQ+25, CANREQ+33, CANREQ+34
REQIENS RRDELTA+1~, RRDELTA+16*, RRDELTA+17, RRDELTA+18, RRDELTA+27
REQSIEN RRDELTA+1~, RRDELTA+15*, RRDELTA+16
REQTYP ERR+1~, ERR+18*, ERR+19, ERR+20, ERR+21, RRDELTA+1~, RRDELTA+17*
REQVAL RRDELTA+2~, RRDELTA+8*, RRDELTA+10, RRDELTA+13
RES RESOLV+1~, GETREQ+4, GETRESP+4, MSGHIST~
RES( MSGHIST+5*
RESARY RRDELTA+1~
RESDAT RRDELTA+2~
RESDAT( RRDELTA+28
RESIENS RRDELTA+1~, RRDELTA+20*, RRDELTA+21, RRDELTA+22, RRDELTA+28
RESSIEN RRDELTA+2~, RRDELTA+19*, RRDELTA+20
RESTAT GETSTAT+1~, GETSTAT+11*, GETSTAT+12*
RESTYP RRDELTA+1~, RRDELTA+21*
RESTYPE CANREQ+1~, CANREQ+12*, CANREQ+18, CANREQ+20
RESVAL RRDELTA+2~, RRDELTA+9*, RRDELTA+10, RRDELTA+13
RTHID GETSTAT~, GETSTAT+5, GETSTAT+6, RESOLV+1~, RESOLV+2*, RESOLV+3, RESOLV+4
RTHIEN RESOLV+1~, RESOLV+4*, RESOLV+5*, RESOLV+6, RESOLV+7, GETREQ+1~, GETREQ+3*, GETREQ+4, GETREQ+5, GETRESP+1~
, GETRESP+3*, GETRESP+4, GETRESP+5
RTMID GETSTAT~, GETSTAT+5, GETREQ+1~, GETREQ+2*, GETREQ+3
RTMIEN GETSTAT+1~, GETSTAT+6*, GETSTAT+7, GETSTAT+8, GETSTAT+9, GETSTAT+10, GETSTAT+11, GETSTAT+13, GETSTAT+14, GETSTAT+15
, GETSTAT+16, GETSTAT+17, GETSTAT+18
RTMTYPE GETSTAT+1~, GETSTAT+9*, GETSTAT+10, GETSTAT+11, GETSTAT+14*, GETSTAT+15, GETSTAT+17*, GETSTAT+18
>> SDERXFLG CANREQ+15, CANREQ+17, CANREQ+24, CANREQ+37
SFIELD RRDELTA+2~
SFIELD("LABEL" RRDELTA+32
SFLD RRDELTA+1~, RRDELTA+25*, RRDELTA+27, RRDELTA+28, RRDELTA+30, RRDELTA+31
SFLDNM RRDELTA+1~, RRDELTA+32*, RRDELTA+33
SFLDS RRDELTA+1~, RRDELTA+14*, RRDELTA+18, RRDELTA+22, RRDELTA+25
SIEN MSGHIST+1~, MSGHIST+2*, MSGHIST+3*, MSGHIST+4
SREQVAL RRDELTA+1~, RRDELTA+26*, RRDELTA+27*, RRDELTA+29, RRDELTA+33
SRESVAL RRDELTA+1~, RRDELTA+26*, RRDELTA+28*, RRDELTA+29, RRDELTA+30*, RRDELTA+33
SSN FINDPAT~, FINDPAT+9
STFDA GETSTAT+1~, GETSTAT+11!
STFDA( GETSTAT+11*
U RRDELTA+13, RRDELTA+33
>> VALMBCK ADDCOMM+3*
X ALG+1~, ALG+14*, ALG+15
Y ADDCOMM+1~, ADDCOMM+8, ADDCOMM+9
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