[NEWSboard IBMi Forum]

Threaded View

  1. #1
    Registriert seit
    Apr 2003
    Beiträge
    195

    Question [gelöst] SETLL und READ mit Gruppenwechsel ???

    Hallo allerseits,

    wieder einmal habe ich ein Problem bei dem ich nicht mehr weiterkomme.

    Eine vollprozedurale Datei die 3 Keyfelder mit jeweils 3 numerischen Stellen aufweist soll durchgelesen werden.
    Das Problem dabei. Jedes der Keyfelder kann mit Werten von - bis vorbelegt werden, wobei die Werte zwischen 1 und 999 liegen können. Festzuhalten ist, dass lediglich das erste Keyfeld einen Eintrag größer als 0 aufweisen muss.

    also z.B.:
    Key01: von 50 bis 51
    Key02: 0
    Key03: 0

    ist genauso möglich wie
    Key01: von 1 bis 900
    Key02: von 1 bis 999
    Key03: von 1 bis 999

    Ich setze also mit SETLL auf die Datei auf:
    Code:
    KeyLIST     SETLL FILE
    		Do 	  *Hival
                    READ  FILE
    		IF    %EOF(FILE)
    		LEAVE
    		ENDIF
    		.
    		.
    		.
    		
    		EndDo
    Wie muss ich vorgehen, damit bei Erreichen der jeweiligen BIS-Werte entsprechend reagiert werden kann?
    Wird z.B. bei Key03 der Wert 999 erreicht, so muss erneut mit folgenden Werten aufgesetzt werden:
    Key01: von 1 bis 900
    Key02: von 2 bis 999
    Key03: von 1 bis 999

    und wird bei Key02 999 erreicht, so muss erneut aufgesetzt werden:
    Key01: von 2 bis 900
    Key02: von 1 bis 999
    Key03: von 1 bis 999

    Wie kann ich das ausprorammieren ohne Gruppenwechselschalter zu verwenden, die ja nur bei Primärdateien möglich sind?

    Ich bräuchte wirklich dringend wieder eure Hilfe bei diesem Problem.
    Danke schon mal im Voraus.
    Last edited by FNeurieser; 24-04-12 at 12:38. Grund: Thread kann als gelöst gekennzeichnet werden.

Similar Threads

  1. setll und %found
    By ssylten in forum IBM i Hauptforum
    Antworten: 6
    Letzter Beitrag: 10-10-06, 11:02
  2. Abbruch bei SETLL
    By haertl in forum NEWSboard Programmierung
    Antworten: 2
    Letzter Beitrag: 11-01-06, 14:00
  3. Zugriff auf Serielle Schnittstelle aus RPG/VARPG
    By Kampi4 in forum NEWSboard Programmierung
    Antworten: 13
    Letzter Beitrag: 25-11-05, 07:37
  4. Erstellen Trigger über SQL / Read Funktion
    By GHoffmann in forum IBM i Hauptforum
    Antworten: 0
    Letzter Beitrag: 07-07-05, 09:18
  5. VA RPG Read anweisung schlägt fehl
    By Peter Kosel in forum IBM i Hauptforum
    Antworten: 1
    Letzter Beitrag: 18-10-01, 12:49

Berechtigungen

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