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

Package: Pharmacy Data Management

Routine: PSSGIU


Information

PSSGIU ;BIR/CML-GENERIC "APPLICATION PACKAGES' USE" SET; Jun 04, 2024@14:00

Source Information

Source file <PSSGIU.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
  • ICR #895
    • Status: Active
    • Usage: Controlled Subscription
    DONE ;
    MQ ;
    CMOP
    ENS ;
  • ICR #208
    • Status: Active
    • Usage: Private
  • ICR #895
    • Status: Active
    • Usage: Controlled Subscription
    END ;
  • ICR #208
    • Status: Active
    • Usage: Private
  • ICR #895
    • Status: Active
    • Usage: Controlled Subscription
    ENIU ; mark/unmark drugs for Unit Dose use
    ENIUH ;

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,"A",PSIUT," ITEM"
    • Line Location: EN+2
    Function Call: WRITE
    • Prompt: !!?2
    • Line Location: MQ+2
    Function Call: WRITE
    • Prompt: !
    • Condition for execution: $X+$L(Y)>79
    • Line Location: MQ+2
    Function Call: WRITE
    • Prompt: Y," "
    • Line Location: MQ+2
    Function Call: WRITE
    • Prompt: !,"This item has just been UNMARKED for CMOP transmission.",!
    • Line Location: CMOP+0
    Function Call: WRITE
    • Prompt: !
    • Line Location: ENIU+5
    Function Call: WRITE
    • Prompt: "..."
    • Line Location: ENIU+13
    Function Call: WRITE
    • Prompt: "UN"
    • Condition for execution: PSGY="U"
    • Line Location: ENIU+14
    Function Call: WRITE
    • Prompt: "MARKED..."
    • Line Location: ENIU+14
    Function Call: WRITE
    • Prompt: !!?2,"Enter 'M' to mark items for use by the Unit Dose Medications package."
    • Line Location: ENIUH+1
    Function Call: WRITE
    • Prompt: " (You",!,"will only be shown items that have not been marked for Unit Dose.)"
    • Line Location: ENIUH+2
    Function Call: WRITE
    • Prompt: !?2,"Enter 'U' to unmark items that have previously been marked for use with Unit"
    • Line Location: ENIUH+3
    Function Call: WRITE
    • Prompt: !,"Dose. (You will be shown only items that have already been marked for Unit",!,"Dose.)"
    • Line Location: ENIUH+4
    Function Call: WRITE
    • Prompt: !!,"Choose from:",!?3,"M MARK ITEMS FOR UNIT DOSE",!?3,"U UNMARK ITEMS FOR UNIT DOSE"
    • Line Location: ENIUH+5

    FileMan Files Accessed Via FileMan Db Call

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