|
View previous topic :: View next topic
|
| Author |
Message |
GaganGarg
Active User
Joined: 31 Mar 2010
Posts: 134
Location: India
|
|
|
|
Hi,
I have a requirement to list down PDS member names in a PS file for which profile is PACK ON. Could anybody please give an idea on this? |
|
| Back to top |
|
 |
Nic Clouston
Global Moderator
Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK
|
|
|
|
| What is the problem that you are having? |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
that it is impossible to do it the way the TS asked...
the profile is a <virtual> entity that lasts only for the edit session...
( You could edit something in xxx.yyy.jcl using any profile  )
when opening the member again ISPF will use the JCL profile
giving warnings about PACK ON/OFF NUMBER ON/OFF CAPS ON/OFF
the only thing that can be done is to edit every member using an edit macro to check if
the pack option is set !
see here
www.ibmmainframes.com/viewtopic.php?t=25947&highlight=
the relevant lines are
| Code: |
call $isred "(PACK) = PACK "
if pack = "ON" then do
call $isred "PACK OFF"
call $isred "END"
end
else do
call $isred "CANCEL"
end
|
just modify the inner macro to write the result |
|
| Back to top |
|
|
prino
Senior Member
Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania
|
|
|
|
| enrico-sorichetti wrote: |
| that it is impossible to do it the way the TS asked... |
Theoretically you could look at the first 4 (or is it 8) bytes of the data set/member... |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
| Quote: |
| Theoretically you could look at the first 4 (or is it 8) bytes of the data set/member... |
yes, but ...
 |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
/continuation on
not for the faint of hart,
the first 4 bytes could be
'000140c6'x or '000140e5'x
and the next four bytes would contain the LRECL for FB datasets or the LRECL - 4 for VB datasets |
|
| Back to top |
|
|
prino
Senior Member
Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania
|
|
|
|
| enrico-sorichetti wrote: |
/continuation on
not for the faint of hart,
the first 4 bytes could be
'000140c6'x or '000140e5'x
and the next four bytes would contain the LRECL for FB datasets or the LRECL - 4 for VB datasets |
And the really funny thing is editing a dataset or member and manually putting in those bytes, and follow them with junk.  |
|
| Back to top |
|
|
|
|
