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

Package: Generic Code Sheet

Routine: GECSRST1


Information

GECSRST1 ;WISC/RFJ/KLD-stack reports (print) ;22 Dec 93

Source Information

Source file <GECSRST1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 2 DD^%DT  NOW^%DTC  
Generic Code Sheet 1 PAUSE^GECSUTIL  
Kernel 1 ^%ZISC  

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
Generic Code Sheet 1 GECSRSTA  

Entry Points

Name Comments DBIA/ICR reference
DQ ; queue comes here
H

External References

Name Field # of Occurrence
DD^%DT DQ+17, DQ+22, DQ+28
NOW^%DTC DQ+17
^%ZISC DQ+53
PAUSE^GECSUTIL DQ+21, DQ+32, DQ+36, DQ+39, DQ+43, DQ+49

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$P(DATA0,"^"),?24,Y,?46,X
  • Line Location: DQ+25
Function Call: WRITE
  • Prompt: " ",$E(YDT,4,5),"-",$E(YDT,6,7),"-"
  • Line Location: DQ+27
Function Call: WRITE
  • Prompt: $E($P(Y,",",2),2,5)
  • Line Location: DQ+28
Function Call: WRITE
  • Prompt: !?3,"COUNT: ",$E($P(DATA1,"^",3),1,69)
  • Line Location: DQ+29
Function Call: WRITE
  • Prompt: !?3,"ERROR: ",$E($P(DATA1,"^",2),1,69)
  • Line Location: DQ+30
Function Call: WRITE
  • Prompt: !?3,"DESCR: ",$E($P(DATA1,"^"),1,69)
  • Line Location: DQ+31
Function Call: WRITE
  • Prompt: !?3,"MAIL MSGS: "
  • Line Location: DQ+34
Function Call: WRITE
  • Prompt: ?14,DA1,?24,"CONFIRMATION: ",$P(^GECS(2100.1,DA,20,DA1,0),"^",2)
  • Line Location: DQ+37
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+38
Function Call: WRITE
  • Prompt: !?3,"*OLD MSGS: "
  • Line Location: DQ+41
Function Call: WRITE
  • Prompt: ?14,DA1,?24,"CONFIRMATION: ",$P(^GECS(2100.1,DA,21,DA1,0),"^",2)
  • Line Location: DQ+44
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+45
Function Call: WRITE
  • Prompt: !,"*** ACTUAL CODE SHEET:"
  • Line Location: DQ+47
Function Call: WRITE
  • Prompt: !,D
  • Line Location: DQ+50
Function Call: WRITE
  • Prompt: !,"*** END OF CODE SHEET ***"
  • Line Location: DQ+51
Function Call: WRITE
  • Prompt: !!?10,"TOTAL CODE SHEETS: ",TOTAL
  • Line Location: DQ+52
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"GCS STACK FILE STATUS REPORT",?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"TC-TRAN CODE -BATNUM",?24,"DATE@TIME CREATED",?46,"STATUS",?70,"HOLD DATE",!,%
  • Line Location: H+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GECS(2100.1 - [#2100.1] DQ+3, DQ+4, DQ+5, DQ+9, DQ+20, DQ+26, DQ+33, DQ+35, DQ+37, DQ+38
, DQ+40, DQ+42, DQ+44, DQ+45, DQ+48
^TMP($J DQ+2!, DQ+10*, DQ+15*, DQ+20, DQ+54!

Label References

Name Line Occurrences
H DQ+19, DQ+21, DQ+32, DQ+36, DQ+39, DQ+43, DQ+49

Naked Globals

Name Field # of Occurrence
^( DQ+9, DQ+48
^(1 DQ+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DQ+17, H*, H+1, H+2*, H+3
D DQ+1~, DQ+48*, DQ+50
DA DQ+1~, DQ+4*, DQ+5, DQ+9, DQ+10, DQ+15, DQ+20*, DQ+26, DQ+33, DQ+35
, DQ+37, DQ+38, DQ+40, DQ+42, DQ+44, DQ+45, DQ+48
DA1 DQ+1~, DQ+9*, DQ+10, DQ+35*, DQ+37, DQ+38, DQ+42*, DQ+44, DQ+45, DQ+48*
DATA0 DQ+1~, DQ+5*, DQ+6, DQ+12, DQ+20*, DQ+22, DQ+23, DQ+25
DATA1 DQ+1~, DQ+20*, DQ+29, DQ+30, DQ+31
>> GECSCODE DQ+46
>> GECSDATE DQ+6
>> GECSDESC DQ+31
>> GECSEND DQ+3
>> GECSFALL DQ+8, DQ+13, DQ+14
GECSFLAG DQ+1~, DQ+20, DQ+21, DQ+32, DQ+33, DQ+35, DQ+36, DQ+39, DQ+40, DQ+42
, DQ+43, DQ+48, DQ+49, DQ+51, DQ+52
>> GECSSSET DQ+23
>> GECSSTAT( DQ+13
>> GECSSTAT("N" DQ+8
>> GECSSTRT DQ+3
IO DQ+18, DQ+19
IO(0 DQ+18
IOF H
IOSL DQ+21, DQ+32, DQ+36, DQ+39, DQ+43, DQ+49
IOST DQ+18
NOW DQ+1~, DQ+17*, H
PAGE DQ+1~, DQ+17*, H*
SCREEN DQ+1~, DQ+18*, DQ+21, DQ+32, DQ+36, DQ+39, DQ+43, DQ+49, H
STATUS DQ+1~, DQ+12*, DQ+13, DQ+14
TOTAL DQ+1~, DQ+20*, DQ+24*, DQ+52
TRANCODE DQ+1~, DQ+3*, DQ+4
X DQ+1~, DQ+23*, DQ+25, DQ+26, DQ+30
Y DQ+1~, DQ+17*, DQ+22*, DQ+25, DQ+26*, DQ+28
YDT DQ+1~, DQ+26*, DQ+27
>> ZTQUEUED DQ+18
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All