Welcome to DDT DeBuggers

iSeries source code

No guarentees - very little documentation - and also no money involved . If you want the whole lot, a save file (targeting V5R4M0) is available. The code works perfectly well on V7R2M0.

Note that in the past I "sanatized" the library by stripping out some questionable MI code, but the latest release is complete: However, unless you do some very interesting things to your machine with SST, most of the MI programs will probably not restore and will definitely NOT run.

Note that the online source available below serves as a simple demonstration of database conversion where a iSeries library containing a bunch of source files has been converted (in this instance) to a SQlite database to allow publishing here.

Here you can browse online and cut snippets that you may find useful. A save file (UTILSsourceOnly.zip) of all of the source with OS target V4R5M0 is also available in Downloads. Note however that some of the code will not compile on such an early release - V5R4M0 is guaranteed to work. To build the library from source, create the CL program UTILSBLDC and call it with PARM('UTILS' 'V7R2M0') where the first parameter is the library name you have restored to, and the second is the OS release you need.

Exploring QREXSRC



MEMBER
Sequence
Data



MAKEFFD
1
/* ILE-C compile REXX proc */



MAKEFFD
2
/* PULL ObjectLIB & Target Release          */



MAKEFFD
3
PARSE ARG OLIB TGTRLS



MAKEFFD
4
/* PULL SourceLIB                           */



MAKEFFD
5
SLIB = OLIB



MAKEFFD
6
 



MAKEFFD
7
OUTPUT = '*PRINT'



MAKEFFD
8
 



MAKEFFD
9
/* ffd modules */



MAKEFFD
10
MO.1 = 'GETFFDR'



MAKEFFD
11
MO.2 = 'GETKEYR'



MAKEFFD
12
MO.3 = 'LSTFFDR'



MAKEFFD
13
MO.4 = 'LSTFINFR'



MAKEFFD
14
MO.5 = 'XPORTDATAR'



MAKEFFD
15
MO.6 = 'XPORTFILER'



MAKEFFD
16
 





Page: 1 of 29  Records: 460

Return