List all Source Code Lines - for Scan

ListSrcCode.sql

Select System_Table_Schema, System_Table_Name, System_Table_Member, Line_Number, Line 
  from Qsys2.SysPartitionStat cross join 
       Lateral(Select Line_Number, Cast(Line as VarChar(256)) Line
                 from Table(QSYS2.IFS_READ(Path_Name => '/QSYS.Lib/' 
                                                        concat Trim(System_Table_Schema) concat '.lib/' concat    
                                                               Trim(System_Table_Name)   concat '.file/' concat
                                                               Trim(System_Table_Member) concat '.mbr'))) x   
  Where     System_Table_Schema = 'YOURSCHEMA'
        and System_Table_Name   = 'YOURSRCF' 
--  Order By System_Table_Schema, System_Table_Name, System_Table_Member, Line_Number                                                                                                   
;

Nice! Your mastery of SQL is stunning.
You might consider prepending QSYS2. to SysPartitionStat above

I was looking from this.

Thanks Birgitta!!!