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

Package: Inpatient Medications

Routine: PSJBCMA1


Information

PSJBCMA1 ;BIR/MV-RETURN INFORMATION FOR AN ORDER ; 5/4/16 1:09pm

Source Information

Source file <PSJBCMA1.m>

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,ON,PSJTMP,PSJIGS2B,PSJEXIST)
  • ICR #2829
    • Status: Active
    • Usage: Controlled Subscription
    UDVAR ;* Set ^TMP for Unit dose & Pending orders
    IVVAR ;* Set variables for IV and pending orders
    UDPEND ;
    TMP ;* Setup ^TMP that have common fields between IV and U/D
    NAME(X,NAME,INIT,IEN)
    DATE(Y) ; FM internal date/time to user readable, 4 digit year
    ; Y - date in FileMan internal format
    STATUS(ON,X)
    ADMIN(X) ; N
    MVOPIAL(DFN,PSJI1,PSJI2) ; Move Other Print Info Activity log entries from NV order to Active order, during Verification
    OPIWARN(AFTER) ; Warn user about OPI not printing on IV labels

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!?5,$E(PSJSTARZ,1,29)," WARNING ",$E(PSJSTARZ,1,31)
    • Line Location: OPIWARN+2
    Function Call: WRITE
    • Prompt: !?5,"**",$S(AFTER:" ",1:" If "),"OTHER PRINT INFO exceeds 60 characters"_$S(AFTER:"! **",1:", **")
    • Line Location: OPIWARN+3
    Function Call: WRITE
    • Prompt: !?5,"** 'Instructions too long. See Order View or BCMA for full text.' **"
    • Line Location: OPIWARN+4
    Function Call: WRITE
    • Prompt: !?5,"** will print on the IV label instead of the full text. **",!?5,PSJSTARZ
    • Line Location: OPIWARN+5
    Function Call: WRITE
    • Prompt: !!
    • Line Location: OPIWARN+6

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^VA(200 - [#200] Classic Fileman Calls
    ^PS(50.7 - [#50.7] GET1^DIQ
    ^PS(51.2 - [#51.2] GET1^DIQ
    ^PS(53.46 - [#53.46] GET1^DIQ
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call