Submit Question - CA Support Portal

Document ID : KB000093600
Last Modified Date : 11/05/2018
Show Technical Document Details
Introduction:
We are trying to run command YBLDDBFLST but getting an error. 
Question:
We are trying to run command YBLDDBFLST but getting an error below. ------------------------------------------------------------------------------------------------------------------------------------------------------------- >> YBLDDBFLST FILE(AMAGEN/*ALL) Object YDBFLST in library QTEMP not found. Output file YDBFLST created in library QTEMP. Member TEMPLST added to output file YDBFLST in library QTEMP. 2570 records added to member TEMPLST in file YDBFLST in QTEMP. Object YDBFLST1 in library QTEMP not found. Tried to refer to all or part of an object that no longer exists. Function check. MCH3402 unmonitored by QDBCNVFT at statement *N, instruction X'1260'. File not created. Cannot create duplicate file YDBFLST1 in QTEMP. 0 objects duplicated. 1 objects not duplicated. 0 objects duplicated. 1 objects not duplicated. .. CALL *LIBL/YSTRY2R1C PARM(*INITIAL) Bottom Press Enter to continue. F3=Exit F5=Refresh F12=Cancel F17=Top F18=Bottom 
Environment:
IBM Iseries AS400
Answer:
Use CPYF to copy existing file to another file. EG Copy YDBFLST in library to YDBFLST to another library with "From member" set to *ALL and "To member or label" set to *FROMMBR, "Replace or add records" set to *REPLACE and "Create file" *YES >> Then use DLTF to delete files YDBFLST1 and YDBFLST from the ORIGINAL library (NOT the backup library) Then use YBLDDBFLST to build the new lists with the same names as the old lists in the backup file Then use CPYF again to copy the data back from the backup file making sure that the 'Record format field mapping' value is set to *MAP and *DROP and the 'From member' is set to *ALL, the 'To member or label' set to *FROMMBR, the 'Replace or add records' set to *REPLACE and the 'Create file' set to *NO.