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

Package: Pharmacy Data Management

Routine: PSSPOIDT


Information

PSSPOIDT ;BIR/RTR/WRT-Date update in Orderable Item File ;02/14/00

Source Information

Source file <PSSPOIDT.m>

Entry Points

Name Comments DBIA/ICR reference
EN(PSPOINT) ;
EN1
  • ICR #4098
    • Status: Active
    • Usage: Private
    SUP(PSSORDIT) ;Supply at Orderable Item
    ENT ;Enter here if coming from Inactive date, or from queued job
    ENTZ
    SET
    REST(PSSREST) ;Ask to reactivate or inactivate others
    ASKQ
    QREST
    LDIS ;list dispense drugs
    DHEAD
    DTE
    DTEX
    NONFORM ;
    MSSG
    NONVA ; Evaluates the Non-VA Med Indicator of the Orderable Item

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !
    • Line Location: ASKQ+0
    Function Call: WRITE
    • Prompt: !,"Please wait..",!
    • Line Location: ASKQ+4
    Function Call: WRITE
    • Prompt: !,"Finished!",!
    • Line Location: ASKQ+4
    Function Call: WRITE
    • Prompt: !,$P($G(^PSDRUG(ZZ,0)),"^")
    • Line Location: LDIS+2
    Function Call: WRITE
    • Prompt: !
    • Line Location: LDIS+10
    Function Call: WRITE
    • Prompt: ?50,Y
    • Line Location: DTE+0
    Function Call: WRITE
    • Prompt: ?50,$G(Y)
    • Line Location: DTEX+0
    Function Call: WRITE
    • Prompt: !!,"This Orderable Item is "_$S($P($G(^PS(50.7,PSSORDIT,0)),"^",12):"Non-Formulary.",1:"Formulary."),!
    • Line Location: MSSG+0
    Function Call: WRITE
    • Prompt: !!,"The Pharmacy Orderable Item ",$P($G(^PS(50.7,PSSORDIT,0)),"^")
    • Line Location: NONVA+13

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^PS(59 - [#59] GET1^DIQ
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call