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

Package: Outpatient Pharmacy

Routine: PSOERXH1


Information

PSOERXH1 ;ALB/BWF - eRx Utilities/RPC's ; 8/3/2016 5:14pm

Source Information

Source file <PSOERXH1.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Outpatient Pharmacy 6 REF^PSOERSE1  $$PRESOLV^PSOERXA1  BATCHHLD^PSOERXH2  UPDSTAT^PSOERXU1  $$EFFDATE^PSOERXU5  $$DONOTFIL^PSOERXUT  
VA FileMan 4 ^DIC  (,UPDATE)^DIE  $$GET1^DIQ  ^DIR  
Kernel 2 ($$FMADD,$$FMTE,$$NOW)^XLFDT  $$SENTENCE^XLFSTR  
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: 5

Package Total Caller Graph
Outpatient Pharmacy 4 PSO ERX HOLD  PSO ERX UNHOLD  PSOERPC2  PSOERPT0  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
HOLD ;
NSTAT(IEN,STAT,COMM) ;
HDIR(HTYP) ;
UNHOLD ;
UHSTS(ERXIEN) ; Returns the eRx status after it's un-held
; Input: ERXIEN - Pointer to the eRx being worked on (Pointer to #52.49)

External References

Name Field # of Occurrence
^DIC HDIR+4
^DIE HOLD+31, HOLD+51, UNHOLD+52
UPDATE^DIE NSTAT+6
$$GET1^DIQ HOLD+2, HOLD+6, HOLD+7, HOLD+14, HOLD+15, HOLD+42, HOLD+43, HOLD+52, UNHOLD+4, UNHOLD+5
UNHOLD+6, UNHOLD+11, UNHOLD+20, UNHOLD+42, UNHOLD+44, UNHOLD+48, UNHOLD+54, UHSTS+5, UHSTS+6, UHSTS+8
, UHSTS+11
^DIR HOLD+10, HOLD+21, HOLD+27, HOLD+28, HOLD+29, HOLD+39, HOLD+40, HOLD+45, HOLD+47, UNHOLD+9
UNHOLD+14, UNHOLD+17, UNHOLD+24, UNHOLD+49, UNHOLD+55
REF^PSOERSE1 HOLD+33, HOLD+57, UNHOLD+15, UNHOLD+50, UNHOLD+58
$$PRESOLV^PSOERXA1 UNHOLD+30, UNHOLD+46, UNHOLD+51, UHSTS+7, UHSTS+10
BATCHHLD^PSOERXH2 HOLD+56, UNHOLD+57
UPDSTAT^PSOERXU1 HOLD+52, UNHOLD+31, UNHOLD+47, UNHOLD+53
$$EFFDATE^PSOERXU5 HOLD+44
$$DONOTFIL^PSOERXUT HOLD+5, UNHOLD+3
FULL^VALM1 HOLD+4, UNHOLD+2
$$FMADD^XLFDT HOLD+43
$$FMTE^XLFDT HOLD+44
$$NOW^XLFDT NSTAT+2
$$SENTENCE^XLFSTR UNHOLD+48, UNHOLD+54

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Cannot hold a prescription with a status of 'Rejected', 'Removed',",!,"or 'Processed",!
  • Line Location: HOLD+9
Function Call: WRITE
  • Prompt: !!,"Cannot hold a renewal response record that is in 'Complete', 'Processed', or 'Error' status.",!
  • Line Location: HOLD+12
Function Call: WRITE
  • Prompt: !
  • Line Location: HOLD+16
Function Call: WRITE
  • Prompt: !!,"Hold Reason required. eRx not placed in a 'Hold' status."
  • Line Location: HOLD+26
Function Call: WRITE
  • Prompt: !,"eRx NOT placed on hold."
  • Line Location: HOLD+29
Function Call: WRITE
  • Prompt: !!,"Hold Reason required. eRx not placed in a 'Hold' status."
  • Line Location: HOLD+38
Function Call: WRITE
  • Prompt: !,"eRx NOT placed on hold."
  • Line Location: HOLD+40
Function Call: WRITE
  • Prompt: !!,$G(IOINHI),"The eRx will be un-held automatically on the date you enter below and placed"
  • Line Location: HOLD+41
Function Call: WRITE
  • Prompt: !,"in '",$$GET1^DIQ(52.45,$$GET1^DIQ(52.49,PSOIEN,1,"I"),.02),"' status.",$G(IOINORM)
  • Line Location: HOLD+42
Function Call: WRITE
  • Prompt: !
  • Line Location: HOLD+43
Function Call: WRITE
  • Prompt: !
  • Line Location: HOLD+47
Function Call: WRITE
  • Prompt: !,"Updating..."
  • Line Location: HOLD+50
Function Call: WRITE
  • Prompt: "done.",$C(7)
  • Line Location: HOLD+53
Function Call: WRITE
  • Prompt: !!,"Cannot un-hold a prescription with a status of 'Rejected', 'Removed',",!,"or 'Processed",!
  • Line Location: UNHOLD+8
Function Call: WRITE
  • Prompt: !
  • Line Location: UNHOLD+10
Function Call: WRITE
  • Prompt: !,"eRx removed from hold status, and moved to '"_$$SENTENCE^XLFSTR($$GET1^DIQ(52.45,RXSTATI,.02,"E"))_"'."
  • Line Location: UNHOLD+54
Routine Call
  • DIC
  • Line Location:
    • HDIR+4
Routine Call
  • DIE
  • Line Location:
    • HOLD+31
    • HOLD+51
    • UNHOLD+52
Routine Call
  • DIE
  • Line Location:
    • NSTAT+6
Routine Call
  • DIR
  • Line Location:
    • HOLD+10
    • HOLD+21
    • HOLD+27
    • HOLD+28
    • HOLD+29
    • HOLD+39
    • HOLD+40
    • HOLD+45
    • HOLD+47
    • UNHOLD+9
    • UNHOLD+14
    • UNHOLD+17
    • UNHOLD+24
    • UNHOLD+49
    • UNHOLD+55

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.45 - [#52.45] Classic Fileman Calls,  GET1^DIQ
^PS(52.49 - [#52.49] GET1^DIQ
52.4919 GET1^DIQ
^PS(59.7 - [#59.7] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.45 - [#52.45] HOLD+40, HOLD+56
^PS(52.49 - [#52.49] UNHOLD+35, UNHOLD+39, UNHOLD+40, UNHOLD+43

Label References

Name Line Occurrences
$$HDIR HOLD+24, HOLD+36
$$NSTAT HOLD+32
$$UHSTS UNHOLD+51

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
COMM NSTAT~, NSTAT+5
CSTATI HOLD+1~, HOLD+14*
CURSTAT HOLD+1~, HOLD+15*, HOLD+17
DA HOLD+1~, HOLD+27!, HOLD+28!, HOLD+31*, HOLD+47!, HOLD+51*, UNHOLD+1~, UNHOLD+13!, UNHOLD+52*
DIC HDIR+1~, HDIR+3*, HDIR+4!
DIC("A" HDIR+2*
DIC("S" HDIR+3*
DIC(0 HDIR+3*
DIE HOLD+1~, HOLD+31*!, HOLD+51!*, UNHOLD+1~, UNHOLD+52!*
DIR HOLD+1~, HOLD+23!, HOLD+27!, HOLD+28!, HOLD+29!, HOLD+40!, HOLD+43!, HOLD+47!, UNHOLD+1~, UNHOLD+13!
UNHOLD+17!, UNHOLD+24!, UNHOLD+49!, UNHOLD+55!
DIR("A" HOLD+19*, HOLD+20*, HOLD+28*, HOLD+45*, HOLD+47*, UNHOLD+17*
DIR("B" HOLD+18*, HOLD+44*, UNHOLD+24*
DIR(0 HOLD+10*, HOLD+18*, HOLD+27*, HOLD+28*, HOLD+29*, HOLD+39*, HOLD+40*, HOLD+43*, HOLD+47*, UNHOLD+9*
UNHOLD+13*, UNHOLD+17*, UNHOLD+24*, UNHOLD+49*, UNHOLD+55*
>> DIROUT HOLD+40, HOLD+45
>> DIRUT HOLD+40, HOLD+45
DR HOLD+1~, HOLD+31*, HOLD+51*, UNHOLD+1~, UNHOLD+52*
DT HOLD+43
DUZ NSTAT+4
ERXIEN UHSTS~, UHSTS+5, UHSTS+6
FDA NSTAT+6!
FDA( NSTAT+2*, NSTAT+3*, NSTAT+4*, NSTAT+5*
HCOMM HOLD+1~, HOLD+30*, HOLD+32, HOLD+49*, HOLD+52, HOLD+56
HFFDT HOLD+1~, HOLD+36*, HOLD+46*, HOLD+51, HOLD+52
HFFHOLD UNHOLD+1~, UNHOLD+6*, UNHOLD+52, UNHOLD+57
HOLDIEN UNHOLD+1~, UNHOLD+20*, UNHOLD+57
HTYP HDIR~
IEN NSTAT~, NSTAT+2, NSTAT+3, NSTAT+4, NSTAT+5
>> IOINHI HOLD+41
>> IOINORM HOLD+42
LKNOWN UNHOLD+33~, UNHOLD+43*, UNHOLD+44
LKNOWNE UNHOLD+33~, UNHOLD+36*, UNHOLD+37*, UNHOLD+38*, UNHOLD+44*, UNHOLD+45*, UNHOLD+46, UNHOLD+47
LMATCH HOLD+1~
LSFOUND UNHOLD+33~, UNHOLD+34*, UNHOLD+39, UNHOLD+42*
LSLOOP UNHOLD+33~, UNHOLD+39*, UNHOLD+40, UNHOLD+43
LSTAT HOLD+1~, UNHOLD+33~, UNHOLD+41*, UNHOLD+42
MBMSITE HOLD+1~, HOLD+2*, HOLD+8, UNHOLD+7
MTYPE HOLD+1~, HOLD+6*, UNHOLD+1~, UNHOLD+4*, UNHOLD+36, UNHOLD+37, UNHOLD+38, UHSTS+4~, UHSTS+5*, UHSTS+7
, UHSTS+10
NEWSIEN UNHOLD+1~
NEWSTAT HOLD+1~
NEWSTAT( NSTAT+8
NEWSTAT(0 NSTAT+7
PEND UNHOLD+1~, UNHOLD+5*, UNHOLD+28, UNHOLD+29, UNHOLD+32
>> PSOIEN HOLD+3, HOLD+5, HOLD+6, HOLD+7, HOLD+14, HOLD+15, HOLD+31, HOLD+32, HOLD+42, HOLD+43
HOLD+44, HOLD+51, HOLD+52, HOLD+56, UNHOLD+3, UNHOLD+4, UNHOLD+5, UNHOLD+6, UNHOLD+11, UNHOLD+20
UNHOLD+31, UNHOLD+35, UNHOLD+39, UNHOLD+40, UNHOLD+43, UNHOLD+44, UNHOLD+47, UNHOLD+51, UNHOLD+52, UNHOLD+53
UNHOLD+57
>> PSORFRSH HOLD+34*, HOLD+54*
QUIT UNHOLD+1~, UNHOLD+25*, UNHOLD+26
RESP HOLD+1~, HOLD+24*, HOLD+25, HOLD+31, HOLD+32, HOLD+36*, HOLD+37, HOLD+40, HOLD+52, HOLD+56
RXSTAT HOLD+1~, HOLD+7*, HOLD+8, HOLD+11, UNHOLD+1~, UNHOLD+6*, UNHOLD+7, UNHOLD+22, UNHOLD+28, UNHOLD+51*
UNHOLD+53
RXSTATI UNHOLD+1~, UNHOLD+30*, UNHOLD+46*, UNHOLD+48, UNHOLD+51*, UNHOLD+54
STAT NSTAT~, NSTAT+3
STDAT UNHOLD+33~, UNHOLD+40*, UNHOLD+41
STSIEN UHSTS+4~, UHSTS+7*, UHSTS+8, UHSTS+9, UHSTS+10*, UHSTS+11
SUBFIEN HOLD+1~, HOLD+32*, NSTAT+1~, NSTAT+7*, NSTAT+8*, NSTAT+9
U HDIR+6, HDIR+7, UNHOLD+41
>> UHCOMM UNHOLD+19*, UNHOLD+31, UNHOLD+47, UNHOLD+53, UNHOLD+57
UHSTS UHSTS+4~, UHSTS+8*, UHSTS+11*, UHSTS+12
>> VALMAR HOLD+33, UNHOLD+15, UNHOLD+50, UNHOLD+58
>> VALMBCK HOLD+4*, HOLD+16*, UNHOLD+2*
X HDIR+1~
Y HOLD+22, HOLD+29, HOLD+30, HOLD+35!, HOLD+46, HOLD+48, HOLD+49, HDIR+1~, HDIR+5, HDIR+6
, HDIR+7, UNHOLD+1~, UNHOLD+18, UNHOLD+19, UNHOLD+25
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