|
View previous topic :: View next topic
|
| Author |
Message |
ganasrinivasan
New User
Joined: 06 Nov 2006
Posts: 27
Location: Montreal
|
|
|
|
Hi,
I am trying to restrict the ADATA output to contain only x'0030' (source records) and used below option during compilation:
//STEP1 EXEC PGM=ASMA90,
// PARM='ADATA,EXIT(ADEXIT(ASMAXADC(WRITE,TYPE(0030))))'
But i am not getting any records in my SYSADATA o/p. Can anyone suggest if i am missing something?
Note that I have compiled and linkedited ASMAXADC (as is). |
|
| Back to top |
|
 |
steve-myers
Active Member
Joined: 30 Nov 2013
Posts: 917
Location: The Universe
|
|
|
|
| I located the exit code in SASMSAM1 and its related doc in the Programmer's Guide. Now I'm not going to try to decipher the exit code for you, but I do not think you need the WRITE parameter for the exit. This is based on my reading of the Programmer's Guide and the doc in ASMAXADC. Just TYPE(0030) should be enough. |
|
| Back to top |
|
|
steve-myers
Active Member
Joined: 30 Nov 2013
Posts: 917
Location: The Universe
|
|
|
|
Besides, you're not going to save very much. Look at this summary from one of my programs
| Code: |
0000 1 171 0 0
0001 1 26 0 0
0002 2 48 0 0
000A 1 285 0 0
0010 1 276 0 0
0020 35 2,597 0 0
0030 9,930 2,242,016 55 79
0034 1,758 167,482 9 5
0035 1 160 0 0
0036 1,532 73,246 8 2
0040 161 5,313 0 0
0042 3,130 230,554 17 8
0044 1,199 77,808 6 2
0045 16 11,272 0 0
0060 3 1,168 0 0
0062 73 7,206 0 0
0080 62 3,958 0 0
0090 1 200 0 0 |
Your counts will most likely be similar to mine. The columns are record type, record count, bytes in records, % of records, % of bytes. Your type 30 records are almost 80% of the volume of data. I don't have the record types memorized, but 30 is source records. |
|
| Back to top |
|
|
steve-myers
Active Member
Joined: 30 Nov 2013
Posts: 917
Location: The Universe
|
|
|
|
A different, but smaller, program -
| Code: |
0000 1 167 0.04 0.05
0001 1 26 0.04 0.00
0002 2 48 0.09 0.01
000A 1 273 0.04 0.08
0010 1 276 0.04 0.08
0020 4 296 0.18 0.09
0030 1,108 246,941 51.79 76.28
0034 248 23,688 11.59 7.31
0036 267 12,746 12.48 3.93
0040 9 297 0.42 0.09
0042 357 26,229 16.69 8.10
0044 89 6,775 4.16 2.09
0045 16 2,597 0.74 0.80
0060 1 390 0.04 0.12
0062 28 2,453 1.30 0.75
0080 5 323 0.23 0.09
0090 1 200 0.04 0.06
2,139 RECORDS 323,725 BYTES |
|
|
| Back to top |
|
|
|
|
  |
All times are GMT + 6 Hours |
|
