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

Package: Drug Accountability

Routine: PSAREC1


Information

PSAREC1 ;BIR/LTL,JMB-Receiving Directly into Drug Accountability - CONT'D ;7/23/97

Source Information

Source file <PSAREC1.m>

Entry Points

Name Comments DBIA/ICR reference
POST ;Posts the data in 58.8, 58.81, and 50
MONTHLY
TR
FIND
ACT
50
NEXT
SYNONYM
PRICEHLP ;Extended help for price per order unit

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There were ",$S($P($G(^PSD(58.8,PSALOC,1,PSADRG,0)),"^",4):$P($G(^(0)),"^",4),1:0)," on hand.",?40,"There are now ",$P($G(^(0)),"^",4)+PSAREC," on hand.",!
  • Line Location: POST+7
Function Call: WRITE
  • Prompt: !,"Updating monthly receipts and transaction history.",!
  • Line Location: MONTHLY+8
Function Call: WRITE
  • Prompt: !?5,"Enter the cost for each order unit."
  • Line Location: PRICEHLP+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] Classic Fileman Calls
^PSD(58.8 - [#58.8] Classic Fileman Calls
^PSD(58.81 - [#58.81] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call