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
Print Page as PDF
Routine: PSOORROC

Package: Outpatient Pharmacy

Routine: PSOORROC


Information

PSOORROC ;BHAM-ISC/EJW,SAB - Remote Data Interoperability Order Checks ;05/28/08

Source Information

Source file <PSOORROC.m>

Entry Points

Name Comments DBIA/ICR reference
REMOTE(PSODFN,DREN) ;
; Input: DFN: PATIENT file (#2) IEN
; : DREN: DRUG file (#50) IEN of order being checked
PARSE ; PULL INFORMATION FROM ^XTMP
CHKLOCAL ; IF SAME RX NUMBER AND ISSUE DATE - LOCAL RX
VAPROD(PSOPROD) ; GET VA PRODUCT FILE NAME AND DRUG CLASS
DRGNAME ;
FILTER ; FOR SAME DRUG VUID FOR SAME SITE, KEEP 1 ENTRY - CHECK BY ACTIVE STATUS FIRST THEN BY GREATEST EXPIRATION DATE
CHKEXP ;
SETRDI ;
GETPROD ;
RDUP ;display Remote orders - duplicate drug

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?20,FSIG(I),!
  • Line Location: RDUP+7
Function Call: WRITE
  • Prompt: !
  • Line Location: RDUP+12
Function Call: WRITE
  • Prompt: !
  • Line Location: RDUP+12
Info |  Source |  Entry Points |  Interaction Calls