Hi,
If you use SETLL 1, systeme will set you on the first row, but it is not necessary the rrn(1) if it does not exist.
-----Message d'origine-----
De : RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> De la part de Patrik Schindler
Envoyé : lundi 16 décembre 2024 12:50
À : RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Objet : [V4R5] File in arrival sequence: Correct way to place pointer at BOF
ATTENTION : Ce message provient d'une source EXTERNE. Veuillez n'ouvrir les liens ou pièces jointes que si vous êtes sûr de l'expéditeur.
Hello,
I have a PF that is used as temporary storage for a cpyfrmimpf. It has no keys whatsoever and is truncated before each run (rmvm, addpfm). I reference that file in RPGLE without the K flag, because it has no keys.
What is the correct way to place the file pointer at BOF?
Neither setll *START, nor *LOVAL work: The compiler complains that these are invalid. Setting it to 1 makes the program compile. But this is now based on the assumption that there is always a RRN 1 in the file.
Did some Googling but did not find enlightenment. Hints are welcome!
:wq! PoC
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
https://urldefense.com/v3/__https://lists.midrange.com/mailman/listinfo/rpg400-l__;!!J76aczzK!2sdWDXDWiRGKoT93ujpd-1y9tjTXR5Lb9t2SxzdJRab_N21LU9ChGJ2YwRFcMwF0osi3eaMw0B55UIw-lQ$
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
https://urldefense.com/v3/__https://archive.midrange.com/rpg400-l__;!!J76aczzK!2sdWDXDWiRGKoT93ujpd-1y9tjTXR5Lb9t2SxzdJRab_N21LU9ChGJ2YwRFcMwF0osi3eaMw0B6hLLgU9A$ .
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
midrange.com
