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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Routine: GECSUSTA

Package: Generic Code Sheet

Routine: GECSUSTA


Information

GECSUSTA ;WISC/RFJ/KLD-code sheet status utilities ;01 Nov 93

Source Information

Source file <GECSUSTA.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA FileMan 2 DD^%DT  ^DIE  

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

Package Total Caller Graph
Generic Code Sheet 5 GECSEDIT  GECSMUT1  GECSUTIL  GECSXBL1  ^GECS(2100  

Entry Points

Name Comments DBIA/ICR reference
RETAIN(DA)
STATUS(DA) ; show status of code sheet da
; 0=retained in file

External References

Name Field # of Occurrence
DD^%DT STATUS+9, STATUS+13, STATUS+19
^DIE RETAIN+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?1,"Status: << "
  • Line Location: STATUS+3
Function Call: WRITE
  • Prompt: "RETAINED IN FILE >>"
  • Line Location: STATUS+4
Function Call: WRITE
  • Prompt: "READY FOR BATCHING [Priority: ",$P(%,"^",10),", Trans Date: ",$E(X,4,5),"-",$E(X,6,7),"-"
  • Line Location: STATUS+8
Function Call: WRITE
  • Prompt: $E($P(Y,",",2),2,5),"] >>"
  • Line Location: STATUS+9
Function Call: WRITE
  • Prompt: "READY FOR TRANSMISSION IN BATCH ",$P(%,"^",9)," [Date:",$E(X,4,5),"-",$E(X,6,7),"-"
  • Line Location: STATUS+12
Function Call: WRITE
  • Prompt: $E($P(Y,",",2),2,5),"] >>"
  • Line Location: STATUS+13
Function Call: WRITE
  • Prompt: "TRANSMITTED IN BATCH ",$P(%,"^",9)
  • Line Location: STATUS+16
Function Call: WRITE
  • Prompt: " ",$E(X,4,5)_"-"_$E(X,6,7)_"-"
  • Line Location: STATUS+18
Function Call: WRITE
  • Prompt: $E($P(Y,",",2),2,5)," <<"
  • Line Location: STATUS+19
Function Call: WRITE
  • Prompt: "TRANSMITTED IN STACK: ",$P(%,"^",3)," <<"
  • Line Location: STATUS+21
Function Call: WRITE
  • Prompt: "RETAINED IN FILE >>"
  • Line Location: STATUS+22
Routine Call
  • DIE
  • Line Location:
    • RETAIN+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GECS(2100 - [#2100] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GECS(2100 - [#2100] RETAIN+2, RETAIN+5!, STATUS+4, STATUS+6, STATUS+21
^GECS(2101.3 - [#2101.3] STATUS+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% RETAIN+3~, STATUS+2~, STATUS+6*, STATUS+7, STATUS+8, STATUS+11, STATUS+12, STATUS+15, STATUS+16, STATUS+21
D RETAIN+3~
D0 RETAIN+3~
DA RETAIN~, RETAIN+2, RETAIN+5, STATUS~, STATUS+4, STATUS+6, STATUS+21
DI RETAIN+3~
DIC RETAIN+3~, RETAIN+4*
DIE RETAIN+3~, RETAIN+4*
DQ RETAIN+3~
DR RETAIN+3~, RETAIN+4*
X RETAIN+3~, STATUS+2~, STATUS+8*, STATUS+9, STATUS+12*, STATUS+13, STATUS+16*, STATUS+17, STATUS+18, STATUS+19
Y RETAIN+3~, STATUS+2~, STATUS+9*, STATUS+13*, STATUS+19*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All