|
The only place those *proc, *status values are recognized is in the SDS datasructure. When you are passing them to the other program as a DS it doesn't know what to do with them. Change your definitions as below and it should work fine Dwight **************************************************************** * Program Status Data Structure **************************************************************** D MYPSDS SDS D Prog_Name 1 10 Procedure Name D PGM_Status 11 15S 0 Status Code D Prv_Status 16 20S 0 Previous Status D Line_Num 21 28 Src List Line Num D Routine 29 36 Routine Name D Parms 37 39S 0 Num Passed Parms D Excp_Type 40 42 Exception Type D Excp_Num 43 46 Exception Number D PGM_LIB 81 90 Program Library D Excp_Data 91 170 Exception Date D Excp_ID 171 174 Exception ID D Date 191 198 Date D Year 199 200S 0 Year D Last_File 201 208 Last File Used D File_Info 209 243 File error info D Job_Name 244 253 Job Name D User 254 263 User Name D Job_Num 264 269S 0 Job Number D Job_Date 270 275S 0 Job Date D Run_Date 276 281S 0 Run Date D Crt_Date 288 293 Create Date D Crt_Time 294 299 Create Time D Cpl_Level 300 303 Compiler Level D Src_File 304 313 Source File D Src_Lib 314 323 Source Library D Src_Mbr 324 333 Source Member D Proc_Pgm 334 343 Pgm Proc is in D Proc_Mod 344 353 Mod Proc is in
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.