AS/400 administration, AS/400 backup, AS/400 commands, AS/400 database, AS/400 DB2, AS/400 development, AS/400 error messages, AS/400 errors, AS/400 FTP, AS/400 jobs, AS/400 performance, AS/400 printing, AS/400 Query, AS/400 security, AS/400 Spool Files, AS/400 Subfiles, AS/400 user profiles, AS400 physical file, BRMS, CL, CL Program, CL programming, CL programs, CL/400, Client Access, CLLE, CLP, COBOL, COBOL/400, DDS, i5, i5/OS, IFS, iSeries, iSeries RPG programming, iSeries V6R1, OS/400, Physical File, PTFs, RPG, RPG ILE, RPG/400, RPGILE, RPGLE, Spool files, SQLRPGLE, Subfile, V5R3, V5R4, V6R1 VIEW ALL TAGS
I created this pgm to check if a file is being locked. I would like to trap if there is a hold lock. If I can I would like to loop back if there is a hold until the hold is released. WRKOBJLCK OBJ(MCPARMS) OBJTYPE(*FILE) MONMSG MSGID(CPF9898) EXEC(PARMLCK: SNDUSRMSG + MSG('File MCPARMS in Library...
to a AS/400 physical file through a cl program? how can I do this?