Re: [CMS-PIPELINES] Help with DIRECTORY pipe

2013-08-29 Thread Frank M. Ramaekers
Yes, that works quite nicely.   

 

Thanks,

Frank M. Ramaekers Jr.

 

> -Original Message-

> From: CMSTSO Pipelines Discussion List [mailto:CMS-

> pipeli...@vm.marist.edu] On Behalf Of Michael Harding

> Sent: Wednesday, August 28, 2013 3:42 PM

> To: CMS-PIPELINES@VM.MARIST.EDU

> Subject: Re: [CMS-PIPELINES] Help with DIRECTORY pipe

> 

> "something":

> '| Spec w1-7 n a: w8 . b: w9 . c: w10 . if a^=="" then // nw
if b^==""

> then /xxx/ nw if c^=="" then /xxx/ nw fi fi fi'

> 

> --

> Mike Harding

> z/VM System Support

> 

> mhard...@us.ibm.com <mailto:mhard...@us.ibm.com> 

> mikehard...@mindless.com <mailto:mikehard...@mindless.com> 

> (925) 926-3179 (w)

> (925) 323-2070 (c)

> /sp

> 

> 

> CMSTSO Pipelines Discussion List mailto:CMS-PIPELINES@vm.marist.edu> > wrote on

> 08/28/2013 01:16:20 PM:

> 

> > From: "Frank M. Ramaekers" mailto:framaek...@ailife.com> >

> > To: CMS-PIPELINES@vm.marist.edu <mailto:CMS-PIPELINES@vm.marist.edu>
,

> > Date: 08/28/2013 01:17 PM

> > Subject: Help with DIRECTORY pipe

> > Sent by: CMSTSO Pipelines Discussion List

> > mailto:CMS-PIPELINES@vm.marist.edu> >

> >

> > I want to go through the directory changing all USER statements with

> > passwords to  and all MDISK passwords to  for
storage

> > on our DR site.

> >

> >

> >

> > For the MDISK statements I only want to replace the password if one

> > exists, not insert one if it's omitted (blank).

> >

> >

> >

> > This is what I have so far:

> >

> >

> >

> >   "PIPE (endchar ?)",

> >

> >   "   <" !._InFile,

> >

> >   "|  SPEC 1-71 1",

> >

> >   "|  STRIP BOTH",

> >

> >   "|u:NOT ABBREV USER 1 ANYCASE",

> >

> >   "|m:NOT ABBREV MDISK 1 ANYCASE",

> >

> >   "|i:FANINANY",

> >

> >   "|  >" !._OutFile,

> >

> > "?u:",

> >

> >   "|l:ZONE W3 NFIND NOLOG"||,

> >

> >   "|p:ZONE W3 NFIND NOPASS"||,

> >

> >   "|a:ZONE W3 NFIND AUTOONLY"||,

> >

> >   "|b:ZONE W3 NFIND LBYONLY"||,

> >

> >   "|  SPEC W1-2 1 // NW W4-* NW",

> >

> >   "|  i:",

> >

> > "?l:",

> >

> >   "|  i:",

> >

> > "?p:",

> >

> >   "|  i:",

> >

> > "?a:",

> >

> >   "|  i:",

> >

> > "?b:",

> >

> >   "|  i:",

> >

> > "?m:",

> >

> >   "|  dosomething",

> >

> >   "| i:"

> >

> >

> >

> > Thoughts?  Ideas?

> >

> >

> >

> > Frank M. Ramaekers Jr. | Systems Programmer | Information Technology
|

> > American Income Life Insurance Company | 254-761-6649

> >

> >

> >


Re: [CMS-PIPELINES] Help with DIRECTORY pipe

2013-08-28 Thread Michael Harding
"something":
'| Spec w1-7 n a: w8 . b: w9 . c: w10 . if a^=="" then // nw if
b^=="" then /xxx/ nw if c^=="" then /xxx/ nw fi fi fi'

--
Mike Harding
z/VM System Support

mhard...@us.ibm.com
mikehard...@mindless.com
(925) 926-3179 (w)
(925) 323-2070 (c)
/sp


CMSTSO Pipelines Discussion List  wrote on
08/28/2013 01:16:20 PM:

> From: "Frank M. Ramaekers" 
> To: CMS-PIPELINES@vm.marist.edu,
> Date: 08/28/2013 01:17 PM
> Subject: Help with DIRECTORY pipe
> Sent by: CMSTSO Pipelines Discussion List 
>
> I want to go through the directory changing all USER statements with
> passwords to  and all MDISK passwords to  for storage on
> our DR site.
>
>
>
> For the MDISK statements I only want to replace the password if one
> exists, not insert one if it's omitted (blank).
>
>
>
> This is what I have so far:
>
>
>
>   "PIPE (endchar ?)",
>
>   "   <" !._InFile,
>
>   "|  SPEC 1-71 1",
>
>   "|  STRIP BOTH",
>
>   "|u:NOT ABBREV USER 1 ANYCASE",
>
>   "|m:NOT ABBREV MDISK 1 ANYCASE",
>
>   "|i:FANINANY",
>
>   "|  >" !._OutFile,
>
> "?u:",
>
>   "|l:ZONE W3 NFIND NOLOG"||,
>
>   "|p:ZONE W3 NFIND NOPASS"||,
>
>   "|a:ZONE W3 NFIND AUTOONLY"||,
>
>   "|b:ZONE W3 NFIND LBYONLY"||,
>
>   "|  SPEC W1-2 1 // NW W4-* NW",
>
>   "|  i:",
>
> "?l:",
>
>   "|  i:",
>
> "?p:",
>
>   "|  i:",
>
> "?a:",
>
>   "|  i:",
>
> "?b:",
>
>   "|  i:",
>
> "?m:",
>
>   "|  dosomething",
>
>   "| i:"
>
>
>
> Thoughts?  Ideas?
>
>
>
> Frank M. Ramaekers Jr. | Systems Programmer | Information Technology |
> American Income Life Insurance Company | 254-761-6649
>
>
>