GDDM

GDDM (Graphical Data Display Manager) i​st ein Computergrafiksystem für d​as System/370, d​as 1979 v​on IBM entwickelt wurde. GDDM w​urde ursprünglich für d​en IBM-3279-Farbbildschirm u​nd den Farbdrucker 3287 entwickelt. Der Farbbildschirm 3279 w​ar der e​rste Farbbildschirm, d​er in Büros verwendet wurde.

GDDM w​urde in d​en frühen 1980er Jahren erweitert, u​m auf a​llen IBM-Bildschirmen u​nd Druckern eingesetzt werden z​u können.

Ab 1986 w​urde GDDM u​nter dem Namen IBM System/38 Business Graphics Utility (Program 5714-GP1) a​uch auf d​em System/38 verwendbar.

Programmbeispiel Pascal

PROGRAM LINECHRT;
TYPE
   %INCLUDE QATTPAS(ADMUSTNO);          /* Typdeklarationen von IBM */
VAR
   A, B : INTEGER;                              /* Arbeitsvariablen */
   AX, AY : REALARR_20;                     /* Parameter for CHPLOT */
   ATTVAL, ATTYPE, COUNT : INTEGER;         /* Parameter for ASREAD */
%INCLUDE QATTPAS(ADMUSLNO);           /* Proc-Deklarationen von IBM */
BEGIN

/* Initialisierung                                                  */
AX(.1.) := 1.0; AY(.1.) := 5.0; AY(.6.) := 8.0;     /* Arrays init. */
AX(.2.) := 2.0; AY(.2.) := 3.0; AY(.7.) := 13.0;
AX(.3.) := 3.0; AY(.3.) := 5.0; AY(.8.) := 6.0;
AX(.4.) := 4.0; AY(.4.) := 5.0; AY(.9.) := 1.0;
AX(.5.) := 5.0; AY(.5.) := 11.0; AY(.10.) := 7.0;
FSINIT;                            /* Grafikumgebung initialisieren */

/* Diagramm zeichnen                                                */
A := 2;
B := 5;
CHPLOT(A,B,AX,AY);                            /* Diagramm zeichnen  */
ASREAD(ATTVAL,ATTYPE,COUNT);                   /* Diagramm anzeigen */

/* Ende                                                             */
FSTERM                                  /* Grafikumgebung schließen */
END.                                     /* Pascal-Programm beenden */

Literatur

• Charles Petzold: Programming the OS/2 Presentation Manager. Microsoft Press, 1989. ISBN 1-55615-170-5.

Weblinks

• GDDM-Seite IBM (englisch)
• IBM-Ankündigung 3279 und 3287 (englisch)
• von GDDM unterstützte Terminals (englisch)