Datenfelder und Tabellen - MIDRANGE SHOP

bin.midrange.shop.com

Datenfelder und Tabellen - MIDRANGE SHOP

Datenfelder, Tabellen, und Datenstrukturen Kapitel 9 – Seite 21

CL0NO1NO2No3Factor1++++++++OpcdeFactor2++++ResultLenDHHIloEqComments

C MOVEL'Joe' MYNAME 20

C MYNAME LOKUPTABNAM TABSCO 90

C *IN90 IFEQ *ON

C

EXCPTPRINT

C

ENDIF

Abb. 9.17: ILE RPG-Suchprozess

Der gesuchte Schülername, der im Feld MYNAME enthalten ist,

wird bei der Suchoperation als Faktor eins verwendet. Die Suche

erfolgt in der Tabelle TABNames. Wenn dabei der Schülername

gefunden wird, wird Indikator 90 aktiviert und das entsprechende

Element in Tabelle TABScore zurückgegeben. Die verknüpfte

Tabelle, TABSCcore, enthält das dreistellige Prüfungsergebnis.

Beispiel

Kompilierungszeit-Datenfelder mit

Gesamtsummen in ILE RPG

Wie Tabellen werden Datenfelder, die bei Kompilierung geladen

werden, aus Einträgen im Programmquellcode geladen.

Übersicht

In diesem Beispiel werden zwei Kompilierungszeit-Datenfelder

für die Aufnahme von Schülernamen und die damit verknüpften

Prüfungsergebnisse verwendet. Unter Angabe der Prüfungsergebnisse

des Schülers wird eine Suche nach einem bestimmten

Schülernamen ausgeführt. Nachdem die Daten geladen wurden,

wird eine Gesamtsumme der Prüfungsergebnisse des Datenfelds

gebildet. Anschließend werden Schülername, das Prüfungsergebnis

und die Gesamtsumme aller Prüfungsergebnisse ausge-

Ein I.T.P.-Fachbuch

Weitere Magazine dieses Users
Ähnliche Magazine