CL programs are “control language” they are not designed nor have the flexibility to add or update individual records in a file. You are better off using RPGLE or SQL to do the task. The code will be much cleaner.
Register Hereor login if you are already a member
DCL VAR(&fieldday) TYPE(*CHAR) LEN(6)
CHGVAR VAR(&fieldday) VALUE('ddmmyy')
RUNSQL SQL('UPDATE file1 +
SET field3 = '' '' +
WHERE field1 = ''' || &fieldday || ''' ') +
VAR(&fieldday) TYPE(*CHAR) LEN(6) => this is keyvalue of Enduser input, But in database field1(field type = open). Can you show me how to convert to same same
Thanks So much
PS: pls, can you give me your email.