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

Package: Generic Code Sheet

Routine: GECSDG


Information

GECSDG ;WISC/RFJ-pims dggecsb patch routine ;01 Nov 93

Source Information

Source file <GECSDG.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 ^DIC  EN1^DIP  EN^DIQ1  
Generic Code Sheet 1 GETMAP^GECSXMAP  

Entry Points

Name Comments DBIA/ICR reference
DGGECSB ;ALB/DMK/CMM - MAS PRINT A CODE SHEET ; 07/20/89
PRINT
END
FIELD
READ ;
KEY ;PRINT KEYPUNCH CODE SHEET
H1 ;
HEAD ;

External References

Name Field # of Occurrence
^DIC PRINT+3
EN1^DIP PRINT+10, KEY+6
EN^DIQ1 FIELD+20, H1+3
GETMAP^GECSXMAP FIELD+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: READ+4
Function Call: WRITE
  • Prompt: !!,?5,"MAS KEYPUNCH CODE SHEET ID#: "_HY
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: ?50,$P(^DD(2100,"9.1",0),"^")_": "_MD,!,QQ,!
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+5
Routine Call
  • DIC
  • Line Location:
    • PRINT+3

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)
^DD(2100 READ+3, HEAD+4
^DIE("B" FIELD+5
^GECS(2100 - [#2100] PRINT+6
^GECS(2101.2 - [#2101.2] FIELD+1
^UTILITY("DIQ1" END+2!, FIELD+19!, READ+3, READ+5!, KEY+1!, H1+1!, HEAD+2!

Label References

Name Line Occurrences
END PRINT+3
FIELD PRINT+8
H1 KEY+2
KEY PRINT+6
PRINT PRINT+3, PRINT+10, KEY+6
READ HEAD+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADAT READ+1~
BY PRINT+4*, END!, FIELD+8~, KEY+3*
CSDA PRINT+4*, END!, FIELD+9, READ+3, H1+2, HEAD+2
DA END!, FIELD+8~, FIELD+9*, H1+1~, H1+2*
DHD PRINT+9*, END!, FIELD+8~, KEY+4*
DIC PRINT~, PRINT+1*, PRINT+7!, PRINT+9*, FIELD+8~, FIELD+9*, KEY+3*, H1+1~, H1+2*
DIC("A" PRINT+1*
DIC("S" PRINT+2*
DIC(0 PRINT+1*
DIOEND PRINT+9*, END+1!
DIQ END!
DIQ(0 FIELD+18*, H1+2*
DR END!, FIELD+8~, FIELD+9*, FIELD+15*, FIELD+18*, H1+1~, H1+2*, H1+4
ENT FIELD+4~, FIELD+5*, FIELD+6, READ+1~, READ+2*, READ+3
FLDS PRINT+4*, END!, FIELD+8~, KEY+3*
FR PRINT+4*, PRINT+9, END!, FIELD+8~
GECS END!
GECS("TTF" PRINT+5*, FIELD
GECSEDIT END+1!, FIELD+1*, FIELD+2*, FIELD+5
GECSMAP END!, FIELD+6, FIELD+10
GECSMAP( FIELD+11, FIELD+12
GECSTT END!, FIELD*, FIELD+1
HDR END!, FIELD+18*, READ+2, H1+4*, HEAD+2*
HEAD READ+1~
HY PRINT+4*, END!, HEAD+3
L PRINT+9*, END!, FIELD+8~, KEY+3*
LOOP FIELD+8~, FIELD+10*, FIELD+11, FIELD+12, READ+1~, READ+2*, READ+4
MD HEAD+2*, HEAD+4, HEAD+6!
N1 FIELD+12*!
NEXT FIELD+8~, FIELD+11*, FIELD+12*, FIELD+13, FIELD+14, FIELD+16*, FIELD+17
PP FIELD+8~, FIELD+14*, FIELD+15
PRT READ+1~
QQ HEAD+1*, HEAD+4, HEAD+6!
SEMI FIELD+8~, FIELD+13*, FIELD+14, FIELD+16, FIELD+17*
SLASH FIELD+8~, FIELD+13*, FIELD+14, FIELD+17*
TO PRINT+4*, END!, FIELD+8~
X PRINT+3, PRINT+7!
Y PRINT+3, PRINT+4, PRINT+6, PRINT+7!, FIELD+8~
Y(0 PRINT+4, PRINT+5
>> ZTSAVE("CSDA" PRINT+9*, KEY+5*
>> ZTSAVE("DHD" KEY+5*
>> ZTSAVE("DIOEND" KEY+5*
>> ZTSAVE("HDR" PRINT+9*
>> ZTSAVE("^UTILITY(""DIQ1"",$J," PRINT+9*, KEY+5*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All