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

Package: Scheduling

Routine: SCCVU1


Information

SCCVU1 ;ALB/RMO,TMP - SCHED VISITS CONVERT/ARCHIVE UTILITIES; [ 10/10/95 2:39 PM ]

Source Information

Source file <SCCVU1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Scheduling 5 (QUE,STOP)^SCCVE  $$BLKSIZE^SCCVEGU1  GETERR^SCCVLOG1  PAUSE^SCCVU  ($$CHKDUP,$$VERDT)^SCCVU2  
Kernel 1 STAT^%ZTLOAD  
VA Fileman 1 EN^DIQ1  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Scheduling 3 SCCVCST  SCCVCST1  SCCVU2  

Entry Points

Name Comments DBIA/ICR reference
TASKSTAQ
CHKDT(SCRESULT,SC,SCCVTYP) ; -- Check date range
; Input -- SC Array:
; SC("STARTDT") Start date
; ("ENDDT") End date
; -- SCCVTYP "CST" for convert function
; "AST" for archive function
; Output -- SCRESULT (#=Error number | 0=No Error)^Message
DTOK(SC) ; -- Verify that date range is OK
PROCREQQ
PROCREQ(SCRESULT,SC) ; -- Process conversion/estimate request
; Input -- SC Array:
; SC("TEMPLNO") Template number ien
; ("REQNUM") Request number ien
; Output -- SCRESULT (#=Error number | 0=No Error)^Message
DTOKQ ;
CHKDUPQ
CNVTSCH(SCLOG) ; -- Function determines if any convert was scheduled
; Returns 0 if none scheduled, 1 if any ever scheduled
CHKDTQ
CHKDUP(SCRESULT,SC,SCCVT) ; -- Check duplicate log entries
; Input -- SC Array:
; SC("TYPE") Conversion type
; ("STARTDT") Start date
; ("ENDDT") End date
; ("TEMPLNO") Template number ien
; -- SCCVT "CST" for convert function
; "AST" for archive function
; Output -- SCRESULT (#=Error number | 0=No Error)^Message
JOURNAL(SCLOG) ; -- display journal message and global growth estimates
BLDSTR(E) ; -- Build error message string
; Input -- E Error message array
; Output -- Error message string for display purposes
TASKSTA(SCRESULT,SCLOG) ; -- Retrieve task status description
; Input -- SCLOG Template number ien
; Output --
; SCRESULT (0^Task status description^status code or Error #^Message)

External References

Name Field # of Occurrence
STAT^%ZTLOAD TASKSTA+19
EN^DIQ1 JOURNAL+3
QUE^SCCVE PROCREQ+27
STOP^SCCVE PROCREQ+31
$$BLKSIZE^SCCVEGU1 JOURNAL+10
GETERR^SCCVLOG1 CHKDT+18, CHKDUP+22, PROCREQ+15, TASKSTA+13
PAUSE^SCCVU JOURNAL+27
$$CHKDUP^SCCVU2 CHKDUP+25
$$VERDT^SCCVU2 CHKDT+21

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,$P(SCERR,U,2),!!
  • Line Location: DTOKQ+1
Function Call: WRITE
  • Prompt: !
  • Line Location: JOURNAL+7
Function Call: WRITE
  • Prompt: !,">>> The estimated global growth profile for this template is the following:"
  • Line Location: JOURNAL+8
Function Call: WRITE
  • Prompt: !
  • Line Location: JOURNAL+9
Function Call: WRITE
  • Prompt: !,?10,"Global",?25,"Blocks",?40,"[Block Size: ",$$BLKSIZE^SCCVEGU1()," bytes]"
  • Line Location: JOURNAL+10
Function Call: WRITE
  • Prompt: !,?10,"---------",?25,"-----------"
  • Line Location: JOURNAL+11
Function Call: WRITE
  • Prompt: !,?10,"^SCE",?25,$J($FN($G(SCDATA(404.98,SCLOG,207,"E")),","),11)
  • Line Location: JOURNAL+12
Function Call: WRITE
  • Prompt: !,?10,"^AUPNVSIT",?25,$J($FN($G(SCDATA(404.98,SCLOG,208,"E")),","),11)
  • Line Location: JOURNAL+13
Function Call: WRITE
  • Prompt: !,?10,"^AUPNVPRV",?25,$J($FN($G(SCDATA(404.98,SCLOG,209,"E")),","),11)
  • Line Location: JOURNAL+14
Function Call: WRITE
  • Prompt: !,?10,"^AUPNVPOV",?25,$J($FN($G(SCDATA(404.98,SCLOG,210,"E")),","),11)
  • Line Location: JOURNAL+15
Function Call: WRITE
  • Prompt: !,?10,"^AUPNVCPT",?25,$J($FN($G(SCDATA(404.98,SCLOG,211,"E")),","),11)
  • Line Location: JOURNAL+16
Function Call: WRITE
  • Prompt: !,?10,"---------",?25,"-----------"
  • Line Location: JOURNAL+17
Function Call: WRITE
  • Prompt: !,?10,"Total",?25,$J($FN(SCTOT,","),11)
  • Line Location: JOURNAL+18
Function Call: WRITE
  • Prompt: !
  • Line Location: JOURNAL+20
Function Call: WRITE
  • Prompt: !,">>> Please verify that enough global disk space and journal space"
  • Line Location: JOURNAL+21
Function Call: WRITE
  • Prompt: !," are available for these anticipated increases."
  • Line Location: JOURNAL+22
Function Call: WRITE
  • Prompt: !
  • Line Location: JOURNAL+23
Function Call: WRITE
  • Prompt: !,">>> Also, please verify that system backup is not scheduled to"
  • Line Location: JOURNAL+24
Function Call: WRITE
  • Prompt: !," run within the start and stop times of this conversion job."
  • Line Location: JOURNAL+25
Function Call: WRITE
  • Prompt: !
  • Line Location: JOURNAL+26

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SD(404.98 - [#404.98] PROCREQ+22, PROCREQ+23, TASKSTA+17, CNVTSCH+4

Label References

Name Line Occurrences
$$BLDSTR CHKDT+24, CHKDUP+28, PROCREQ+17
CHKDT DTOK+3
CHKDUP DTOK+6
DTOKQ DTOK+4
JOURNAL PROCREQ+28
PROCREQQ PROCREQ+19
TASKSTAQ TASKSTA+11

Naked Globals

Name Field # of Occurrence
^( CNVTSCH+4
^(1 TASKSTA+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA DTOK+5, JOURNAL+1~, JOURNAL+2*
DIC JOURNAL+1~, JOURNAL+2*
DIQ JOURNAL+1~, JOURNAL+2*
DIQ(0 JOURNAL+2*
DR JOURNAL+1~, JOURNAL+2*
E BLDSTR~
E( BLDSTR+6, BLDSTR+7
FLD JOURNAL+1~, JOURNAL+5*
I BLDSTR+3~, BLDSTR+5*, BLDSTR+6*, BLDSTR+7
SC CHKDT~, CHKDUP~, PROCREQ~, DTOK~, DTOK+3, DTOK+6
SC("ENDDT" CHKDT+13, CHKDUP+16
SC("REQNUM" PROCREQ+10
SC("STARTDT" CHKDT+12, CHKDUP+15
SC("TEMPLNO" CHKDUP+17, PROCREQ+9, DTOK+5*
SC("TYPE" CHKDUP+14, DTOK+5*
SCCVT CHKDUP~
SCCVTYP CHKDT~, CHKDUP+10~, CHKDUP+14*, CHKDUP+20, CHKDUP+25
SCDATA JOURNAL+1~
SCDATA( JOURNAL+5, JOURNAL+12, JOURNAL+13, JOURNAL+14, JOURNAL+15, JOURNAL+16
SCENDT CHKDT+8~, CHKDT+13*, CHKDT+16, CHKDT+21, CHKDUP+10~, CHKDUP+16*, CHKDUP+20, CHKDUP+25
SCERR DTOK+1~, DTOK+3, DTOK+4, DTOK+6, DTOKQ+1
SCERRMSG CHKDT+8~, CHKDT+18, CHKDT+21, CHKDT+24, CHKDUP+10~, CHKDUP+22, CHKDUP+25, CHKDUP+28, PROCREQ+6~, PROCREQ+15
, PROCREQ+17, TASKSTA+13
SCERRNB CHKDT+8~, CHKDT+10*, CHKDT+17*, CHKDT+18, CHKDT+21*, CHKDT+23, CHKDT+24, CHKDUP+10~, CHKDUP+12*, CHKDUP+21*
, CHKDUP+22, CHKDUP+25*, CHKDUP+27, CHKDUP+28, PROCREQ+6~, PROCREQ+7*, PROCREQ+14*, PROCREQ+15, PROCREQ+17, PROCREQ+19
, TASKSTA+5~, TASKSTA+7*, TASKSTA+12*, TASKSTA+13, TASKSTA+16, TASKSTA+22
SCLOG CHKDUP+10~, CHKDUP+17*, CHKDUP+20, CHKDUP+25, PROCREQ+6~, PROCREQ+9*, PROCREQ+13, PROCREQ+22, PROCREQ+23, PROCREQ+27
, PROCREQ+28, PROCREQ+31, TASKSTA~, TASKSTA+11, TASKSTA+17, CNVTSCH~, CNVTSCH+4, JOURNAL~, JOURNAL+2, JOURNAL+5
, JOURNAL+12, JOURNAL+13, JOURNAL+14, JOURNAL+15, JOURNAL+16
SCOK DTOK+1~, DTOK+2*, DTOKQ+1*, DTOKQ+2
SCREQ PROCREQ+6~, PROCREQ+10*, PROCREQ+13, PROCREQ+22, PROCREQ+23, PROCREQ+27, PROCREQ+31
SCREQACT PROCREQ+6~, PROCREQ+22*, PROCREQ+26, PROCREQ+31
SCREQEVT PROCREQ+6~, PROCREQ+23*, PROCREQ+28
SCRESULT CHKDT~, CHKDT+23*, CHKDT+24*, CHKDUP~, CHKDUP+27*, CHKDUP+28*, PROCREQ~, PROCREQ+17*, TASKSTA~, TASKSTA+22*
SCSCH CNVTSCH+2~, CNVTSCH+3*, CNVTSCH+4*, CNVTSCH+5
SCSTDT CHKDT+8~, CHKDT+12*, CHKDT+16, CHKDT+21, CHKDUP+10~, CHKDUP+15*, CHKDUP+20, CHKDUP+25
SCTOT JOURNAL+1~, JOURNAL+4*, JOURNAL+5*, JOURNAL+18
SCTSKD TASKSTA+5~, TASKSTA+8*, TASKSTA+20*, TASKSTA+22
STOP BLDSTR+3~, BLDSTR+5*, BLDSTR+6, BLDSTR+8*
U CHKDT+24, CHKDUP+28, PROCREQ+17, PROCREQ+22, PROCREQ+23, PROCREQ+26, TASKSTA+17, TASKSTA+20, TASKSTA+22, DTOKQ+1
, CNVTSCH+4
Y BLDSTR+3~, BLDSTR+4*, BLDSTR+7*, BLDSTR+9
Z CNVTSCH+2~, CNVTSCH+4*
ZTCPU TASKSTA+5~, TASKSTA+17*
>> ZTSK TASKSTA+17*, TASKSTA+18
>> ZTSK(1 TASKSTA+20
>> ZTSK(2 TASKSTA+20
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All