CICS - READNEXT / READPREV

Lorsque nous émettons une commande STARTBR, cela ne rend pas les enregistrements disponibles. Il indique simplement par où commencer la lecture du fichier. Pour obtenir le premier enregistrement et la séquence après cela, nous devons utiliser la commande READNEXT.

• Les paramètres FILE, INTO et LENGTH sont définis de la même manière que dans la commande READ. Nous n'avons besoin que du paramètre FILE car CICS nous permet de parcourir plusieurs fichiers à la fois et cela indique celui que nous voulons lire ensuite.

• RIDFLD pointe vers une zone de données dans laquelle le CICS "renvoie" la clé de l'enregistrement qu'il vient de lire.

• La commande READPREV est presque comme READNEXT, sauf qu'elle nous permet de passer en arrière dans un ensemble de données au lieu d'avancer.

Syntaxe

Voici la syntaxe de la commande READNEXT / READPREV -

EXEC CICS READNEXT/READPREV
   FILE ('name')
   INTO (data-value)
   LENGTH (data-value)
   RIDFLD (data-value)
END-EXEC