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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSOORDRG

Package: Outpatient Pharmacy

Routine: PSOORDRG


Information

PSOORDRG ;BIR/SAB - order entry drug selection ;11/13/97

Source Information

Source file <PSOORDRG.m>

Entry Points

Name Comments DBIA/ICR reference
EN(PSODFN,DREN) ;
  • ICR #2190
    • Status: Active
    • Usage: Controlled Subscription
    DRG ;S X=DREN,DIC="^PSDRUG(",DIC(0)="MQNZO" D ^DIC K DIC,PSOY Q:Y<1 S PSOY=Y,PSOY(0)=Y(0) K X,Y
    EXIT
    BLD
    BUILD ;build profiles
    BLDOI ;If no DD/non-standard dose, get all drugs for OI
    SETTMP ;Create ^TMP($J,"ORDERS"
    BUILDX
    GET ;data for profiles
    GETX ;
    CLOZ ;
    DRGCHK(PSODFN,DREN,DDRUG)
  • ICR #2190
    • Status: Active
    • Usage: Controlled Subscription
    OIDRG(PSODFN,PSOI) ;checks every drug tied to orderable item passed by package use
    NVA ;checks existing nva
    NVA1
    REMOTE ;

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^PSDRUG - [#50] GET1^DIQ
    Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call