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

Package: Generic Code Sheet

Routine: GECSXMAP


Information

GECSXMAP ;WISC/RFJ-build template map ;01 Nov 93

Source Information

Source file <GECSXMAP.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Generic Code Sheet 1 $$YN^GECSUTIL  
VA FileMan 1 ^DIC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Generic Code Sheet 3 GECSDG  GECSENTR  GECSXBLD  
Registration 1 DGGECSB  

Entry Points

Name Comments DBIA/ICR reference
GETMAP(GECSDIE) ; get the template map for input template gecsdie
; returns gecsmap() array
  • ICR #1093
    • Status: Active
    • Usage: Private
    FIELD ; loop fields in dr string
    BUILD(GECSITDA)
    SELTEMP() ; select template
    ALLMAPS ; build all maps

    External References

    Name Field # of Occurrence
    ^DIC ALLMAPS+4, SELTEMP+3
    $$YN^GECSUTIL GECSXMAP+5

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"This program deletes template maps and recreates them",!,"from the input templates found in file 2101.4.",!
    • Line Location: GECSXMAP+2
    Function Call: WRITE
    • Prompt: !,Y(0,0)
    • Line Location: ALLMAPS+5
    Function Call: WRITE
    • Prompt: " INPUT TEMPLATE DOES NOT EXIST IN FILE 2101.4."
    • Line Location: BUILD+2
    Function Call: WRITE
    • Prompt: " INPUT TEMPLATE NOT FOUND IN FILEMANAGER."
    • Line Location: BUILD+3
    Function Call: WRITE
    • Prompt: ?40,"---Done---"
    • Line Location: BUILD+7
    Function Call: WRITE
    • Prompt: " NOT AN INPUT TEMPLATE FOR FILE 2100! MAP NOT BUILT!",!
    • Line Location: GETMAP+6
    Function Call: WRITE
    • Prompt: !
    • Line Location: SELTEMP+3
    Routine Call
    • DIC
    • Line Location:
      • ALLMAPS+4
      • SELTEMP+3

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD( FIELD+14
    ^DD(2100 FIELD+2
    ^DIE - [#.402] GETMAP+4, GETMAP+5
    ^DIE("B" BUILD+3
    ^GECS(2101.4 - [#2101.4] ALLMAPS+2, ALLMAPS+3, BUILD+2, BUILD+5!*, BUILD+6*

    Label References

    Name Line Occurrences
    $$SELTEMP GECSXMAP+8
    ALLMAPS GECSXMAP+6
    BUILD GECSXMAP+8, ALLMAPS+5
    FIELD GETMAP+8, GETMAP+9
    GETMAP BUILD+4

    Naked Globals

    Name Field # of Occurrence
    ^( GETMAP+5
    ^(0 FIELD+2, FIELD+14

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % GECSXMAP+3~, GECSXMAP+5*, GECSXMAP+6, BUILD+1~, BUILD+3*, BUILD+4, BUILD+5*, BUILD+6, SELTEMP+1~
    %Y SELTEMP+1~
    DA SELTEMP+1~
    DATADICT FIELD+2*, FIELD+4, FIELD+5, FIELD+9, FIELD+10, FIELD+14, FIELD+15, GETMAP+2~
    DIC ALLMAPS+1~, ALLMAPS+4*, SELTEMP+1~, SELTEMP+2*
    DIC("A" SELTEMP+2*
    DIC(0 ALLMAPS+4*, SELTEMP+2*
    DLAYGO SELTEMP+1~, SELTEMP+2*
    DRPIECE FIELD+2*, GETMAP+2~
    DRSTRING GETMAP+2~
    DRSTRING( GETMAP+5*
    DRSTRING(1 GETMAP+6, GETMAP+8, GETMAP+9
    DRSTRING(2 FIELD+10, FIELD+15
    FIELDDA FIELD+2*, FIELD+5, FIELD+9, FIELD+13*, FIELD+14, GETMAP+2~
    GECSDIE GETMAP~, GETMAP+4, GETMAP+5
    GECSDRDA GETMAP+2~, GETMAP+9*
    GECSGLOB FIELD+9*, GETMAP+2~
    GECSITDA GECSXMAP+3~, GECSXMAP+8*, ALLMAPS+1~, ALLMAPS+2*, ALLMAPS+3, ALLMAPS+5, BUILD~, BUILD+2, BUILD+5, BUILD+6
    GECSMAP BUILD+1~, BUILD+4, FIELD+5, FIELD+6*, FIELD+8*, FIELD+9, FIELD+14, FIELD+16, FIELD+17*, GETMAP+3!
    , GETMAP+7*
    GECSMAP( BUILD+5, FIELD+5*, FIELD+6*, FIELD+8*, FIELD+9*, FIELD+14*, FIELD+16, FIELD+17*
    GECSMAP(1 GETMAP+7*
    GECSMAP1 FIELD+1~, FIELD+11*, FIELD+14, FIELD+16*
    GECSNEXT FIELD+11*, FIELD+15*, GETMAP+2~
    GECSNM BUILD+1~, BUILD+2*, BUILD+3
    GECSPIEC FIELD+11*, FIELD+12, FIELD+13*, FIELD+15*, GETMAP+2~
    GECSTR FIELD+10*, FIELD+13, FIELD+15*, GETMAP+2~
    GECSTRIN FIELD+2, GETMAP+2~, GETMAP+8*, GETMAP+9*
    I GETMAP+2~, GETMAP+5*
    J GETMAP+2~, GETMAP+5*
    K GETMAP+2~, GETMAP+5*
    X ALLMAPS+1~, ALLMAPS+3*, GETMAP+2~, SELTEMP+1~
    >> XP GECSXMAP+4*
    Y ALLMAPS+1~, ALLMAPS+5, SELTEMP+1~, SELTEMP+4
    Y(0 ALLMAPS+5
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All