On 15 Jun 2015 03:43:38 -0700, in bit.listserv.ibm-main you wrote: >Charles Mills wrote: > >>SMF record formats are all documented (some a lot more thoroughly than others >>LOL). > >Of course. Just have a good calculator ready... ;-D > > >>Having somehow queued your records for further processing, you can do >>analysis to your heart's content in assembler, COBOL, or your language of >>choice. > >With COBOL? Can you read RAW SMF records like SMF type 30 with all its >sections with COBOL? [1] With Assembler that is easy and I have written >numerous Assembler programs, but for COBOL, I need to read+copy raw SMF >records with an Assembler program and then re-read/process those copied >records with a COBOL program.
I have processed SMF types 14/15, 30, 62 and 64 with COBOL. I reading the VBS files you need RECORDING S on the FD. The major pains are having to have separate FD (file descriptors) for VB and VBS, having to be indirect in dealing with bit fields and 1 byte binary and there being no mechanical way to get the SMF record descriptions. Actually COBOL could be made more useful by having a tool that converts DSECTs to COBOL record descriptions thus opening up the ability to easily call various IBM routines. The SMF 30 records (and others) can be parsed using the field-name (offset : length) construct. Clark Morris > >How do you handle variable record lengths and varying sections lengths and >quantities and their offsets with COBOL? Any examples, please? > >Now, Can you do that same reading and handling raw SMF records with REXX, >Perl, PL/I [I believe you can, I faintly remembered seeing some ancient progs >for SMF handling], etc? > >Oh, ICETOOL has already some nice examples, but I also don't see a way to >handle SMF records like SMF type 30 and all their sections. > >TIA. > >Groete / Greetings >Elardus Engelbrecht > >[1] - I have written COBOL programs but for fixed record lengths, like SMF 17, >SMF 18 and such. Those COBOL programs were needed to trap culprits who >deleted/renamed datasets (and said 'I did not do that!') before RACF was fully >in place. > >---------------------------------------------------------------------- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
