×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
Here's a sample:
Ctl-opt
Debug(*Yes) Option(*SrcStmt: *NoDebugIO :*NoUnref) Optimize(*Basic)
ExtBinInt(*Yes)
;
D p_statds s *
D statds ds Based(p_statds)
D st_mode 10u 0
D st_ino 10u 0
D st_nlink 5u 0
D st_pad 2a
D st_uid 10u 0
D st_gid 10u 0
D st_size 10i 0
D st_atime 10i 0
D st_mtime 10i 0
D st_ctime 10i 0
D st_dev 10u 0
D st_blksize 10u 0
D st_allocsize 10u 0
D st_objtype 12a
D st_codepage 5u 0
D st_reserved1 62a
D st_ino_gen_id 10u 0
//--------------------------------------------------------------------
// data structures
//--------------------------------------------------------------------
Dcl-ds FileStats likeDs(StatDs);
st_mtime = st_mtime;
*inLR = *on;
Return;
In the original code, the fixed-format code was in an /INCLUDE.
-----Original Message-----
From: Edmund Reinhardt [mailto:edmund.reinhardt@xxxxxxxxxx]
Sent: Tuesday, January 03, 2017 2:44 PM
To: Rational Developer for IBM i / Websphere Development Studio Client for System i & iSeries <wdsci-l@xxxxxxxxxxxx>
Subject: Re: [WDSCI-L] Rational Developer for i V9.5.1.1 fixpack for V9.5 is now available!
Hi Justin,
Could you include the declarations.
I thought I had the renaming of subfields that are defined through LIKEDS fully implemented and tested. Are these subfields coming in from an external file, or other source?
Regards,
Edmund (E.H.)
Reinhardt
Technical Architect for Rational Developer for i
Phone: 1-905-413-3125 | Home: IBM
1-905-854-6195
E-mail: edmund.reinhardt@xxxxxxxxxx 8200 Warden Ave
RDi Community: ibm.biz/rdi_hub Markham, ON L6G 1C7
Find me on: LinkedIn: Canada
http://ca.linkedin.com/in/edmundreinhardt/
midrange.com
