RE: SQL to identify bad data in numeric columns

The easiest way to get the source code is to use ACS - Schemas.
Position on the database object ... right click GENERATE_SQL --> DDL and
you'll get the source code.
Another option to get the SQL Source code from a database object is to use
the GENERATE_SQL Stored Procedure

Here is the SQL Code retrieved with Reverse Engineering:

CREATE OR REPLACE FUNCTION SYSTOOLS/VALIDATE_DATA_FILE (
LIBRARY_NAME VARCHAR(10) FOR SBCS DATA ,
FILE_NAME VARCHAR(10) FOR SBCS DATA )
RETURNS TABLE (
VALIDATE_TIME TIMESTAMP ,
LIBRARY_NAME VARCHAR(10) FOR SBCS DATA ,
FILE_NAME VARCHAR(10) FOR SBCS DATA ,
MEMBER_NAME VARCHAR(10) FOR SBCS DATA ,
RELATIVE_RECORD_NUMBER BIGINT ,
SQL_WARNING INTEGER ,
REASON_CODE INTEGER ,
COLUMN_NAME VARCHAR(128) FOR SBCS DATA ,
WARNING_TEXT VARCHAR(1000) FOR SBCS DATA )
LANGUAGE SQL
SPECIFIC SYSTOOLS/VALID_FIL
NOT DETERMINISTIC
MODIFIES SQL DATA
CALLED ON NULL INPUT
NO EXTERNAL ACTION
NOT FENCED
SYSTEM_TIME SENSITIVE NO
SET OPTION ALWBLK = *ALLREAD ,
ALWCPYDTA = *OPTIMIZE ,
COMMIT = *NONE ,
DECRESULT = (31, 31, 00) ,
DFTRDBCOL = QSYS2 ,
DLYPRP = *NO ,
DYNDFTCOL = *NO ,
DYNUSRPRF = *USER ,
SRTSEQ = *HEX
BEGIN