|
Hello All
I'm trying to obtain source information from a program ILE, on OUTFILE.
If you make these step via DSPOBJD on FILE, of an RPG/DDS/CLP and so on
you will obtain, on the designed outfile the "source" field properly
filled:
ODLBNM Libreria A 14 23 10
B612OMM
ODOBNM Oggetto A 24 33 10
ACP100D1
ODOBTP Tipo di oggetto A 34 41 8 *PGM
ODOBAT Attributo dell'oggetto A 42 51 10 RPG
ODSRCF Nome del file origine A 255 264 10
QRPGSRC
ODSRCL Libreria del file origine A 265 274 10
V610BPCSWK
ODSRCM Membro del file origine A 275 284 10
ACP100D1
ODSRCC Secolo modifica SRC: 0=19xx, A 285 285 1 1
ODSRCD Data modifica SRC (YYMMDD) A 286 291 6 011026
ODSRCT Ora modifica SRC (HHMMSS) A 292 297 6 135642
Now, if you make the same for ILE:
ODLBNM Libreria A 14 23 10
B820PMM
ODOBNM Oggetto A 24 33 10
ACP100D1
ODOBTP Tipo di oggetto A 34 41 8 *PGM
ODOBAT Attributo dell'oggetto A 42 51 10 RPGLE
ODSRCF Nome del file origine A 255 264 10
ODSRCL Libreria del file origine A 265 274 10
ODSRCM Membro del file origine A 275 284 10
ODSRCC Secolo modifica SRC: 0=19x A 285 285 1
ODSRCD Data modifica SRC (YYMMDD) A 286 291 6
ODSRCT Ora modifica SRC (HHMMSS) A 292 297 6
This info is somehow available, if you use WRKPGM, option 5, on the 3
screen you can have that:
Visualizzazione delle informazioni sul programma
Schermo 3
di 7
Programma . . . . . . : ACP100D1 Libreria . . . . . . . :
B820PMM
Prop. . . . . . . . . : SSA
Attributo del programma: RPGLE
Dettagli . . . . . . . : *MODULE
Immettere le opzioni, premere Invio.
5=Vis. descrizione 6=Stampa descrizione
Data Livello Dati
Opz. Modulo Libreria Attributo creaz. ottimizzaz. debug
5 ACP100D1 QTEMP RPGLE 27/05/03 *FULL *NO
Fine
F3=Uscita F12=Annull. F17=Inizio dati F18=Fine
Visualizzazione delle informazioni sul programma
Programma . . . . . . : ACP100D1 Libreria . . . . . . . :
B820PMM
Attributi del modulo:
Modulo . . . . . . . . . . . . . . . . . . . . : ACP100D1
Libreria . . . . . . . . . . . . . . . . . . : QTEMP
File origine . . . . . . . . . . . . . . . . . : QRPGLESRC
Libreria . . . . . . . . . . . . . . . . . . : V82WMMO
Membro origine . . . . . . . . . . . . . . . . : ACP100D1
Attributo del modulo . . . . . . . . . . . . . : RPGLE
Data/ora di creazione del modulo . . . . . . . : 27/05/03 15:54:27
Data/ora di modifica del file origine . . . . : 27/05/03 15:54:17
Identificativo serie caratteri codificati . . : 65535
Creazione dati . . . . . . . . . . . . . . . . : *UNOBS
Tabella di sequenza ordinamento . . . . . . . : *HEX
Identificativo lingua . . . . . . . . . . . . : *JOBRUN
Livello ottimizzazione . . . . . . . . . . . . : *FULL
Livello massimo ottimizzazione . . . . . . . . : *FULL
F3=Fine F12=Annull.
Now, how these info can be obtained into an OUTFILE?
Thanks
Davide
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.