[NEWSboard IBMi Forum]

Hybrid View

  1. #1
    Registriert seit
    Aug 2001
    Beiträge
    2.928

    Chain

    Hallo Peter,

    wenn Du alle Sätze verarbeiten willst, verwendest Du am besten einen Chain, statt des ReadC.
    Du fängst mit Subfile-Zähler 1 an und zählst hoch, bis Du nichtmehr findest.

    Code:
     /Free
        For S1Zae = 1 to 9999;
             Chain S1Zae MySfLFmt;
             If  Not %Found;
                 leave;
             EndIf;
             //Verarbeitung
        EndFor;
     /End-Free
    Ansonsten gibt es noch die Möglichkeiten SFLNXTCHG ohne Bezugszahl zu verwenden, oder die Bezugszahl beim Write bzw. Update des Subfile-Records auf *On zu setzen.

    Birgitta
    Birgitta Hauser

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

  2. #2
    Registriert seit
    May 2002
    Beiträge
    1.121
    Zitat Zitat von B.Hauser
    Code:
     /Free
        For S1Zae = 1 to 9999;
             Chain S1Zae MySfLFmt;
             If  Not Found;
                 leave;
             EndIf;
             //Verarbeitung
        EndFor;
     /End-Free
    Hallo Birgitta!

    muss es nicht
    Code:
    ...
       If Not %Found;
    ....
    heißen ??

    Gruß Ronald

  3. #3
    Registriert seit
    Aug 2001
    Beiträge
    2.928

    %Found

    Hallo,

    das kommt davon, wenn man schnell was runtertippt, es muss natürlich %Found heissen.
    Ich habe es im ursprünglich geposteten Beispiel geändert!

    Birgitta
    Birgitta Hauser

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

Similar Threads

  1. Cursor in Subfile - Cobol
    By Anette in forum NEWSboard Programmierung
    Antworten: 7
    Letzter Beitrag: 24-07-06, 20:52
  2. KEYED DATA QUEUES SUBFILE DESCEND RPGLE
    By borwegen in forum NEWSboard Programmierung
    Antworten: 4
    Letzter Beitrag: 30-06-06, 09:04
  3. subfile erste seite
    By steven_r in forum IBM i Hauptforum
    Antworten: 2
    Letzter Beitrag: 30-05-06, 07:58
  4. Subfile Drop
    By steven_r in forum NEWSboard Programmierung
    Antworten: 1
    Letzter Beitrag: 22-05-06, 13:56
  5. Subfile aus einer Subfile?
    By Toschie in forum NEWSboard Programmierung
    Antworten: 4
    Letzter Beitrag: 08-06-05, 14:21

Berechtigungen

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