Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSAVERA3

Package: Drug Accountability

Routine: PSAVERA3


Information

PSAVERA3 ;BHM/DB - RECORD TRANSACTION & UPDATE DRUG FILE;31JAN00

Source Information

Source file <PSAVERA3.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 3 ^DIC  ^DIE  ^DIR  
Drug Accountability 2 PSANDC1^PSAHELP  RECORD^PSAVER2  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Drug Accountability 1 PSAVERA  

Entry Points

Name Comments DBIA/ICR reference
OU
DRG
UPDATE ;update file
SUPITM
Q

External References

Name Field # of Occurrence
^DIC OU+1, UPDATE+14
^DIE UPDATE+8, UPDATE+15, UPDATE+18
^DIR OU+10
PSANDC1^PSAHELP UPDATE+6
RECORD^PSAVER2 SUPITM

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No change."
  • Line Location: OU+2
Function Call: WRITE
  • Prompt: !,"Old Dispense Units Per Order Unit: "
  • Line Location: DRG+2
Function Call: WRITE
  • Prompt: PSATMPPR,?45,"Price Per Disp. Unit: "_$J($P($G(^PSDRUG(PSADRG,660)),"^",6),8,2)
  • Line Location: DRG+3
Function Call: WRITE
  • Prompt: PSATMPPR,?45,"Price Per Disp. Unit: "
  • Line Location: DRG+4
Function Call: WRITE
  • Prompt: ($J($P(^PSD(58.811,PSAIEN,1,PSAIEN1,1,PSALINE,0),"^",5)/$P(^PSD(58.811,PSAIEN,1,PSAIEN1,1,PSALINE,2),"^"),8,2))
  • Line Location: DRG+5
Function Call: WRITE
  • Prompt: !,"New Dispense Units Per Order Unit: "_PSANDUOU
  • Line Location: DRG+6
Function Call: WRITE
  • Prompt: ?45," unchanged "
  • Line Location: DRG+7
Function Call: WRITE
  • Prompt: ?45," unchanged "
  • Line Location: DRG+8
Function Call: WRITE
  • Prompt: ?64,$J((PSAPRICE/PSANDUOU),8,2)
  • Line Location: DRG+9
Function Call: WRITE
  • Prompt: !,"Updating Drug File's Synonym data"
  • Line Location: UPDATE+13
Function Call: WRITE
  • Prompt: !,"Updating Drug File's Dispense Units Per Order Unit & Price Per Dispense Unit"
  • Line Location: UPDATE+16
Function Call: WRITE
  • Prompt: !,"making adjustment in DRUG ACCOUNTABILITY ORDER file"
  • Line Location: SUPITM+1
Function Call: WRITE
  • Prompt: !,"TAKING A BREAK !?"
  • Line Location: SUPITM+2
Routine Call
  • DIC
  • Line Location:
    • OU+1
    • UPDATE+14
Routine Call
  • DIE
  • Line Location:
    • UPDATE+8
    • UPDATE+15
    • UPDATE+18
Routine Call
  • DIR
  • Line Location:
    • OU+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] Classic Fileman Calls
^DIC(51.5 - [#51.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSD(58.811 - [#58.811] OU+5, DRG+5, DRG+8, UPDATE+1*
^PSDRUG - [#50] OU+6, DRG, DRG+3, DRG+7, UPDATE+8, UPDATE+14

Label References

Name Line Occurrences
Q OU+1, OU+2, OU+10
SUPITM UPDATE+11
UPDATE DRG+7, DRG+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA UPDATE+8*, UPDATE+15*, UPDATE+18*
>> DA(1 UPDATE+14*, UPDATE+15*, UPDATE+18
>> DATA DRG*
>> DIC OU*, UPDATE+14*
>> DIC("A" OU*
>> DIC(0 OU*, UPDATE+14*
DIE UPDATE+8*, UPDATE+15*, UPDATE+17!, UPDATE+18*
DIR OU+10!
DIR("?" OU+9*
DIR("??" OU+9*
DIR("A" OU+8*
DIR("B" OU+5*, OU+6*
DIR(0 OU+8*
>> DLAYGO UPDATE+14*
DR UPDATE+8*, UPDATE+15*, UPDATE+17!, UPDATE+18*
>> DTOUT OU+10
>> DUOUT OU+10
NDC0 UPDATE+4*!, UPDATE+5
>> PSAAOU OU+2
>> PSADASH UPDATE+6*, UPDATE+8
>> PSADJ SUPITM*
>> PSADJFLD SUPITM*
>> PSADRG OU+6, DRG, DRG+3, DRG+7, UPDATE+8, UPDATE+14, UPDATE+15
>> PSAIEN OU+5, DRG+5, DRG+8, UPDATE+1
>> PSAIEN1 OU+5, DRG+5, DRG+8, UPDATE+1
>> PSALINE OU+5, DRG+5, DRG+8, UPDATE+1
>> PSANDC DRG, UPDATE+2, UPDATE+3*, UPDATE+4, UPDATE+5*, UPDATE+14
PSANDCX UPDATE+6!
>> PSANDUOU OU+11*, DRG+5, DRG+6, DRG+7, DRG+8, DRG+9, UPDATE+1, UPDATE+10
>> PSANPDU UPDATE+9*, UPDATE+10*
>> PSAOU OU+1*, OU+2, SUPITM
>> PSAOUT OU+10*
>> PSAPRICE DRG+9, UPDATE+10
>> PSAREA SUPITM*
>> PSASET UPDATE+1*
PSASUB DRG!*, UPDATE+14*, UPDATE+15
>> PSASUP OU+5, OU+6, DRG+3, DRG+4, DRG+7, DRG+8, UPDATE+8, UPDATE+11
PSATMPPR OU+4~, OU+5*, OU+6*, DRG+3, DRG+4
>> X UPDATE+3*, UPDATE+4*, UPDATE+14*
>> X1 DRG*, UPDATE+3*
>> Y OU+1, OU+11, UPDATE+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All