[NEWSboard IBMi Forum]
  1. #1
    Registriert seit
    May 2005
    Beiträge
    60

    CallP über mehrere Zeilen im Free-Format

    Hallo,

    habe folgenden callp:

    CallP PgmCall(p_marktnr : p_tag : p_monat : p_tagbez
    : p_kzf1 : p_brotzKZ : p_tarif : p_mint : p_gleitzeit
    : p_brotzeit : p_bzsa : p_bzsp : p_zeit : p_bzul : p_ntzl
    : p_fzt : p_tags : p_zusi : p_na01 : p_brmi ) ;

    der Compiler mag weder + noch - als Fortsetzungszeichen.
    Erhalte folgende Fehler beim compile:
    327 CallP PgmCall(p_marktnr : p_tag : p_monat : p_tagbez
    328 : p_kzf1 : p_brotzKZ : p_tarif : p_mint : p_gleitzeit
    *RNF5501 20 328 017300 Der Kommentareintrag in einer Rechenbestimmung mit freiem
    Format ist ungültig.
    329 : p_brotzeit : p_bzsa : p_bzsp : p_zeit : p_bzul : p_ntzl
    *RNF5501 20 329 017400 Der Kommentareintrag in einer Rechenbestimmung mit freiem
    Format ist ungültig.
    330 : p_fzt : p_tags : p_zusi : p_na01 : p_brmi ) ;

  2. #2
    Registriert seit
    Mar 2005
    Beiträge
    148
    mach die doppelpunkte am ende der zeile.
    sollte dann laufen meine ich


    len = read(fd:
    %addr(Buff):
    %size(Buff));

    tuts bei mir subba
    Gruß
    Martin

  3. #3
    Registriert seit
    May 2005
    Beiträge
    60
    leider nicht...

  4. #4
    Registriert seit
    Mar 2005
    Beiträge
    148
    callp read(fd:
    %addr(Buff):
    %size(Buff));

    tuts aber auch bei mir
    Gruß
    Martin

  5. #5
    Registriert seit
    May 2005
    Beiträge
    60
    Danke hat geklappt.
    Es lag an den blanks zwischen Parameter-Namen und : .
    Solch ein Schrott...

  6. #6
    Registriert seit
    Mar 2002
    Beiträge
    5.287
    das ist doch kein Schrott, das ist Free Format RPG, der größte Fortschritt im Software Engineering seit der Erfindung der Lochkarte!

    Zitat Zitat von edig
    Danke hat geklappt.
    Es lag an den blanks zwischen Parameter-Namen und : .
    Solch ein Schrott...
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

  7. #7
    KM is offline [professional_User]
    Registriert seit
    Apr 2003
    Beiträge
    1.005
    Das hat doch nichts mit den Leerzeichen zwischen Parameternamen und Doppelpunkt zu tun. Wie die Fehlermeldung schon sagt, darfst Du halt nicht bis in den Kommentarbereich schreiben. Der beginnt glaube ich bei Stelle 81 im SEU. Du musst einfach nur früher Deinen Zeilenumbruch machen. Das ist alles.

    Gruß,
    KM

  8. #8
    Registriert seit
    Mar 2005
    Beiträge
    148
    sicher?
    bei /free gibts doch keinen kommentarbereich.
    das is ja das schöne dadran. keine festen bereiche mehr
    Gruß
    Martin

  9. #9
    KM is offline [professional_User]
    Registriert seit
    Apr 2003
    Beiträge
    1.005
    Oh doch. Ab Stelle 81 beginnt der Kommentarbereich. Du kannst nur bis Stelle 80 codieren. Probier's doch mal aus.

    Gruß,
    KM

  10. #10
    Registriert seit
    Aug 2001
    Beiträge
    2.873
    .... Wenn Du allerdings Kommentare ab Stelle 80 angeben willst, müssen auch diese mit Doppel-Slash (//) beginnen.

    Weder in RPG-Free-Format, noch in embedded SQL, noch z.B. bei SQL-Scripts, die über RunSQLSTM ausgeführt werden, darf Source-Code nach der 80. Stelle angegeben werden.

    Das war schon immer so und hat sich auch mit Release V5R4 nicht geändert.

    Birgitta
    Birgitta Hauser

    Anwendungsmodernisierung, Beratung, Schulungen, Programmierung im Bereich RPG, SQL und Datenbank
    IBM Champion seit 2020 - 4. Jahr in Folge
    Birgitta Hauser - Modernization - Education - Consulting on IBM i

  11. #11
    Registriert seit
    Mar 2002
    Beiträge
    5.287
    Da müsste man ja auch erst noch ein neues Lochkartenformat festlegen und da sei Herr Hollerith davor. Stelle 1 bis 4 Kartennummer, Stelle 6 Kartenart, Stelle 7 Steuerzeichen und ab Stelle 80 Kommentar zum Wiederholen der Anweisung, so haben wir das schon immer gemacht und das kann man ja mit so neumodischem Zeug wie Freeformat nicht ändern!

    )

    Zitat Zitat von B.Hauser
    .... Wenn Du allerdings Kommentare ab Stelle 80 angeben willst, müssen auch diese mit Doppel-Slash (//) beginnen.

    Weder in RPG-Free-Format, noch in embedded SQL, noch z.B. bei SQL-Scripts, die über RunSQLSTM ausgeführt werden, darf Source-Code nach der 80. Stelle angegeben werden.

    Das war schon immer so und hat sich auch mit Release V5R4 nicht geändert.

    Birgitta
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

Similar Threads

  1. Frei Porn Site!
    By Fucasdreh in forum NEWSboard Server Job
    Antworten: 0
    Letzter Beitrag: 10-01-07, 13:12
  2. Parameter empfangen in Free
    By kr1s in forum NEWSboard Programmierung
    Antworten: 6
    Letzter Beitrag: 08-09-06, 11:59
  3. CPYTOIMPF Format
    By Muchi in forum IBM i Hauptforum
    Antworten: 11
    Letzter Beitrag: 03-08-06, 09:41
  4. timestamp im free format
    By redsky in forum NEWSboard Programmierung
    Antworten: 2
    Letzter Beitrag: 04-05-05, 12:26

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • You may not post attachments
  • You may not edit your posts
  •