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

Package: Drug Accountability

Routine: PSAVERA2


Information

PSAVERA2 ;BHM/DB - Edit previously verified invoices #2;21DEC99

Source Information

Source file <PSAVERA2.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Drug Accountability 3 SUPPLY^PSANDF  VERDISP^PSAUTL4  DUOU^PSAVER2  
VA FileMan 1 ^DIC  

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 PSAVERA1  

Entry Points

Name Comments DBIA/ICR reference
ASKDRUG ;Change drug
LOCATION ;Change pharmacy location
LST ;List all data associated with location/drug
RECORD ;Add adjusted data to DA Orders file

External References

Name Field # of Occurrence
^DIC ASKDRUG+1
SUPPLY^PSANDF ASKDRUG+5
VERDISP^PSAUTL4 ASKDRUG+9
DUOU^PSAVER2 ASKDRUG+12, ASKDRUG+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Decrementing balance of "_PSABAL_" from "_$P($G(^PSDRUG(PSADRG,0)),"^")
  • Line Location: ASKDRUG+14
Function Call: WRITE
  • Prompt: !,"Increasing balance of "_PSANEWD_" by "_PSABAL_"."
  • Line Location: ASKDRUG+15
Function Call: WRITE
  • Prompt: !!,"Note that if you change the drug on this line item, the balances will be",!,"updated."
  • Line Location: ASKDRUG+17
Function Call: WRITE
  • Prompt: !,"If the location is changed, the balances will be decremented from the original",!,"location, the transaction file will record the proper changes.",!
  • Line Location: LOCATION+1
Function Call: WRITE
  • Prompt: !,"ok, we'll update the files now at RECORD"
  • Line Location: RECORD+2
Function Call: WRITE
  • Prompt: !,"Could not find previous sysnonym data, therefore the prices will remain as",!,"they are.",!
  • Line Location: RECORD+6
Routine Call
  • DIC
  • Line Location:
    • ASKDRUG+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSD(58.811 - [#58.811] ASKDRUG+11*
^PSDRUG - [#50] ASKDRUG+12, ASKDRUG+13, ASKDRUG+14, RECORD+3, RECORD+4
^PSDRUG("C" ASKDRUG+10, ASKDRUG+11

Label References

Name Line Occurrences
ASKDRUG ASKDRUG+8
RECORD ASKDRUG+7, ASKDRUG+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIC ASKDRUG+1*!
DIC(0 ASKDRUG+1*
>> DTOUT ASKDRUG+2
>> DUOUT ASKDRUG+2
>> PREVDATA RECORD+4*, RECORD+5
>> PSA50IEN ASKDRUG+6*, ASKDRUG+9*, ASKDRUG+10, ASKDRUG+11, ASKDRUG+12, ASKDRUG+13
>> PSABAL ASKDRUG+14, ASKDRUG+15
>> PSABEFOR ASKDRUG+1*, ASKDRUG+13, RECORD+3, RECORD+4
>> PSABFR RECORD+3*
>> PSADJ ASKDRUG+6*, ASKDRUG+9*
>> PSADJFLD ASKDRUG+3*
>> PSADRG ASKDRUG+1, ASKDRUG+9*, ASKDRUG+14
>> PSAGAIN ASKDRUG+1*, ASKDRUG+5*, ASKDRUG+8
>> PSAIEN ASKDRUG+11
>> PSAIEN1 ASKDRUG+11
>> PSANDC ASKDRUG+10, ASKDRUG+11
>> PSANEWD ASKDRUG+15
>> PSAOUT ASKDRUG+2*, ASKDRUG+4, ASKDRUG+5
>> PSAREA ASKDRUG+3*, ASKDRUG+6*
>> PSASUB ASKDRUG+11*, ASKDRUG+12, ASKDRUG+13, RECORD+3
PSASUBB RECORD+1!, RECORD+3*, RECORD+4, RECORD+6
>> PSASUPP ASKDRUG+3*, ASKDRUG+4, ASKDRUG+5
>> PSAVER ASKDRUG+5*
>> Y ASKDRUG+4, ASKDRUG+9
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