View Full Version : Brauche Hilfe bei ersten Gehversuchen in RPG
Hallo ,
Ich bin gerade dabei mittels gastaccount bei Holger einige Kenntnise in Sachen RPG zu erlehrnen.
Leider habe ich beim nach schreiben eines testprogams von Holgers "Schnupperkursus" das Problem das einige Definitionen nicht da zu seihen scheinen.
Laut der fehlertabellen können einige Programpunkte nicht zugeordnet werden.
Laut dem Beispielscript vom "Schnupperkurs" ist das Programm aber korreckt.
Bin für Jegliche Hilfestellung dankbar :confused:
Hallo ,
Ich bin gerade dabei mittels gastaccount bei Holger einige Kenntnise in Sachen RPG zu erlehrnen.
Leider habe ich beim nach schreiben eines testprogams von Holgers "Schnupperkursus" das Problem das einige Definitionen nicht da zu seihen scheinen.
Laut der fehlertabellen können einige Programpunkte nicht zugeordnet werden.
Laut dem Beispielscript vom "Schnupperkurs" ist das Programm aber korreckt.
Bin für Jegliche Hilfestellung dankbar :confused:
Habe vergessen das script an zu geben hier als Nachtrag :
***************** Datenanfang ************************************************** *****************************************
0001.00 HDEBUG 050615
0002.00 FADREPF UF E DISK 050615
0003.00 C READ ADREPF 80 050615
0004.00 C DOW *IN80=*OFF 050615
0005.00 C IF ADRORT=*BLANKS 050615
0006.00 C EVAL ADRSTAT='U' 050615
0007.00 C UPDATE ADRFMT 050615
0008.00 C ENDIF 050615
0009.00 C READ ADREPF 80 050615
0010.00 C ENDDO 050615
0011.00 C EVAL *INLR=*ON 050615
******************Datenende ************************************************** *******************************************
zum einstieg RPG nutzen wir intern alte SOBA Online Kurse - dort kann man über Audio mit Beispielen auf der AS/400 den einsteig üben.
Bei Bedarf bitte kurze e-mail dann kläre ich intern ob wir die RPG Kurse weitergeben können und unter welchen Konditionen.
Mfg Gerhard Häge
www.soft-consult.net
hi asy,
existiert die datei die du verarbeiten willst in deiner bibliotheksliste? wenn ja, wären die fehlercodes des compilers sehr hilfreich!
lg
hans-joachim
hi asy,
existiert die datei die du verarbeiten willst in deiner bibliotheksliste? wenn ja, wären die fehlercodes des compilers sehr hilfreich!
lg
hans-joachim
Hier Bitte
Zeil.- <---------------------- Quellenbestimmungen ------------------------------><-- Bemerkungen --> Do S. Änd.- Src Folge-
Nummer ....1....+....2....+....3....+....4....+....5....+ ....6....+....7....+....8....+....9....+...10 Num Z. Datum ID nummer
Q u e l l e n l i s t e
1 HDEBUG 050616 000100
2 FADREPF UF E DISK 050616 000200
======> aaaaaaaaaa
*RNF2120 40 a 000200 Externe Beschreibungen für Datei ADREPF nicht gefunden; die
Datei wird ignoriert.
3 C READ ADREPF ----80 050616 000300
4 C DOW *IN80=*OFF B01 050616 000400
5 C IF ADRORT=*BLANKS B02 050616 000500
6 C EVAL ADRSTAT='U' 02 050616 000600
7 C UPDATE ADRFMT 02 050616 000700
8 C ENDIF E02 050616 000800
9 C READ ADREPF ----80 01 050616 000900
10 C ENDDO E01 050616 001000
11 C EVAL *INLR=*ON 050616 001100
* * * * * E N D E D E R Q U E L L E * * * * *
5722WDS V5R2M0 020719 RN IBM ILE RPG ASY1/SETADRSTAT M170PUB1 16.06.05 05:25:28 Seite 3
*...+....1....+....2....+....3....+....4....+....5 ....+....6....+....7....+....8....+....9....+....0 ....+....1....+....2....+....3
Z u s ä t z l i c h e D i a g n o s e n a c h r i c h t e n
Msg-ID Sv Nummer Folge Nachrichtentext
*RNF7030 30 7 000700 Der Name oder die Bezugszahl/der Anzeiger ADRFMT ist nicht
definiert.
*RNF7030 30 5 000500 Der Name oder die Bezugszahl/der Anzeiger ADRORT ist nicht
definiert.
*RNF7030 30 6 000600 Der Name oder die Bezugszahl/der Anzeiger ADRSTAT ist nicht
definiert.
*RNF7503 30 5 000500 Ausdruck enthält einen Operanden, der nicht definiert ist.
*RNF7503 30 6 000600 Ausdruck enthält einen Operanden, der nicht definiert ist.
* * * * * E N D E D E R Z U S Ä T Z L I C H E N D I A G N O S E N A C H R I C H T E N * * * * *
5722WDS V5R2M0 020719 RN IBM ILE RPG ASY1/SETADRSTAT M170PUB1 16.06.05 05:25:28 Seite 4
Q u e r v e r w e i s l i s t e
Datei- und Satzverweise:
Datei Einheit Verweise (D=Definiert)
Satz
*RNF7031 ADREPF DISK 2D 3 9
Globale Feldverweise:
Feld Attribute Verweise (D=Definiert M=Modifiz.)
*...+....1....+....2....+....3....+....4....+....5 ....+....6....+....7....+....8....+....9....+....0 ....+....1....+....2....+....3
*INLR N(1) 11M
*IN80 N(1) 4
*RNF7030 ADRFMT **UNDEF** 7
*RNF7030 ADRORT **UNDEF** 5
*RNF7030 ADRSTAT **UNDEF** 6M
Bezugszahlen-/Anzeigerverweise:
Bez./Anz. Verweise (D=Definiert M=Modifiz.)
80 3D 4 9D
LR 11M
* * * * * E N D E D E R Q U E R V E R W E I S L I S T E * * * * *
5722WDS V5R2M0 020719 RN IBM ILE RPG ASY1/SETADRSTAT M170PUB1 16.06.05 05:25:28 Seite 5
E x t e r n e V e r w e i s e
Statisch gebundene Prozeduren:
Prozedur Verweise
Keine Verweise in der Quelle.
Importierte Felder:
Feld Attribute Definiert
Keine Verweise in der Quelle.
Exportierte Felder:
Feld Attribute Definiert
Keine Verweise in der Quelle.
* * * * * E N D E D E R E X T E R N E N V E R W E I S E * * * * *
5722WDS V5R2M0 020719 RN IBM ILE RPG ASY1/SETADRSTAT M170PUB1 16.06.05 05:25:28 Seite 6
N a c h r i c h t e n z u s a m m e n f a s s u n g
Msg-ID Sv Nummer Nachrichtentext
*RNF7031 00 1 Kein Verweis auf den Namen oder die Bezugszahl/den Anzeiger
vorhanden.
*RNF7030 30 3 Der Name oder die Bezugszahl/der Anzeiger ist nicht
definiert.
*RNF7503 30 2 Ausdruck enthält einen Operanden, der nicht definiert ist.
*RNF2120 40 1 Externe Beschreibung für die als extern beschriebene Datei
nicht gefunden; die Datei wird ignoriert.
* * * * * E N D E D E R N A C H R I C H T E N Z U S A M M E N F A S S U N G * * * * *
5722WDS V5R2M0 020719 RN IBM ILE RPG ASY1/SETADRSTAT M170PUB1 16.06.05 05:25:28 Seite 7
E n d z u s a m m e n f a s s u n g
Nachrichtenübersicht:
Informationsnachricht (00) . . : 1
Warnung (10) . . : 0
Fehlernachricht (20) . . : 0
Schwerwiegender Fehler (30+) . : 6
--------------------------------- -------
Summe . . . . . . . . . . . . . : 7
Quellensätze insgesamt:
Sätze . . . . . . . . . . . . . : 11
Bestimmungen . . . . . . . . . : 11
Datensätze . . . . . . . . . . : 0
Bemerkungen . . . . . . . . . . : 0
* * * * * E N D E D E R E N D Z U S A M M E N F A S S U N G * * * * *
Umwandlung gestoppt. Fehler mit Bewertungsstufe 40 im Programm gefunden.
* * * * * E N D O F C O M P I L A T I O N * * * * *
hallo asy,
da die extern beschriebene datei verarbeitet werden soll, muß das programm ja irgendwoher wissen wie datei aussieht, also welche felder mit welchen attributen usw. . ohne diese info´s wirst du das pgm nie fehlerfrei durch die umwandlung kriegen!
dann sieh mal zu das der compiler die datei findet!
vielleicht solltest du dich auch mal vertrauensvoll an holger scherer wenden
hans-joachim
hallo asy,
da die extern beschriebene datei verarbeitet werden soll, muß das programm ja irgendwoher wissen wie datei aussieht, also welche felder mit welchen attributen usw. . ohne diese info´s wirst du das pgm nie fehlerfrei durch die umwandlung kriegen!
dann sieh mal zu das der compiler die datei findet!
vielleicht solltest du dich auch mal vertrauensvoll an holger scherer wenden
hans-joachim
Schonn getan aber noch keine Antwort erhalten .
Wie Gesagt ich habe exakt das Geschrieben was Holger im "Schnuper Kurs" geschrieben hat - bis auf eine Fehlermeldung die ich nicht hatte (wegen fehlender Bezugz-Zahl) .
Mal abwarten wie es weiter geht :confused:
ich habe mal holgers homepage besucht und der schnupperkurs ist eine leseprobe nicht mehr u. n. weniger.
wenn du das programm umwandeln willst musst du dir halt die db selbst erstellen.
lg
hans-joachim
ich habe mal holgers homepage besucht und der schnupperkurs ist eine leseprobe nicht mehr u. n. weniger.
wenn du das programm umwandeln willst musst du dir halt die db selbst erstellen.
lg
hans-joachim
Danke für die Antwort werde dan mal versuchen die Datenbank ADREPF zu erstellen.:rolleyes:
Muß ich sonst noch etwas Erstellen ?
hi,
es wäre vielleicht von vorteil mittels dfu ein paar datensätze zu erfassen da sich sonst pgm-seitig nicht viel tut.
lg
hans-joachim