Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSOCAN4

Package: Outpatient Pharmacy

Routine: PSOCAN4


Information

PSOCAN4 ;BIR/SAB - rx speed dc listman ;10/23/06 11:50am

Source Information

Source file <PSOCAN4.m>

Entry Points

Name Comments DBIA/ICR reference
SEL
ULP
RX
ACT
PEN ;discontinue pending orders
OK
NOOR ;ask nature of order
NOORXP
NOORX
DEL ;deletes non-verified Rxs
; PSO*7*508 - if this is an eRx being deleted, do not prompt the user since there is no user to reply
; - since this cancellation will be sent by the provider, PSONOOR is set to "E"
EX
REQ ;prompt for requesting provider
RQTEST ;
MEDDIS ;
REF ;CONT. FROM REF^PSOCAN2; PSO*7*259
ELIG(DFN) ; Return primary eligibility
; Input:
; DFN: Patient IEN (required)
; Output:
; "": No DFN passed in, 0: Veteran, 1: TRICARE, 2: CHAMPVA

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!,$P($G(PSOMSG),"^",2),!,"Rx "_$P(^PSRX(PSORXIEN,0),"^"),!
  • Line Location: RX+4
Function Call: WRITE
  • Prompt: $C(7),!!,"Digitally Signed Order - PSDRPH key required"
  • Line Location: RX+6
Function Call: WRITE
  • Prompt: $C(7),!!,$P($G(PSOMSG),"^",2)_" (Pending order)",!
  • Line Location: PEN+3
Function Call: WRITE
  • Prompt: $C(7),!!,"Digitally Signed Order - PSDRPH key required"
  • Line Location: PEN+5
Function Call: WRITE
  • Prompt: !
  • Line Location: REQ+5
Function Call: WRITE
  • Prompt: "Drug: "_$P($G(^PSDRUG(+$P(^PS(52.41,ORD,0),"^",9),0)),"^")
  • Line Location: MEDDIS+4
Function Call: WRITE
  • Prompt: "Orderable Item: "_$P($G(^PS(50.7,PSOFMMD,0)),"^")_" "_$P($G(^PS(50.606,+$P($G(^PS(50.7,PSOFMMD,0)),"^",2),0)),"^")
  • Line Location: MEDDIS+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.41 - [#52.41] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call