Brauche Hilfe bei ersten Gehversuchen in RPG

[ASY]

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 * * * * *

[jajonowak]

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

[ASY]

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

[jajonowak]

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

[ASY]

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.

Muß ich sonst noch etwas Erstellen ?

[jajonowak]

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

[ASY]

Danke für die Antwort werde dan mal versuchen die Datenbank ADREPF zu erstellen.

Muß ich sonst noch etwas Erstellen ?

So die Datenbank ADREPF ist Funktionabel

Leider Bekomme ich immer noch die Papnase vom Compiler

Hier die Aktuelle Liste:

*...+....1....+....2....+....3....+....4....+....5 ....+....6....+....7....+....8....+....9....+....0 ....+....1....+....2....+....3
5722WDS V5R2M0 020719 RN IBM ILE RPG ASY1/SETADRSTAT M170PUB1 17.06.05 07:54:09 Seite 1
Befehl . . . . . . . . . . . . . : CRTBNDRPG
Ausgegeben von . . . . . . . . . : ASY
Programm . . . . . . . . . . . . : SETADRSTAT
Bibliothek . . . . . . . . . . . : ASY1
Text 'Beschreibung' . . . . . . : *SRCMBRTXT
Quellenteildatei . . . . . . . . : SETADRSTAT
Quellendatei . . . . . . . . . . : QRPGLESRC
Bibliothek . . . . . . . . . . . : ASY1
CCSID . . . . . . . . . . . . . : 273
Text 'Beschreibung' . . . . . . : Setzen Adress-Status
Letzte Änderung . . . . . . . . : 17.06.05 05:14:28
Generierungsbewertungsstufe . . : 10
Standardaktivierungsgruppe . . . : *YES
Umwandlungsprogrammauswahlmögl. : *XREF *GEN *NOSECLVL *SHOWCPY
*EXPDDS *EXT *NOSHOWSKP *NOSRCSTMT
*DEBUGIO *NOEVENTF
Testhilfesichten . . . . . . . . : *SOURCE
Ausgabe . . . . . . . . . . . . : *PRINT
Optimierungsstufe . . . . . . . : *NONE
Quellenlisteneinrückung . . . . : *NONE
Umsetzungsauswahlmögl. eingeben : *NONE
Sortierfolge . . . . . . . . . . : *HEX
Sprachen-ID . . . . . . . . . . : *JOBRUN
Programm ersetzen . . . . . . . : *NO
Benutzerprofil . . . . . . . . . : *USER
Berechtigung . . . . . . . . . . : *LIBCRTAUT
Numerische Daten abschneiden . . : *YES
Numerische Daten korrigieren . . : *NONE
Ziel-Release . . . . . . . . . . : *CURRENT
Nullwerte zulassen . . . . . . . : *NO
Bedingungsnamen definieren . . . : *NONE
Leistungsdatenerfassg. aktivieren: *PEP
Profildefinitionsdaten . . . . . : *NOCOL
LIC-Optionen . . . . . . . . . . :
Prog.-Schnittstelle generieren . : *NO
Verzeichnis einschließen . . . . :
5722WDS V5R2M0 020719 RN IBM ILE RPG ASY1/SETADRSTAT M170PUB1 17.06.05 07:54:09 Seite 2
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 050617 000200
*--------------------------------------------------------------------------------------------*
* RPG-Name Externer Name *
* Dateiname . . . . . . . . : ADREPF ASY1/ADREPF *
* Satzformat(e) . . . . . . : ADREPFR ADREPFR *
*--------------------------------------------------------------------------------------------*
3=IADREPFR 1000001
*--------------------------------------------------------------------------------------------* 1
* RPG-Satzformat . . . . . . : ADREPFR * 1
* Externes Format . . . . . : ADREPFR : ASY1/ADREPF * 1
*--------------------------------------------------------------------------------------------* 1
4=I P 1 16 5FELDVERSU Test Acker von ASY 1000002
5 C READ ADREPF ----80 050616 000300
6 C DOW *IN80=*OFF B01 050616 000400
7 C IF ADRORT=*BLANKS B02 050616 000500
8 C EVAL ADRSTAT='U' 02 050616 000600
9 C UPDATE ADRFMT 02 050616 000700
10 C ENDIF E02 050616 000800
11 C READ ADREPF ----80 01 050616 000900
12 C ENDDO E01 050616 001000
13 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 17.06.05 07:54:09 Seite 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
*RNF7066 00 2 000200 Satzformat ADREPFR für Eingabe oder Ausgabe nicht
verwendet.
*RNF7030 30 9 000700 Der Name oder die Bezugszahl/der Anzeiger ADRFMT ist nicht
definiert.
*RNF7030 30 7 000500 Der Name oder die Bezugszahl/der Anzeiger ADRORT ist nicht
definiert.
*RNF7030 30 8 000600 Der Name oder die Bezugszahl/der Anzeiger ADRSTAT ist nicht
definiert.
*RNF7503 30 7 000500 Ausdruck enthält einen Operanden, der nicht definiert ist.
*RNF7503 30 8 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 17.06.05 07:54:09 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
ADREPF DISK 2D 5 11
ADREPFR 2D 3
Globale Feldverweise:
Feld Attribute Verweise (D=Definiert M=Modifiz.)
*INLR N(1) 13M
*IN80 N(1) 6
*RNF7030 ADRFMT **UNDEF** 9
*RNF7030 ADRORT **UNDEF** 7
*RNF7030 ADRSTAT **UNDEF** 8M
*RNF7031 FELDVERSU P(30,5) 4D
Bezugszahlen-/Anzeigerverweise:
Bez./Anz. Verweise (D=Definiert M=Modifiz.)
80 5D 6 11D
LR 13M
* * * * * 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 17.06.05 07:54:09 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 17.06.05 07:54:09 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.
*RNF7066 00 1 Satzformatname der extern beschriebenen Datei wird nicht
verwendet.
*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.
* * * * * 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 17.06.05 07:54:09 Seite 7
E n d z u s a m m e n f a s s u n g
Nachrichtenübersicht:
Informationsnachricht (00) . . : 2
Warnung (10) . . : 0
Fehlernachricht (20) . . : 0
Schwerwiegender Fehler (30+) . : 5
--------------------------------- -------
Summe . . . . . . . . . . . . . : 7
Quellensätze insgesamt:
Sätze . . . . . . . . . . . . . : 13
Bestimmungen . . . . . . . . . : 13
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 30 im Programm gefunden.
* * * * * E N D O F C O M P I L A T I O N * * * * *

