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

Package: Outpatient Pharmacy

Routine: PSOERX1F


Information

PSOERX1F ;ALB/MR - Accept/Un-Accept eRx function ; 8/18/2020 5:14pm

Source Information

Source file <PSOERX1F.m>

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

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+75
Function Call: WRITE
  • Prompt: !,PSOEXMS
  • Line Location: SETUP+118
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

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
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call