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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSXCOSTU

Package: CMOP

Routine: PSXCOSTU


Information

PSXCOSTU ;BIR/BAB,WPB,HTW-Cost Update ; 26 Apr 2000 10:52 AM

Source Information

Source file <PSXCOSTU.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 3 NOW^%DTC  ^DIE  ^DIR  
Kernel 2 ^%ZTLOAD  $$FMADD^XLFDT  
MailMan 2 XMZ^XMA2  ENT1^XMD  
National Drug File 1 $$PROD2^PSNAPIS  

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
CMOP 1 PSX COST UPDATE  

Entry Points

Name Comments DBIA/ICR reference
BLANK
EN ;
EDT
QUE
GET
MSG ;
XMZ
PSX1
MSGEND
EXIT

External References

Name Field # of Occurrence
NOW^%DTC XMZ+3
^%ZTLOAD QUE+2
^DIE GET+12
^DIR EN+1, EDT
$$PROD2^PSNAPIS GET+10
$$FMADD^XLFDT EN+3, EDT+4
XMZ^XMA2 XMZ
ENT1^XMD MSGEND+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: EDT+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: EDT+1
Function Call: WRITE
  • Prompt: !,"End Date must follow Begin Date!"
  • Line Location: EDT+3
Function Call: WRITE
  • Prompt: !!,"Job Cancelled"
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !!,"Job Queued"
  • Line Location: QUE+4
Routine Call
  • DIE
  • Line Location:
    • GET+12
Routine Call
  • DIR
  • Line Location:
    • EN+1
    • EDT

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" GET+5, XMZ+3
^PSDRUG - [#50] GET+8, GET+9
^PSDRUG("AQ1" GET+6
^PSX(552.4 - [#552.4] GET+1, GET+2, GET+3, GET+4, GET+5
^TMP($J GET+7*, GET+11*, MSG+1, XMZ+6, XMZ+15, XMZ+16, PSX1, PSX1+9, PSX1+10, EXIT!
^XMB(3.9 - [#3.9] BLANK*, XMZ+4*, XMZ+7*, XMZ+9*, XMZ+12*, XMZ+16*, PSX1+1*, PSX1+3*, PSX1+6*, PSX1+10*
, MSGEND*

Label References

Name Line Occurrences
BLANK XMZ+5, XMZ+11, XMZ+14, XMZ+17, PSX1+5, PSX1+8
EDT EDT+3
EN EDT+1
EXIT EN+2, EDT+2, QUE+5, MSG+1
MSGEND PSX1
PSX1 XMZ+6
XMZ XMZ+1

Naked Globals

Name Field # of Occurrence
^("ND" GET+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % XMZ+3
BB EN+3*, EDT+3, EXIT!
BEG EN+3*, GET+1*, EXIT!
>> C1 GET*, GET+11*
CDT GET+5*, GET+7, GET+11, EXIT!
CNT GET*, GET+7*, EXIT!
COST GET+8*, GET+11, GET+12, GET+13!, EXIT!
DA GET+12*, GET+13!
DA(1 GET+12*, GET+13!
DIE GET+12*, GET+13!
DIR EN+1!, EDT!, EDT+3!
DIR("?" EN+1*!, EDT*!
DIR("A" EN+1*, EDT*
DIR(0 EN+1*, EDT*
>> DIROUT EN+2, EDT+2
>> DIRUT EN+2, EDT+2
DR GET+12*, GET+13!
DT MSGEND
DUZ MSGEND+1
EE EDT+4*!
END EDT+4*, GET+1, EXIT!
>> I XMZ+5*, XMZ+15*, XMZ+16, XMZ+17*, PSX1+9*, PSX1+10
ID EXIT!
IDDRG GET+4*, GET+6, GET+7, GET+11, GET+13!, EXIT!
IEN50 GET+6*, GET+7, GET+8, GET+9, GET+13!, EXIT!
>> MCT BLANK*, XMZ+2*, XMZ+7, XMZ+8*, XMZ+9, XMZ+10*, XMZ+12, XMZ+13*, XMZ+16*, PSX1+1
, PSX1+2*, PSX1+3, PSX1+4*, PSX1+6, PSX1+7*, PSX1+10*, MSGEND
>> TRUG GET+10*, GET+11
U GET+2, GET+3, GET+4, GET+5, GET+8, GET+9, MSGEND
>> XMDUN MSGEND*
>> XMDUZ MSG+2*, MSGEND+1*
XMSER EXIT+1!
XMSUB MSG+2*, EXIT+1!
>> XMY( MSGEND+1*
XMZ BLANK, XMZ+1, XMZ+4, XMZ+7, XMZ+9, XMZ+12, XMZ+16, PSX1+1, PSX1+3, PSX1+6
, PSX1+10, MSGEND, EXIT+1!
XQMSG EXIT+1!
XX GET+1*, GET+2, GET+3, GET+4, GET+5, GET+12, EXIT!
Y EN+3!, EDT+1, EDT+3!, EDT+4!, GET+5*!, XMZ+3*, XMZ+4!
YY GET+1*, GET+2, GET+3, GET+4, GET+5, GET+12, EXIT!
Z1 GET+9*, GET+10, GET+13!
Z2 GET+9*, GET+10, GET+13!
>> ZTDESC QUE+1*
>> ZTIO QUE*
>> ZTREQ EXIT+1*
>> ZTRTN QUE*
>> ZTSAVE("BEG" QUE*
>> ZTSAVE("DUZ" QUE+1*
>> ZTSAVE("END" QUE*
>> ZTSK QUE+3
>> ZX GET+10*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All