[jajonowak]

hi asy

tja eine db besteht halt aus name satz und feldern!
wenn ich nun ein programm abschreibe und keine db habe, muss ich halt die db genauso aufbauen wie das pgm es haben will.

rpg steht eigentlich nicht für raten probieren glauben!

es gibt jetzt 2 möglichkeiten,
1. du änderst das pgm so ab das es zu deiner db passt
2. du änderst die db so ab das es zu dem pgm passt.


lg
hans-joachim

[ASY]

hi asy

tja eine db besteht halt aus name satz und feldern!
wenn ich nun ein programm abschreibe und keine db habe, muss ich halt die db genauso aufbauen wie das pgm es haben will.

rpg steht eigentlich nicht für raten probieren glauben!

es gibt jetzt 2 möglichkeiten,
1. du änderst das pgm so ab das es zu deiner db passt
2. du änderst die db so ab das es zu dem pgm passt.


lg
hans-joachim

Arbeite gerade an der 2ten möglichkeit.

Muß ich jetzt alle Variablen so definieren wie ADREPF ?

Habe jetzt in der Datenbank alle Variablen als Datenbank Dateien eingerichtet.

Als was muß ich sie nun definieren ?

Mit definition als Felder mault der Compiler wieder .

Komme ich zum erfolg wenn ich die Datenbankdefinition Satzformat nehme ?

[kuempi von stein]

Arbeite gerade an der 2ten möglichkeit.

Muß ich jetzt alle Variablen so definieren wie ADREPF ?

Habe jetzt in der Datenbank alle Variablen als Datenbank Dateien eingerichtet.

Als was muß ich sie nun definieren ?

Mit definition als Felder mault der Compiler wieder .

Komme ich zum erfolg wenn ich die Datenbankdefinition Satzformat nehme ?

ich glaube du brauchst wirklich hilfe.

änder mal deine datei so, dass es ein satzformat ADRFMT statt ADREPFR gibt
und die felder ADRORT und ADRSTAT sollte es dann auch in dieser datei geben, sonst wird das nichts.
solange du äpfel mit birnen vergleichst kann das nix werden.

wie werner immer so schön sagte: man muss lesen können.
die umwandlungsliste sagt dir doch genau was nicht passt.
geh mal alle fehler mit wertigkeit 30 durch.

k.

[ASY]

ich glaube du brauchst wirklich hilfe.

änder mal deine datei so, dass es ein satzformat ADRFMT statt ADREPFR gibt
und die felder ADRORT und ADRSTAT sollte es dann auch in dieser datei geben, sonst wird das nichts.
solange du äpfel mit birnen vergleichst kann das nix werden.

wie werner immer so schön sagte: man muss lesen können.
die umwandlungsliste sagt dir doch genau was nicht passt.
geh mal alle fehler mit wertigkeit 30 durch.

k.

Endschuldigung für das Durcheinander aber ich habe erst mit RPG angefangen , und fange Praktisch unterm 0-Punkt an.

Din gerade dabei die Änderungen vor zu nehmen.

Mit besten Dank für die Unterstützung ASY

[jajonowak]

hallo asy,

gerade dann solltest du nicht mit schnupper-teilen anfangen
sondern solltest ein paar euronen investieren und von ganz vorne anfangen!

lg u. schönes wocheende

hans-joachim