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

Package: Outpatient Pharmacy

Routine: PSOCOSTP


Information

PSOCOSTP ;BHAM-ISC/SAB - Purges data from drug cost file (#50.9) ; 05/12/94 8:20

Source Information

Source file <PSOCOSTP.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 4 (,DD)^%DT  WAIT^DICD  ^DIK  ^DIR  
Kernel 1 ^%ZTLOAD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSO PURGE DRUG COST  

Entry Points

Name Comments DBIA/ICR reference
EX
EN
END
BEG
ST

External References

Name Field # of Occurrence
^%DT BEG, END
DD^%DT ST
^%ZTLOAD END+5
WAIT^DICD END+4
^DIK EN
^DIR END+1, END+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"There is NO cost Data to be Purged !",!
  • Line Location: PSOCOSTP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: BEG+0
Function Call: WRITE
  • Prompt: !
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !
  • Line Location: END+3
Routine Call
  • DIR
  • Line Location:
    • END+1
    • END+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSCST - [#50.9] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSCST - [#50.9] EN
^PSCST(0 PSOCOSTP+2, ST
^PSOCST("B" PSOCOSTP+2!

Label References

Name Line Occurrences
BEG BEG
EN END+4
END END
EX BEG, END, END+2, END+4, END+5
ST END+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT ST!, BEG*, END*, EX!
%DT("A" BEG*, END*
%DT("B" BEG*, END!
%DT(0 BEG*
BDT BEG*, END+1, EN, EX!
>> DA EN*
DEF ST*, BEG, END!
>> DIK EN*
DIR END+1!, END+3!, EX!
DIR("A" END+1*, END+3*
DIR("B" END+1*, END+3*
DIR(0 END+1*, END+3*
DTOUT END+2, END+4, EX!
DUOUT END+2, END+4, EX!
EDT END*, END+1, EN, EX!
PDT EN*, EX!
T EX!
X BEG, END, EX!
Y ST*, BEG, END, END+2, END+4, EX!
>> ZTDESC END+5*
>> ZTIO END+5*
ZTQUEUED ST!, EN, EX
>> ZTREQ EX*
>> ZTRTN END+5*
>> ZTSAVE("BDT" END+5*
>> ZTSAVE("EDT" END+5*
ZTSK ST!, END+5
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