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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SCCVDEL1

Package: Scheduling

Routine: SCCVDEL1


Information

SCCVDEL1 ;ALB/TMP - OLD SCHED VISITS FILE DELETE; [ 03/04/98 09:39 AM ]

Source Information

Source file <SCCVDEL1.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Registration 2 FULL^VALM1  EN^VALM2  
Scheduling 2 ($$COMPL,$$FGLB,$$GAP,$$LOG,BLD)^SCCVDEL  PAUSE^SCCVU  
Kernel 1 $$EC^%ZOSV  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
KILLQ
ERR ; -- error trap routine
KILL(FNO) ; -- kill data global
DELDATA ; -- kill global
PROT(SDGLB) ; -- ask if ok to kill and protection is off
PROTQ
DELDATAQ ;

External References

Name Field # of Occurrence
$$EC^%ZOSV ERR+4
^DIR PROT+6, PROT+15
$$COMPL^SCCVDEL DELDATA+9
$$FGLB^SCCVDEL KILL+7
$$GAP^SCCVDEL DELDATA+6
$$LOG^SCCVDEL KILL+16
BLD^SCCVDEL DELDATA+14
PAUSE^SCCVU KILLQ
FULL^VALM1 DELDATA+2
EN^VALM2 DELDATA+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DELDATA+3
Function Call: WRITE
  • Prompt: !!,"Invalid file number '",$G(FNO),"' specified."
  • Line Location: KILL+3
Function Call: WRITE
  • Prompt: !!,"Invalid file number '",$G(FNO),"' specified."
  • Line Location: KILL+5
Function Call: WRITE
  • Prompt: !!,"Data global '",SCGLB,"' cannot be KILLed. ^DIC(",FNO,") still exists."
  • Line Location: KILL+8
Function Call: WRITE
  • Prompt: !!,"Data global '",SCGLB,"' cannot be KILLed. ^DD(",FNO,") still exists."
  • Line Location: KILL+10
Function Call: WRITE
  • Prompt: !!,"Data global '",SCGLB,"' does not exist. Global does not need to be KILLed."
  • Line Location: KILL+12
Function Call: WRITE
  • Prompt: !!,"Cannot kill data global!"
  • Line Location: KILL+18
Function Call: WRITE
  • Prompt: !,$P(Y,U,2)
  • Line Location: KILL+19
Function Call: WRITE
  • Prompt: !!,"Data global '",SCGLB,"' successfully KILLed."
  • Line Location: KILL+22
Function Call: WRITE
  • Prompt: !!,"Data gloabl '",SCGLB,"' was not KILLed."
  • Line Location: KILL+24
Function Call: WRITE
  • Prompt: !
  • Line Location: PROT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PROT+11
Function Call: WRITE
  • Prompt: !!,">>> Protection error has occurred. Global has not been KILLed."
  • Line Location: ERR+5
Function Call: WRITE
  • Prompt: !," You must removed root-level protection on global."
  • Line Location: ERR+6
Routine Call
  • DIR
  • Line Location:
    • PROT+6
    • PROT+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("ERRTN" ERR+7
^%ZOSF("TRAP" KILL+20
^DD( KILL+10
^DIC - [#1] KILL+8
^TMP("SCCV.DELETE.DX" DELDATA+13

Label References

Name Line Occurrences
$$PROT KILL+15
@( ERR+7
DELDATAQ DELDATA+6, DELDATA+9
KILL DELDATA+13
KILLQ KILL+3, KILL+5, KILL+8, KILL+10, KILL+12
PROTQ PROT+7, PROT+9, PROT+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR PROT+1~
DIR("A" PROT+4*, PROT+13*
DIR("B" PROT+5*, PROT+14*
DIR(0 PROT+3*, PROT+12*
DUZ KILL+16
FNO KILL~, KILL+3, KILL+5, KILL+7, KILL+8, KILL+10, KILL+16
SCCV DELDATA+1~, DELDATA+12*, DELDATA+13
SCGLB KILL+1~, KILL+7*, KILL+8, KILL+10, KILL+12, KILL+14, KILL+15, KILL+21, KILL+22, KILL+24
, PROT+9
>> SCOK PROT+7*, PROT+9*, PROT+16*, PROT+17*, PROTQ
SDGLB PROT~, PROT+4, PROT+9
U KILL+19
>> VALMBCK DELDATAQ+1*
VALMY DELDATA+1~
VALMY( DELDATA+12
>> X KILL+20*
>> XQORNOD(0 DELDATA+11
Y KILL+16*, KILL+17, KILL+19, PROT+1~, PROT+7, PROT+16
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All