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

Package: CMOP

Routine: PSXCSLOG


Information

PSXCSLOG ;BIR/JMB-Checks for Active Cost Tasks Before Queuing/View Cost Task Log ;[ 04/08/97 2:06 PM ]

Source Information

Source file <PSXCSLOG.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 1 ($$FMDIFF,$$FMTE)^XLFDT  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
CMOP 2 PSXCST  PSXCSTPG  

Entry Points

Name Comments DBIA/ICR reference
DISP ;Displays one entry in cost task log.
EXIT
CHECK ;Looks for jobs queued or running for same or overlapping date range.
HD
VIEW ;Displays cost entries in 554

External References

Name Field # of Occurrence
^DIR HD+1
$$FMDIFF^XLFDT DISP+10
$$FMTE^XLFDT VIEW+2, VIEW+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"OH NO!"
  • Line Location: CHECK+10
Function Call: WRITE
  • Prompt: !!,"Your task cannot be queued. The following active task(s) is for the same",!,"date range you have selected or for dates that overlap your date range.",!!
  • Line Location: CHECK+13
Function Call: WRITE
  • Prompt: "Status Activity Data Date Range Task# Task Started",!,PSXSLN
  • Line Location: CHECK+14
Function Call: WRITE
  • Prompt: !!,"There are no cost entries in the CMOP OPERATIONS file."
  • Line Location: VIEW+1
Function Call: WRITE
  • Prompt: ?10,$S($P(PSXNODE,"^",6)="C":"Compile",$P(PSXNODE,"^",6)="P":"Purge",1:"Unknown")
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: ?18,$E(PSXBDT,4,5)_$S(+$E(PSXBDT,6,7):"/"_$E(PSXBDT,6,7),1:"")_"/"_$E(PSXBDT,2,3)_"-"_$E(PSXEDT,4,5)_$S(+$E(PSXEDT,6,7):"/"_$E(PSXEDT,6,7),1:"")_"/"_$E(PSXEDT,2,3),?36,$P(PSXNODE,"^",8)
  • Line Location: DISP+5
Function Call: WRITE
  • Prompt: ?43,$E($P(PSXSTART,"."),4,5)_"/"_$E($P(PSXSTART,"."),6,7)_"/"_$E($P(PSXSTART,"."),2,3)_"@"_$E($P(PSXSTART,".",2),1,4)
  • Line Location: DISP+6
Function Call: WRITE
  • Prompt: 0
  • Line Location: DISP+7
Function Call: WRITE
  • Prompt: ?57,$E($P(PSXEND,"."),4,5)_"/"_$E($P(PSXEND,"."),6,7)_"/"_$E($P(PSXEND,"."),2,3)_"@"_$E($P(PSXEND,".",2),1,4)
  • Line Location: DISP+8
Function Call: WRITE
  • Prompt: 0
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: !?18,"Queued by: "_PSXBY,!
  • Line Location: DISP+12
Function Call: WRITE
  • Prompt: @IOF,!?11,"CONSOLIDATED MAIL OUTPATIENT PHARMACY COST ACTIVITY SUMMARY",!?23,"From "_PSXFIRST_" thru "_PSXLAST,!!
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: "Status Activity Data Date Range Task# Task Started Task Ended Task Time",!,PSXSLN
  • Line Location: HD+3
Routine Call
  • DIR
  • Line Location:
    • HD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSX(554 CHECK+1, CHECK+2, CHECK+3, CHECK+4, CHECK+5, CHECK+6, CHECK+7, CHECK+9, VIEW+1, VIEW+2
, VIEW+3, VIEW+4, VIEW+5, DISP+1
^VA(200 - [#200] DISP+11

Label References

Name Line Occurrences
DISP CHECK+15, VIEW+5
EXIT VIEW+1
HD VIEW+4, VIEW+5

Naked Globals

Name Field # of Occurrence
^(0 DISP+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR HD+1!
DIR(0 HD+1*
>> DTOUT HD+1
>> DUOUT HD+1
IOF HD+2
IOSL VIEW+5
PSXBDT CHECK+4, CHECK+5, CHECK+6, CHECK+7, CHECK+10, EXIT!, DISP+4*, DISP+5
>> PSXBDTE CHECK+9*, CHECK+10
PSXBY EXIT!, DISP+11*, DISP+12
>> PSXCOM CHECK+8
PSXEDT CHECK+4, CHECK+5, CHECK+6, CHECK+7, CHECK+10, EXIT!, DISP+4*, DISP+5
>> PSXEDTE CHECK+9*, CHECK+10
PSXEND EXIT!, DISP+6*, DISP+8, DISP+9, DISP+10
>> PSXERR CHECK+13*
PSXFIRST VIEW+2*, EXIT!, HD+2
>> PSXI DISP+7*, DISP+9*
PSXIEN CHECK+2*, CHECK+3, CHECK+4, CHECK+5, CHECK+6, CHECK+7, CHECK+9, CHECK+10, CHECK+15*, VIEW+3*
, VIEW+5*, EXIT!, DISP+1
PSXLAST VIEW+3*, VIEW+4*, EXIT!, HD+2
PSXLOC CHECK+1!
PSXLOC( CHECK+4*, CHECK+5*, CHECK+6*, CHECK+7*, CHECK+10*, CHECK+15
PSXLOC(0 CHECK+11
PSXNODE EXIT!, DISP+1*, DISP+2, DISP+3, DISP+4, DISP+5, DISP+6, DISP+11
PSXOUT VIEW+2*, VIEW+5, EXIT!, HD+1*
PSXPAGE VIEW+2*, EXIT!, HD*, HD+1
>> PSXSLN CHECK+1*, CHECK+13*, CHECK+14, VIEW+2*, HD+3
>> PSXSTA CHECK+2*
PSXSTART EXIT!, DISP+6*, DISP+7, DISP+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All