RPG (IBM i / AS/400) · File status code
What does Status Code 00401 mean in RPG (IBM i / AS/400)?
An IN or OUT operation (or an implicit *LDA/DTAARA data structure) referenced a data area object that doesn't exist in the library being searched.
An IN or OUT operation (or an implicit *LDA/DTAARA data structure) referenced a data area object that doesn't exist in the library being searched.
Create the data area before running the program, or check that the DTAARA keyword and library qualification point at the correct object, especially after moving code between environments.