Racf user detail

2023-01-19 Thread saurabh khandelwal
Hello Group,

Hope you doing well.

We have requirement to find any activity detail related to racf user from
last 6 month.

For example, any addition , deletion of user or last access in user of all
users used system in last 6 month or if any user id revoked.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SFTP JOB Data parameter

2022-06-23 Thread saurabh khandelwal
Hello, Paul,

I, could not get you . Can you please help us to understand what exactly
you are looking

On Thu, Jun 23, 2022, 13:33 Paul Gilmartin <
042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

> On Thu, 23 Jun 2022 09:58:30 +0300, saurabh khandelwal  wrote:
> >
> >1)  Mainframe is getting file from windows. So, few of the files in
> >windows having today’s date and few of them having yesterday’s date(
> today-1) .
> >
> So there are multiple files ("few").  Do you know a priori which have
> today's
> date and which have yesterday’s date?
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SFTP JOB Data parameter

2022-06-23 Thread saurabh khandelwal
Dear Team,



Thanks for reply and helping me to resolve this issue.



1)  Mainframe is getting file from windows. So, few of the files in
windows having today’s date and few of them having yesterday’s date( today
-1) .

2)  For today’s date below code is the solution you all suggested and
worked out.



//SFTPB24E JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=,USER=STCSYS

//STEP0EXEC PGM=EZACFSM1

//SYSOUT   DD DSN=&,DISP=(,PASS),SPACE=(TRK,(1,0)),UNIT=VIO

//SYSINDD DATA,DLM=@@

OSHELL { echo 'lcd /u/op117/';  +

 echo 'cd /XX/Output/TMP';  +

 echo 'ASCII';  +

 echo 'get MDS_'; } |   +

 sftp -P  eftmfge...@10.222.xx.yy

 oget '/u/op117/MDS_' -

  'MCCP.DATA.XX.MDS.SFTP'

@@

//STEP1EXEC PGM=IKJEFT01,REGION=0M

//SYSEXEC  DD DISP=SHR,DSN=SYS1.SBPXEXEC

//OUTPUT   DD SYSOUT=*

//SYSTSPRT DD SYSOUT=*

//SYSTSIN  DD DISP=(OLD,PASS),DSN=&



3)  Now, to get the file into Mainframe using SFTP and oshell with
yesterday’s date is the step we failing. So, can you please help me to
change this code mentioned above to get yesterday’s file.



Thank you so much once again for help.

On Thu, Jun 23, 2022, 01:25 Farley, Peter x23353 <
031df298a9da-dmarc-requ...@listserv.ua.edu> wrote:

> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Paul Gilmartin
> Sent: Wednesday, June 22, 2022 12:29 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: SFTP JOB Data parameter
>
> On Wed, 22 Jun 2022 16:06:06 +, Sri h Kolusu wrote:
>
> 
> > > I for one prefer using the existing IBM utilities and there are
> utilities like DFSORT (of course I am biased towards it ) which does have
> plethora of Date arithmetic functions.
> >  I never mastered the syntax of DFSORT commands.
>
> IMHO SORT control syntax and usage are valuable and useful skills for any
> mainframe programmer to have.  One should make the effort to learn them if
> one can find the time; they make seemingly hard jobs far easier.  Start
> with small jobs and work your way up.
>
> I am still learning about SORT capabilities, though I have at least
> partially mastered using JOINKEYS (with the kind help of the esteemed Mr.
> Kolusu) to perform large matching and selecting operations I could not have
> easily solved otherwise.
>
> Not a master of that universe yet, only a journeyman at most.
>
> I'll match my awk skills against anyone's, but even there I am sure I have
> things to learn.
>
> The fun of learning new things is what makes each day easier to get
> through.
>
> Peter
> --
>
>
> This message and any attachments are intended only for the use of the
> addressee and may contain information that is privileged and confidential.
> If the reader of the message is not the intended recipient or an authorized
> representative of the intended recipient, you are hereby notified that any
> dissemination of this communication is strictly prohibited. If you have
> received this communication in error, please notify us immediately by
> e-mail and delete the message and any attachments from your system.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SFTP JOB Data parameter

2022-06-22 Thread saurabh khandelwal
Dear All,



Thanks you so much. Finally below code worked. But in this, we are getting
current (today’s date) but in some of the files, we are getting yesterday’s
date (today’s -1) .



How can we make this process work for yesterday’s date.







But in this, we are able to retrieve

//SFTPDOBM JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=,USER=STCSYS

//STEP0EXEC PGM=EZACFSM1

//SYSOUT   DD DSN=&,DISP=(,PASS),SPACE=(TRK,(1,0)),UNIT=VIO

//SYSINDD DATA,DLM=@@

OSHELL { echo 'lcd /u/op117/';  +

  echo 'cd /3DSecure/KWT/TMP';  +

 echo 'ASCII';  +

echo 'get NonMon_DailyExtract_KWT_'; } | +

 sftp -P  eftm...@10.222.xx.xx

oget '/u/op117/NonMon_DailyExtract_KWT_'-

 'NBFDP.XX.SECURE.DOBMOB.XX.SFTP'

@@

//STEP1EXEC PGM=IKJEFT01,REGION=0M

//SYSEXEC  DD DISP=SHR,DSN=SYS1.SBPXEXEC

//OUTPUT   DD SYSOUT=*

//SYSTSPRT DD SYSOUT=*

//SYSTSIN  DD DISP=(OLD,PASS),DSN=&

On Fri, Jun 17, 2022, 17:56 Bill Godfrey  wrote:

> The OP's input to sftp has "lcd /u/op117/"
> and later "get EBC-GOV-mmdd.txt".
> If the "get" command had slashes inside mmdd
> then it would look like this: "get EBC-GOV-/mm/dd.txt"
> and sftp would write a file named "/u/op117/dd.txt" if it found the file,
> and the OGET '/u/op117/EBC-GOV-mmdd.txt' command would not find the
> file that sftp wrote.
>
> I cannot read his mind, but I think the OP did not mean the slashes
> literally when he said
> "in this mmdd should be replace with year/month/date".
> The logic makes more sense if slashes are left out when the date is
> substituted.
>
> On Fri, 17 Jun 2022 07:14:16 -0500, John S. Giltner, Jr. wrote:
>
> >>Not quite, but:
> >>date '+get EBC-GOV-%Y/%m/%d.txt'
> >>
> >> o Why bother with "echo" of a command substitution?
> >> o IIRC, the OP specified slashes. (?!)
> >>Ex : EBC-GOV-mmdd.txt'   in this mmdd should be
> >>replace with
> >> year/month/date.
> >
> >My fault, did not read the whole thing.  I just saw mmdd as went with
> that, missed that it needed the "/" in there.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SFTP JOB Data parameter

2022-06-15 Thread saurabh khandelwal
Dear,



Now I am getting below error, while running this JCL code.



JCL



//SFTPSEBC JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=

//TAILOR  EXEC PGM=PGM=EZACFSM1

//SYSOUT   DD   DISP=(NEW,PASS,DELETE),DSN=,

// UNIT=VIO,SPACE=(TRK,(1))

//SYSINDD *

OSHELL { echo 'lcd /u/op117/';

  echo 'cd /FRB/EBCClearing/Staging/tmp';+

  echo 'ASCII'; +

  echo 'get EBC-GOV-'; } | +

sftp -P  eftmfge...@10.222.xx.xx

OGET '/u/op117/EBC-GOV-'  -

  'NBFDP.DATA.XX.XX.SFTP'

//STEP1   EXEC PGM=IKJEFT01,REGION=0M

//SYSEXEC  DD   DISP=SHR,DSN=SYS1.SBPXEXEC

//SYSTSIN   DD DSN=,DISP=(OLD,DELETE)

//OUTPUT DD SYSOUT=*

//SYSTSPRT DD SYSOUT=*

/*



Output below :



READY

OSHELL { echo 'lcd
/u/op117/';

 OSHELL RC =  256




 OSHELL Exit Status =
1



READY

  echo 'cd /FRB/EBCClearing/Staging/tmp';  echo 'ASCII'; echo 'get
EBC

.22.10

COMMAND ECHO NOT
FOUND

READY

OGET '/u/op117/EBC-GOV-220616.txt'
'NBFDP.DATA.XX.

RETURN CODE 0081, REASON CODE 05620062.  AN ERROR OCCURRED DURING THE
OPENIN

READY

END





FSUM7332 syntax error: got EOF, expecting }

On Wed, Jun 15, 2022, 21:45 Farley, Peter x23353 <
031df298a9da-dmarc-requ...@listserv.ua.edu> wrote:

> Thanks again Sri.  After reading those posts, I do see the issue.  That
> would be the "Don't break existing jobs" mantra.
>
> I would instead have said "Go ahead and break them in QA so we can fix the
> broken ones", but I don't pay the bills and "breaking them in QA" AssUMes
> that QA batch initiator classes are distinct from Production batch
> initiator classes, which isn't true at any large shop where I have worked.
>
> But I agree with Gil's final post in that thread - it should have been
> implemented as a new JCL option (similar to EXPORT SYMLIST) rather than an
> initiator class parameter.  Positive opt-in for jobs that want to use it,
> leave the others alone.  Perhaps a global parameter for the JCL interpreter
> to allow or disallow the new JCL option during the initial transition so
> shops could choose to allow or disallow use of the new JCL option to
> prevent accidental breakage by too-eager programmers until automated SDLC
> rules for JCL are updated and enforced.
>
> Water under the proverbial bridge now.  At least we have EZACFSM1 as an
> alternative, so that's good.
>
> Peter
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Sri h Kolusu
> Sent: Wednesday, June 15, 2022 1:32 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: SFTP JOB Data parameter
>
> >>> But that raises the question why NOT always allow system symbols in
> >>> every batch initiator?  Allowing them just seems like a no-brainer
> >>> to me
>
> Peter,
>
> There have been several discussions on IBM-MAIN about SYSSYM=ALLOW and
> here is a post which explains one of the reason.
>
> https://www.mail-archive.com/ibm-main@listserv.ua.edu/msg62638.html
>
> Thanks,
> Kolusu
> --
>
> This message and any attachments are intended only for the use of the
> addressee and may contain information that is privileged and confidential.
> If the reader of the message is not the intended recipient or an authorized
> representative of the intended recipient, you are hereby notified that any
> dissemination of this communication is strictly prohibited. If you have
> received this communication in error, please notify us immediately by
> e-mail and delete the message and any attachments from your system.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SFTP JOB Data parameter

2022-06-15 Thread saurabh khandelwal
Dear Bonnie,

Can we use PGM=EZACFSM1 with sftp also . I am not sure

On Wed, Jun 15, 2022, 17:37 Bonnie Barthel 
wrote:

> Look up PGM=EZACFSM1... it may be what you are looking for.
>
> Bonnie Barthel
> Senior IT Specialist
> 719.649.7888 Mobile
> bonnie.bart...@kyndryl.com
>
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Paul Gilmartin
> Sent: Wednesday, June 15, 2022 8:08 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: [EXTERNAL] Re: SFTP JOB Data parameter
>
> On Wed, 15 Jun 2022 13:11:05 +, Seymour J Metz  wrote:
>
> >Write a REXX script to do the file transfer. You can use the date('S')
> function to generate the date in the format mmdd, then parse out the
> component to build your dsn.
> >
> I would have done something similar.  But the OP was on a promising track,
> however circuitous, even reporting a partial success.  Let's not deflect
> him.
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SFTP JOB Data parameter

2022-06-15 Thread saurabh khandelwal
Hello Paul,

If I use rexx then how will I be able to use shell command in same job

On Wed, Jun 15, 2022, 17:08 Paul Gilmartin <
042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

> On Wed, 15 Jun 2022 13:11:05 +, Seymour J Metz  wrote:
>
> >Write a REXX script to do the file transfer. You can use the date('S')
> function to generate the date in the format mmdd, then parse out the
> component to build your dsn.
> >
> I would have done something similar.  But the OP was on a promising track,
> however circuitous, even reporting a partial success.  Let's not deflect
> him.
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SFTP JOB Data parameter

2022-06-15 Thread saurabh khandelwal
Hello Paul,

Thank for reply but system doesn't take %D as date variable.  It taking as
file name. So variable in file mmdd not getting replaced with actual
date

On Wed, Jun 15, 2022, 15:54 Paul Gilmartin <
042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

> On Wed, 15 Jun 2022 13:44:43 +0300, saurabh khandelwal  wrote:
> >
> >I am am running below Job in TSO env and getting to get file file from
> >windows to Mainframe env.
> >
> >Initially file was static and all worked well. But now, requirement is to
> >get the file, which has current time stamp on daily basis.
> >
> >Ex : EBC-GOV-mmdd.txt'   in this mmdd should be replace with
> >year/month/date.
> >
> # Change:
> echo 'get EBC-GOV-mmdd.txt'
>
> # to
> date '+get EBC-GOV-%D.txt'
>
> >
> >But I am unable to find way to achieve this goal. Can you please help on
> >this issue.
> >
> >//SFTPSEBC JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=
> >//STEP1   EXEC PGM=IKJEFT01,REGION=0M
> >//SYSEXEC  DD   DISP=SHR,DSN=SYS1.SBPXEXEC
> >//SYSTSIN   DD DSN=NP.LIB.CLIST(SFTPSEBC),DISP=SHR
> >//OUTPUT DD SYSOUT=*
> >//SYSTSPRT DD SYSOUT=*
> >/*
> >
> >EDIT   NP.LIB.CLIST(SFTPSEBB) - 01.01Columns 1
> >00072
> >
> >Command ===>  Scroll ===>
> >CSR
> >
> >07  OSHELL { echo 'lcd /u/op117/';
> >+
> >
> >08   echo 'cd /FRB/EBCClearing/Staging/tmp';
> >+
> >
> >09   echo 'ASCII';
> >+
> >
> >10   echo 'get EBC-GOV-mmdd.txt'; } | +
> >
> >11 sftp -P  eftmfge...@10.222.xx.xx
> >
> >
> >12 OGET '/u/op117/EBC-GOV-mmdd.txt'  -
> >
> >13   'NBFDP.DATA.XX.XX.SFTP'
> >
> >**  Bottom of Data
> >
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


SFTP JOB Data parameter

2022-06-15 Thread saurabh khandelwal
--


Dear All,



I am am running below Job in TSO env and getting to get file file from
windows to Mainframe env.



Initially file was static and all worked well. But now, requirement is to
get the file, which has current time stamp on daily basis.



Ex : EBC-GOV-mmdd.txt'   in this mmdd should be replace with
year/month/date.



But I am unable to find way to achieve this goal. Can you please help on
this issue.





//SFTPSEBC JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=

//STEP1   EXEC PGM=IKJEFT01,REGION=0M

//SYSEXEC  DD   DISP=SHR,DSN=SYS1.SBPXEXEC

//SYSTSIN   DD DSN=NP.LIB.CLIST(SFTPSEBC),DISP=SHR

//OUTPUT DD SYSOUT=*

//SYSTSPRT DD SYSOUT=*

/*







EDIT   NP.LIB.CLIST(SFTPSEBB) - 01.01Columns 1
00072

Command ===>  Scroll ===>
CSR

07  OSHELL { echo 'lcd /u/op117/';
+

08   echo 'cd /FRB/EBCClearing/Staging/tmp';
+

09   echo 'ASCII';
+

10   echo 'get EBC-GOV-mmdd.txt'; } | +

11 sftp -P  eftmfge...@10.222.xx.xx


12 OGET '/u/op117/EBC-GOV-mmdd.txt'  -

13   'NBFDP.DATA.XX.XX.SFTP'

**  Bottom of Data


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Sftp Vs connect direct

2022-04-16 Thread saurabh khandelwal
Hello Group,

Currently we are using connect direct in our environment for file transfer.
But now, our team like to migrate file transfer from connect direct to sftp.

I think, sftp doesn't have any mechanism to find that file has been
transferred successfully or not . If we are transferring any big file using
sftp and Network connection broken then how it's going to impact the file
transfer or sender should again initiate file transfer.

In connect direct case we get return code on sender and receiver side which
confirm if file transfer is perfectly sent to destination without any issue.

Can anybody guide me on this , which facility is best to use sftp or
connect direct

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Automatic ear deployment in WAS v9

2021-04-07 Thread saurabh khandelwal
Hello Group,


We are in the process to implement automation in WAS v9 to deploy EAR file
without any manual intervention.



For this, we created monitored directory and enabled Global deployment
option using WAS console.



Now, we have couple of issues to be addressed.



1 ) How to update any application EAR file, which is already installed and
running. I used below, config file for this.



#

# Header

#

#ResourceType=ApplicationDeployment

#ResourceType=Application

#ImplementingResourceType=Application

#ResourceId=Cell=!{cellName}:Deployment=!{applicationName}:ApplicationDeployment=

#

# Header

#

ResourceType=ApplicationDeployment

ImplementingResourceType=Application

CreateDeleteCommandProperties=true

ResourceId=Deployment=NbkAdapter37



# Properties

Name=NbkAdapter37

Update=true

operationType=update

contentType=app

contentFile=/was/profiles/MB_T4/temp/Package_ServerApp_4.7.8.ear

useDefaultBindings=true

#CreateDeleteCommandProperties=true



#EnvironmentVariablesSection



serverName=MBT4



But, system is not picking this new EAR file.



2) When we install new EAR file in this we like to create config file,
which should handle class loader option, Shared Library reference, which
Web Server to be mapped etc.



I tried looking at various IBM manual, but couldn’t make this work.



Can you please help.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


WAS v9 EAR Auto Deployment

2021-04-07 Thread saurabh khandelwal
Dear Kumar,



We are in the process to implement automation in WAS v9 to deploy EAR file
without any manual intervention.



For this, we created monitored directory and enabled Global deployment
option using WAS console.



Now, we have couple of issues to be addressed.



1 ) How to update any application EAR file, which is already installed and
running. I used below, config file for this.



#

# Header

#

#ResourceType=ApplicationDeployment

#ResourceType=Application

#ImplementingResourceType=Application

#ResourceId=Cell=!{cellName}:Deployment=!{applicationName}:ApplicationDeployment=

#

# Header

#

ResourceType=ApplicationDeployment

ImplementingResourceType=Application

CreateDeleteCommandProperties=true

ResourceId=Deployment=NbkAdapter37



# Properties

Name=NbkAdapter37

Update=true

operationType=update

contentType=app

contentFile=/was/profiles/MB_T4/temp/Package_ServerApp_4.7.8.ear

useDefaultBindings=true

#CreateDeleteCommandProperties=true



#EnvironmentVariablesSection



serverName=MBT4



But, system is not picking this new EAR file.



2) When we install new EAR file in this we like to create config file,
which should handle class loader option, Shared Library reference, which
Web Server to be mapped etc.



I tried looking at various IBM manual, but couldn’t make this work.



Can you please help.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Auto Reply on SDSF Console

2020-12-12 Thread saurabh khandelwal
Dear All,

Thank you for your response.Problem has been resolved by using below code

If Strip(comp_vol) =  TOvolume Then
Do
  "MVS R "MsgID",NO"
End

Really sorry for delay in response as i was not well so couldnt able to
reply you on time.

Thank you once again.

On Sat, Dec 12, 2020 at 8:19 AM Brian Westerman <
brian_wester...@syzygyinc.com> wrote:

> Using SyzMPF/z you would only need to code 3 lines in the script for
> message IEF455D:
>
> IF WORD 02 = SP5145 | SP5146 | SP5147 | SP5149
>   Reply ,NO
> ENDIF
>
>
> We count the words of a message starting with zero as the messageid and
> (in this case) the message itself is:
> IEF455D MOUNT ser ON dev FOR jobname stepname OR REPLY ‘NO’
>   w0  w1 w2  w3 w4   w5  w6  w7  w8  w9w10
>
> So the word you want to check for is word 2 (the ser in the above).  The
> "" is automagically filled in with the outstanding replyID presented in
> the IEF455D message.
>
> Not only are Syzygy automation products MUCH less expensive than any of
> the other automation vendors, it's also a lot easier to use.
>
> Brian
>
> On Mon, 30 Nov 2020 11:15:20 +0300, saurabh khandelwal <
> sourabhkhandelwal...@gmail.com> wrote:
>
> >Dear Group ,
> >
> >
> >
> >We have requirement to automate below manual reply comes in console every
> >time, when we don’t find volume in our system and the standard reply to
> >these message is  *Reply id, NO.*
> >
> >
> >10.14.03 JOB09020 *29 *IEF455D* MOUNT *SP5145* ON 0FAA FOR CASPLPRO SARBCH
> >OR REPLY 'NO'l
> >
> >In this above message, whenever we get message id *IEF455D *on SDSF
> console
> >and on 4th place in this line, we get volume name* SP5145 or SP5146 ,
> >SP5147, SP5149 *then immediately using automation we should reply
> >
> >With* reply id, no.*
> >
> >
> >
> >In order to do this, we created
> >
> >
> >
> >IF MSGID = 'IEF455D'
> >THEN
> >
> >EXEC(CMD('AUTREXX')) NETLOG(Y) SYSLOG(Y);
> >
> >
> >
> >
> >
> >Then into *'AUTREXX'* REXX side,
> >
> >
> >
> >
> >
> >
> >
> >/* REXX  */
> >
> >trace r
> >
> >'PIPE SAFE * | STEM MSG.'
> >
> >TOvolume = Word( Msg,4 )
> >
> >MsgID = Word( Msg,1 )
> >
> >MsgID1 = substr(MsgID,2,2)
> >
> >
> >
> >volume =  'SP5145 ' ,
> >
> >   'SP5146 ' ,
> >
> >'SP5147 '
> >
> >
> >
> >Do i =  1 to Words(volume)
> >
> >comp_vol = Word(volume,i)
> >
> > If Strip(comp_vol) =  TOvolume Then
> >
> >
> >
> >But unable to complete this logic in to REXX. Can you please help in
> >building this REXX, which can help in replying on console once the above
> >mentioned criteria matches.
> >
> >
> >
> >*Regards*
> >
> >*Saurabh*
> >
> >--
> >For IBM-MAIN subscribe / signoff / archive access instructions,
> >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Auto Reply on SDSF Console

2020-11-30 Thread saurabh khandelwal
Dear Group ,



We have requirement to automate below manual reply comes in console every
time, when we don’t find volume in our system and the standard reply to
these message is  *Reply id, NO.*


10.14.03 JOB09020 *29 *IEF455D* MOUNT *SP5145* ON 0FAA FOR CASPLPRO SARBCH
OR REPLY 'NO'l

In this above message, whenever we get message id *IEF455D *on SDSF console
and on 4th place in this line, we get volume name* SP5145 or SP5146 ,
SP5147, SP5149 *then immediately using automation we should reply

With* reply id, no.*



In order to do this, we created



IF MSGID = 'IEF455D'
THEN

EXEC(CMD('AUTREXX')) NETLOG(Y) SYSLOG(Y);





Then into *'AUTREXX'* REXX side,







/* REXX  */

trace r

'PIPE SAFE * | STEM MSG.'

TOvolume = Word( Msg,4 )

MsgID = Word( Msg,1 )

MsgID1 = substr(MsgID,2,2)



volume =  'SP5145 ' ,

   'SP5146 ' ,

'SP5147 '



Do i =  1 to Words(volume)

comp_vol = Word(volume,i)

 If Strip(comp_vol) =  TOvolume Then



But unable to complete this logic in to REXX. Can you please help in
building this REXX, which can help in replying on console once the above
mentioned criteria matches.



*Regards*

*Saurabh*

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


MQ certificate expiry

2020-08-31 Thread saurabh khandelwal
Hello Group,

In MQ , do we have mechanism to configure for sending notification using
email about queue manager certificate expiry .

Plz suggest

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: DB2 View issue

2020-06-25 Thread saurabh khandelwal
I tried this too. But doenst have view create definition

On Thu, 25 Jun 2020, 11:54 Ron Hesketh,  wrote:

> Hi Suarabh,
> Try the Statement column in SYSIBM.SYSVIEWS.
>
> Regards,
>   Ron
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of saurabh khandelwal
> Sent: Wednesday, 24 June 2020 6:44 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: DB2 View issue
>
> Dear Group,
>
>
>
> In Db2 v12, when I like to see the view definition and I look at column
> “TEXT” in catalog table SYSIBM.SYSVIEWS, it is blank.
>
>
>
>
>
>
>
> Which was available in previous versions on DB2.
>
>
>
> Now, requirement is to see the view definition used during creating this
> view. Can anyone help me get this detail in Db2 v12.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> __
> This email has been scanned by the Symantec Email Security.cloud service.
> For more information please visit http://www.symanteccloud.com
> __
>
>
> ___
>
> This email has been scanned by the Bankwest Email Security System.
>
> ___
>
>
> ___
> Unencrypted electronic mail is not secure and may not be authentic.
> If you have any doubts as to the contents please telephone to confirm.
>
> This electronic transmission including any attachments is intended only
> for those to whom it is addressed. It may contain copyright material or
> information that is confidential, privileged or exempt from disclosure by
> law.
> Any claim to privilege is not waived or lost by reason of mistaken
> transmission
> of this information. If you are not the intended recipient you must not
> distribute or copy this transmission and should please notify the sender.
> Your costs for doing this will be reimbursed by the sender.
>
> We do not accept liability in connection with computer virus, data
> corruption,
> delay, interruption, unauthorised access or unauthorised amendment.
>
> ___
>
> __
> This email has been scanned by the Symantec Email Security.cloud service.
> For more information please visit http://www.symanteccloud.com
> __
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


DB2 View issue

2020-06-24 Thread saurabh khandelwal
Dear Group,



In Db2 v12, when I like to see the view definition and I look at column
“TEXT” in catalog table SYSIBM.SYSVIEWS, it is blank.







Which was available in previous versions on DB2.



Now, requirement is to see the view definition used during creating this
view. Can anyone help me get this detail in Db2 v12.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: WAS Liberty Start UP Issue

2020-06-20 Thread saurabh khandelwal
Hello group,
Can anybody implemented this before

On Sat, 20 Jun 2020, 05:07 saurabh khandelwal, <
sourabhkhandelwal...@gmail.com> wrote:

> Dear Eileen,
>
>
> Thanks for the reply. Can you please help me install the admin center.
>
> We also tried to install admin center to administrator this WAS liberty but,
> when I run below command to install admin center, i get below error and
> unable to run this script.
>
> /installUtility install adminCenter-1.0
>
>  # pwd
>
> /usr/lpp/liberty_zos/18.0.0.1/bin
>
> # /installUtility install adminCenter-1.0
>
>
>
> # ./installUtility install adminCenter-1.0
>
> java: toolJavaCmd 3: ./installUtility 257: FSUM7351 not found
>
> #
>
>
> I listed this bin directory to make sure that this script exist and i
> found but I unable to run this script to install admin center.
>
>
> rwxr-xr-x   1 BPXROOT  OMVSGRP 6803 Mar  9  2018 batchManager
> Devl
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3410 Mar  9  2018
> batchManager.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6802 Mar  9  2018
> binaryLog
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3958 Mar  9  2018
> binaryLog.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6811 Mar  9  2018
> bluemixUtility
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3418 Mar  9  2018
> bluemixUtility.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP16032 Mar  9  2018
> client
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP12939 Mar  9  2018
> client.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6803 Mar  9  2018
> collective
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3410 Mar  9  2018
> collective.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6808 Mar  9  2018
> configUtility
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3415 Mar  9  2018
> configUtility.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6796 Mar  9  2018
> ddlGen
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3952 Mar  9  2018
> ddlGen.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6815 Mar  9  2018
> dynamicRouting
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3422 Mar  9  2018
> dynamicRouting.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6811 Mar  9  2018
> featureManager
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3418 Mar  9  2018
> featureManager.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6811 Mar  9  2018
> installUtility
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3418 Mar  9  2018
> installUtility.bat
>
> drwxr-xr-x   3 BPXROOT  OMVSGRP 8192 Mar  9  2018
> jaxb
>
> drwxr-xr-x   3 BPXROOT  OMVSGRP 8192 Mar  9  2018
> jaxrs
>
> drwxr-xr-x   3 BPXROOT  OMVSGRP 8192 Mar  9  2018
> jaxws
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6814 Mar  9  2018
> pluginUtility
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3970 Mar  9  2018
> pluginUtility.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6802 Mar  9  2018
> productInfo
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3958 Mar  9  2018
> productInfo.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6811 Mar  9  2018
> securityUtility
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3967 Mar  9  2018
> securityUtility.bat
>
> -rwxrwxrwx   1 BPXROOT  OMVSGRP35850 Mar 24 02:56
> server
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP21141 Mar  9  2018
> server.bat
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 6814 Mar  9  2018
> serverSchemaGen
>
> -rwxr-xr-x   1 BPXROOT  OMVSGRP 3970 Mar  9  2018
> serverSchemaGen.bat
>
> -rwxrwxrwx   1 BPXROOT  OMVSGRP35850 Mar 24 02:52
> server_bkup
>
> drwxr-xr-x   3 BPXROOT  OMVSGRP 8192 Mar  9  2018
> tools
>
> drwxr-xr-x   3 BPXROOT  OMVSGRP 8192 Mar  9  2018
> zosConnect
>
> #
> pwd
>
> /usr/lpp/liberty_zos/18.0.0.1/bin
>
>
> #
>
>
> Can anyone please help us on this both issue.
>
> On Fri, Jun 19, 2020 at 4:05 PM Barkow, Eileen <
> 02bc504b1642-dmarc-requ...@listserv.ua.edu> wrote:
>
>> I had to add:
>>
>> > pollingRate="5s
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List  On Behalf
>> Of saurabh khandelwal
>> Sent: Friday, June 19, 2020 8:43 AM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: WAS Liberty Start UP Issue
>>
>> Dear Group,
>>
>> We are trying to configure WAS liberty and deploy test applications.
>>
>> Our server.xml file looks like
>>
>> 
>>
>> 
>>
>>
>>
>> 
>>
>> 
>>
>> jsp-2.3
>>
>> 
>>
>>
>>
>> 
>>
>> 
>>
>> >
>>  location="/usr/lpp/liberty_zos/18.0.0.1/usr/servers/server1/
>&

Re: WAS Liberty Start UP Issue

2020-06-19 Thread saurabh khandelwal
Dear Eileen,


Thanks for the reply. Can you please help me install the admin center.

We also tried to install admin center to administrator this WAS liberty but,
when I run below command to install admin center, i get below error and
unable to run this script.

/installUtility install adminCenter-1.0

 # pwd

/usr/lpp/liberty_zos/18.0.0.1/bin

# /installUtility install adminCenter-1.0



# ./installUtility install adminCenter-1.0

java: toolJavaCmd 3: ./installUtility 257: FSUM7351 not found

#


I listed this bin directory to make sure that this script exist and i found
but I unable to run this script to install admin center.


rwxr-xr-x   1 BPXROOT  OMVSGRP 6803 Mar  9  2018 batchManager
Devl

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3410 Mar  9  2018
batchManager.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6802 Mar  9  2018
binaryLog

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3958 Mar  9  2018
binaryLog.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6811 Mar  9  2018 bluemixUtility


-rwxr-xr-x   1 BPXROOT  OMVSGRP 3418 Mar  9  2018
bluemixUtility.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP16032 Mar  9  2018
client

-rwxr-xr-x   1 BPXROOT  OMVSGRP12939 Mar  9  2018
client.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6803 Mar  9  2018
collective

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3410 Mar  9  2018
collective.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6808 Mar  9  2018
configUtility

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3415 Mar  9  2018
configUtility.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6796 Mar  9  2018
ddlGen

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3952 Mar  9  2018
ddlGen.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6815 Mar  9  2018
dynamicRouting

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3422 Mar  9  2018
dynamicRouting.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6811 Mar  9  2018
featureManager

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3418 Mar  9  2018
featureManager.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6811 Mar  9  2018
installUtility

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3418 Mar  9  2018
installUtility.bat

drwxr-xr-x   3 BPXROOT  OMVSGRP 8192 Mar  9  2018
jaxb

drwxr-xr-x   3 BPXROOT  OMVSGRP 8192 Mar  9  2018
jaxrs

drwxr-xr-x   3 BPXROOT  OMVSGRP 8192 Mar  9  2018
jaxws

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6814 Mar  9  2018
pluginUtility

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3970 Mar  9  2018
pluginUtility.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6802 Mar  9  2018
productInfo

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3958 Mar  9  2018
productInfo.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6811 Mar  9  2018
securityUtility

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3967 Mar  9  2018
securityUtility.bat

-rwxrwxrwx   1 BPXROOT  OMVSGRP35850 Mar 24 02:56
server

-rwxr-xr-x   1 BPXROOT  OMVSGRP21141 Mar  9  2018
server.bat

-rwxr-xr-x   1 BPXROOT  OMVSGRP 6814 Mar  9  2018
serverSchemaGen

-rwxr-xr-x   1 BPXROOT  OMVSGRP 3970 Mar  9  2018
serverSchemaGen.bat

-rwxrwxrwx   1 BPXROOT  OMVSGRP35850 Mar 24 02:52
server_bkup

drwxr-xr-x   3 BPXROOT  OMVSGRP 8192 Mar  9  2018
tools

drwxr-xr-x   3 BPXROOT  OMVSGRP 8192 Mar  9  2018
zosConnect

#
pwd

/usr/lpp/liberty_zos/18.0.0.1/bin


#


Can anyone please help us on this both issue.

On Fri, Jun 19, 2020 at 4:05 PM Barkow, Eileen <
02bc504b1642-dmarc-requ...@listserv.ua.edu> wrote:

> I had to add:
>
>  pollingRate="5s
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of saurabh khandelwal
> Sent: Friday, June 19, 2020 8:43 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: WAS Liberty Start UP Issue
>
> Dear Group,
>
> We are trying to configure WAS liberty and deploy test applications.
>
> Our server.xml file looks like
>
> 
>
> 
>
>
>
> 
>
> 
>
> jsp-2.3
>
> 
>
>
>
> 
>
> 
>
> 
>  location="/usr/lpp/liberty_zos/18.0.0.1/usr/servers/server1/>
>
>
>
> 
>
>
> And When we deploy application in drop in directory, I get below message
> available in started task,
>
> E CWWKZ0021E: The server is not configured to handle the resource at
> location /usr/lpp/liberty_zos/18.0.0.1/usr/servers/server1
>  /dropins/AdvancedCommandCenter.ear.
>
> E CWWKM0101E: The system could not process archive data for
> /usr/lpp/liberty_zos/18.0.0.1/usr/servers/server1/dropins/AdvancedC
>  ommandCenter.ear.
>
> But we can clearly, see that our application has been expanded but because
> of this issue we getting above, we unable to move forward.
>
> Can any one guide us on this.
>
> We also, tried to install admin center to administrator this WAS liberty
> but, when when I run below command to install admin center, i get below
> error and unable to run this script.
>
> /installUtility install adminCenter-1.0
>
>  # pwd
>
> /usr/lpp/liberty_zos/18.0.0.1/bin
>
> # /installUti

WAS Liberty Start UP Issue

2020-06-19 Thread saurabh khandelwal
Dear Group,

We are trying to configure WAS liberty and deploy test applications.

Our server.xml file looks like











jsp-2.3










Re: DB2 v12 DSN1DBM1 Address space

2019-11-24 Thread saurabh khandelwal
Thanks you all for suggestion and help us to understand this MEMLIMIT .

thanks again.

On Mon, Nov 4, 2019 at 7:50 PM Martin Packer 
wrote:

>
> It’s probably MEMLIMIT - which governs VIRTUAL Storage. And it will be in
> GB.
>
> If that’s what Db2 V12 Installation says, you’d better make sure it has it
> - whether through JCL or exit or PARMLIB or whatever.
>
> But Db2 will only take what it needs - with the proviso that you can tune
> what it needs. So an individual subsystem’s actual requirements may vary.
>
> Cheers, Martin
>
> Sent from my iPad
>
> > On 4 Nov 2019, at 16:42, saurabh khandelwal
>  wrote:
> >
> > Hello Group,
> >
> > We are in the process of installing DB2 v12 and I find minimum memory
> limit
> > in DSN1DBM1 address is 16M . Can you please help me to understand if this
> > is minimum memory requiremen by this address space which is different
> then
> > db2 v11 , which was only 4M.
> >
> > Can you please suggest.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >Unless stated otherwise above:
> IBM United Kingdom Limited - Registered in England and Wales with number
> 741598.
> Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


z/OS 2.3 installation

2019-11-24 Thread saurabh khandelwal
Dear Group,

We are in processing of  z/OS 2.3 installation and during our first IPL, as
soon as we login to TSO using APPLID, system throwing us back and session
terminated  message i am getting on TN3270 screen. I dont see any other
message on z/OS console.

Can anybody faced this issue before .





-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Collecting SMF dataset using LogStream

2019-11-14 Thread saurabh khandelwal
Hello Group,

Currently we have z/OS 2.1 system and collecting SMF datasets using MAN1,
MAN2 etc dataset and then during every smf switch, we extract  records
related to db2, cics, TCPIP, RMF in seperate datasets and then archive
these dataset in regular basis.

But we upgrading system to z/OS 2.3 and there is feature of using logsteam
to collect smf records rather then using MAN datasets and then use seperate
log stream for db2, cics, TCPIP and collect particular record type into
that

But I am unable to find any steps to configure these logsteam for these
purpose. Can you please help me to do .

Thanks for your help
-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


DB2 v12 DSN1DBM1 Address space

2019-11-04 Thread saurabh khandelwal
Hello Group,

We are in the process of installing DB2 v12 and I find minimum memory limit
in DSN1DBM1 address is 16M . Can you please help me to understand if this
is minimum memory requiremen by this address space which is different then
db2 v11 , which was only 4M.

Can you please suggest.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


CA Spool Security Setup

2019-10-14 Thread saurabh khandelwal
Dear Group,

We like to implement RACF security on our CA spool product , So that our
login to CA spool can be merged with RACF user id and password.

I tried setting up using the implementation manual but its not working .

Do we have any one in this group implemented such security.

Please advise.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Best Training Institute for Db2 and CICS training on z/OS

2019-07-02 Thread saurabh khandelwal
Hello Group,



I am looking for below class training course for Db2 and CICS on z/OS . Can
you please help in provide best training institute available.. Currently I
am only person will be attending these courses .

1.   CICS  v5.3 System Administration Code: WM816G
2.   Db2 12 for zOS Advanced Database Administration Code: CV880G



3.   DB2 11 for zOS Database Administration Workshop Part 2 Code: CV843G

-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


CA- View SAR Issue while Archiving

2019-02-27 Thread saurabh khandelwal
Hello Group,

I was unable to find any forum to post my query related to CA- View ( SAR),
So posting here. If any one of us have faced such issue before.

Message on Console :

26 IEF455D MOUNT SARO05 ON 0FB2 FOR SARO SARO OR REPLY 'NO'

IEC507D E 0FB2,SARO05,SARO,SARO,.SARTAPE.T860

27 IEC507D REPLY 'U'-USE OR 'M'-UNLOAD

28 SARBKU07  Backup cycle is running - Reply W (wait) to wait

I am getting above issue  on my console every day from last week, during
offloand process for one of the SAR database.

When I run SARPAC / SARINIT utility and  to see the current status and
below are detail.

>From  ISPF 3.4 option, I can see below tape dataset I can see

PROD.SAROPER.SARTAPE.T854  SARO02
PROD.SAROPER.SARTAPE.T855  SARO05
PROD.SAROPER.SARTAPE.T856  SARO01
PROD.SAROPER.SARTAPE.T857  SARO02
PROD.SAROPER.SARTAPE.T858  SARO03
PROD.SAROPER.SARTAPE.T859  SARO04
PROD.SAROPER.SARTAPE.T860  SARO05

And on the console , we getting error for sequence number 860 and volume
SARO05, I am not sure the reason for this message coming up and from last
couple of days we were replying U to use it on the console .

-- Tape Dsname - Lgen  Hgen  Files   C-By C-Date
   C-Unit   C-Vol  MVS-DEVT MVSVOL Next  Prev
00854 PROD.SAROPER.SARTAPE.T85409543 09722 0053946 ERO
01/12/2018 359D SARO02 78048083 SARO02

 00855 PROD.SAROPER.SARTAPE.T85509723 09730 0005297
ERO  01/12/2018 359D SARO05 78048083 SARO05

 00856 PROD.SAROPER.SARTAPE.T85609731 09829 0073164
VIEW 01/13/2018 359D SARO01 78048083 SARO01

00857 PROD.SAROPER.SARTAPE.T85709830 09928 0066108
VIEW 04/21/2018 359D SARO02 78048083 SARO02

00858 PROD.SAROPER.SARTAPE.T85809929 10027 0064420
VIEW 07/29/2018 359D SARO03 78048083 SARO03

00859 PROD.SAROPER.SARTAPE.T85910028 10126 0066024
VIEW   11/05/2018 359D SARO04 78048083 SARO04

00860 PROD.SAROPER.SARTAPE.T86010127 10141 0009532
VIEW   02/12/2019 359D SARO05 78048083 SARO05


and

Tseq Data Set Name  Volser   Total  Groups cent Create
  Yrs Dplx   Lines Yes/No, Remarks

 -- -- --- --- 
-- ---  --- --

854 PROD.SAROPER.SARTAPE.T854  SARO02   53946 2321
01/12/2018  2  2164321 Y, BELOW PTHRESH

855 PROD.SAROPER.SARTAPE.T855  SARO055297  141
01/12/2018  2   151674 Y, BELOW PTHRESH

856 PROD.SAROPER.SARTAPE.T856  SARO01   7316456488
01/13/2018  2 31834642 Y, BELOW PTHRESH

857 PROD.SAROPER.SARTAPE.T857  SARO02   66108 7602
04/21/2018  1  6752247 Y, BELOW PTHRESH

858 PROD.SAROPER.SARTAPE.T858  SARO03   64420 8362
07/29/2018  1  6272550 Y, BELOW PTHRESH

859 PROD.SAROPER.SARTAPE.T859  SARO04   66024   49311   75
11/05/2018  1231812970 N, EXCEEDS PMXTAPES

860 PROD.SAROPER.SARTAPE.T860  SARO0595329517  100
02/12/2019  1 49082423 N, CURRENT BACKUP


Can anybody help to isolate this issue.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: CICS and IMS Training

2019-02-23 Thread saurabh khandelwal
Dear All,

We tried talking to IBM local representative in our region for these
training course but they don't have any training schedule and they still
trying to find the same.

If any one of us can provide more detail about schedule training for (CICS
& IMS admin) will be highly appreciated.





On Mon, Feb 18, 2019 at 9:01 PM saurabh khandelwal <
sourabhkhandelwal...@gmail.com> wrote:

> Hello Group,
>
> I am looking for CICS and IMS administration training .Anybody of us is
> aware of such training available. I tried talking to IBM but they don't
> have any schedule public batch. I don't have any specific location
> requirement for this training
>
> Please help.
>
> --
> Thanks & Regards
> Saurabh Khandelwal
>


-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


CICS and IMS Training

2019-02-18 Thread saurabh khandelwal
Hello Group,

I am looking for CICS and IMS administration training .Anybody of us is
aware of such training available. I tried talking to IBM but they don't
have any schedule public batch. I don't have any specific location
requirement for this training

Please help.

-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SYSLOGD Automation

2018-12-30 Thread saurabh khandelwal
Hello David,

Thanks for reply. I have set below parameter in my SYSLOG parm file. But

# The following are example statements that illustrate how to

# configure automatic archival.  See the section on syslogd rules for

# details about specifying rules.

#

ArchiveTimeOfDay 11:10

ArchiveThreshold 50

ArchiveCheckInterval 600

#

BeginArchiveParms

  DSNPrefix  TST1.ARCHIVE

  Volume TST011

  RetPd  30

EndArchiveParms

#

   *.SYSLOGD.daemon.*   /var/logs/syslogd/daemon.notice -N daemon.notice





   #

#

# Write all messages with priority err and higher to log file errors.

#

# THIS EXAMPLE STATEMENT IS UNCOMMENTED.

#

*.*/tmp/ivp.syslog.log




In TST1.ARCHIVE.DAEMON.** dataset, I see only such message as below. But
actual syslog message, I  see only in ivp.syslog.logfile.

Is there any way to get all logs in the dataset in place of
ivp.syslog.log.



Dec  1 14:59:40 TSTLPAR syslogd: FSUM1230 Log file
/var/logs/syslogd/daemon.notice was created

Dec  1 14:59:40 TSTLPAR syslogd: FSUM1262 File system /SYSTEM/var archive
complete, file /var/logs/syslogd/daemon.notice - destination
TST1.ARCHIVE.DAEMON.N.D181201.T145940

Dec  1 14:59:40 TSTLPAR syslogd: FSUM1261 File system /SYSTEM/var archive
results: old utilization  34% - new utilization  34%

Dec  1 14:59:40 TSTLPAR syslogd: FSUM1261 File system /SYSTEM/tmp archive
results: old utilization   0% - new utilization   0%

Dec  2 07:59:37 TSTLPAR syslogd: FSUM1219 syslogd: exiting on signal 15

Dec  2 07:59:45 TSTLPAR syslogd: FSUM1220 syslogd: restart

Dec  2 07:59:45 TSTLPAR syslogd: FSUM1237 Job SYSLOGD  running in
local-only mode

Dec  2 07:59:45 TSTLPAR syslogd: FSUM1232 syslogd: running non-swappable




On Wed, Dec 5, 2018 at 3:12 PM Jousma, David <
01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:

> Sure.  I'm not sure which part you are confused about.
>
> daemon.err;*.SYSLOGD*.*.none;*.INETD*.*.none /var/log/daemon -N DAEMON(+1)
>
> The part that I added was -N DAEMON(+1) which means to create a new
> archive dataset using DSNPrefix and DAEMON(+1) to create external archive
> dataset. The -N parameter specifies that the file should be automatically
> archived and then re-initialized when an archive event occurs.
>
> This rule is actually in the sample SYSLOGD config file straight from IBM
> that we have used.
>
> Write all messages with priority err or higher from applications
> # which specify facility "daemon" to the log file daemon.
> # Because we chose to log messages from syslogd and inetd separately,
> # we'll filter out those messages from this rule using special
> # priority none.
> #
> # Notes:
> #
> # a) In this example, SYSLOGD followed by some other character is the
> #job name of syslogd.  If it is different on your system, change
> #the rule.
> # b) In this example, INETD followed by some other character is the
> #job name of inetd.  If it is different on your system, change the
> #rule.
> #
> # daemon.err;*.SYSLOGD*.*.none;*.INETD*.*.none /var/log/%Y/%m/%d/daemon
>
> _
> Dave Jousma
> Mainframe Engineering, Assistant Vice President
> david.jou...@53.com
> 1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H
> p 616.653.8429
> f 616.653.2717
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of saurabh khandelwal
> Sent: Tuesday, December 4, 2018 11:39 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: SYSLOGD Automation
>
> **CAUTION EXTERNAL EMAIL**
>
> **DO NOT open attachments or click on links from unknown senders or
> unexpected emails**
>
> Hello David,
>
> I am unable to understand this config. Can you please help me to mke sense
> out of below line code.
>
> daemon.err;*.SYSLOGD*.*.none;*.INETD*.*.none /var/log/daemon -N
> DAEMON(+1)
>
> On Tue, Dec 4, 2018 at 3:08 PM Jousma, David <
> 01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:
>
> > Here is what we code.  You have to add offload info for every SYSLOGD
> > stream you are writing or it wont offload it.
> >
> > ArchiveTimeOfDay 00:01
> > BeginArchiveParms
> >   DSNPrefix TEMPG.PDP.SYSLOGD.
> >   Unit SYSDA
> > EndArchiveParms
> >
> > daemon.err;*.SYSLOGD*.*.none;*.INETD*.*.none /var/log/daemon -N
> > DAEMON(+1)
> > auth.* /var/log/auth -N AUTH(+1)
> > mail.* /var/log/mail -N MAIL(+1)
> > *.err/var/log/errors -N ERRORS(+1)
> > *.debug  /var/log/trace -N TRACE(+1)
> > *.INETD*.*.* /var/log/inetd -N INETD(+1)
> > *.trmd*.*.* /shared/PROD/tr

Re: SYSLOGD Automation

2018-12-04 Thread saurabh khandelwal
Hello David,

I am unable to understand this config. Can you please help me to mke sense
out of below line code.

daemon.err;*.SYSLOGD*.*.none;*.INETD*.*.none /var/log/daemon -N
DAEMON(+1)

On Tue, Dec 4, 2018 at 3:08 PM Jousma, David <
01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:

> Here is what we code.  You have to add offload info for every SYSLOGD
> stream you are writing or it wont offload it.
>
> ArchiveTimeOfDay 00:01
> BeginArchiveParms
>   DSNPrefix TEMPG.PDP.SYSLOGD.
>   Unit SYSDA
> EndArchiveParms
>
> daemon.err;*.SYSLOGD*.*.none;*.INETD*.*.none /var/log/daemon -N
> DAEMON(+1)
> auth.* /var/log/auth -N AUTH(+1)
> mail.* /var/log/mail -N MAIL(+1)
> *.err/var/log/errors -N ERRORS(+1)
> *.debug  /var/log/trace -N TRACE(+1)
> *.INETD*.*.* /var/log/inetd -N INETD(+1)
> *.trmd*.*.* /shared/PROD/trmd/trmdTEC1 -N TRMD(+1)
>
> _
> Dave Jousma
> Mainframe Engineering, Assistant Vice President
> david.jou...@53.com
> 1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H
> p 616.653.8429
> f 616.653.2717
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of saurabh khandelwal
> Sent: Monday, December 3, 2018 11:08 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: SYSLOGD Automation
>
> **CAUTION EXTERNAL EMAIL**
>
> **DO NOT open attachments or click on links from unknown senders or
> unexpected emails**
>
> Hello Group,
>
> We have requirement to automate the archival process of syslogd logs from
> omvs and placing them in dataset on regular process.
>
> I looked at SYSLOGD address space and find that parm file is used for this
> is from TCPIP.TCPPARMS(SYSLOG) and I made below modification to start
> archival process.
>
>
>  details about specifying rules.
>
> #
>
> ArchiveTimeOfDay 07:00
>
> ArchiveThreshold 50
>
> ArchiveCheckInterval 600
>
> #
>
> BeginArchiveParms
>
>   DSNPrefix  TESB.ARCHIVE
>
>   Volume TSO020
>
>   RetPd  30
>
> EndArchiveParms
>
> #
>
>*.SYSLOGD.daemon.*   /var/logs/syslogd/daemon.notice -N daemon.n
>
>
>
> # Write all messages with priority err and higher to log file errors.
>
> #
>
> # THIS EXAMPLE STATEMENT IS UNCOMMENTED.
>
> #
>
> *.*/tmp/ivp.syslog.log
> #
>
> Now, I can see archival dataset generated on regular interval from the
> above parameter I mentioned in SYSLOG parm file but its not full syslogd
> log, which we should be seeing it.
>
> Can you please help, if anything more should be modified to make this
> process work .
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN **CAUTION
> EXTERNAL EMAIL**
>
> **DO NOT open attachments or click on links from unknown senders or
> unexpected emails**
>
> This e-mail transmission contains information that is confidential and may
> be privileged.   It is intended only for the addressee(s) named above. If
> you receive this e-mail in error, please do not read, copy or disseminate
> it in any manner. If you are not the intended recipient, any disclosure,
> copying, distribution or use of the contents of this information is
> prohibited. Please reply to the message immediately by informing the sender
> that the message was misdirected. After replying, please erase it from your
> computer system. Your assistance in correcting this error is appreciated.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: IEC251I error

2018-12-04 Thread saurabh khandelwal
nmo no .. man .. i really dont know.. if u can tell me its ur wish.. cant
force u


On Tue, Dec 4, 2018 at 11:55 AM Jake Anderson 
wrote:

> You must be knowing already right ...
>
>
> Or else feeling restless to know ?
>
> On Tue 4 Dec, 2018, 12:44 PM saurabh khandelwal <
> sourabhkhandelwal...@gmail.com wrote:
>
> > where r u these days ...
> >
> > On Mon, Dec 3, 2018 at 10:51 AM Jake Anderson 
> > wrote:
> >
> > > Hi
> > >
> > > I am getting IEC251I 220-231,JOBNAME,JOBNAME
> > >
> > > Can someone help me to point with the manual for the above error ?
> > >
> > > Jake
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> >
> > --
> > Thanks & Regards
> > Saurabh Khandelwal
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> ------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: IEC251I error

2018-12-04 Thread saurabh khandelwal
where r u these days ...

On Mon, Dec 3, 2018 at 10:51 AM Jake Anderson 
wrote:

> Hi
>
> I am getting IEC251I 220-231,JOBNAME,JOBNAME
>
> Can someone help me to point with the manual for the above error ?
>
> Jake
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


SYSLOGD Automation

2018-12-03 Thread saurabh khandelwal
Hello Group,

We have requirement to automate the archival process of syslogd logs from
omvs and placing them in dataset on regular process.

I looked at SYSLOGD address space and find that parm file is used for this
is from TCPIP.TCPPARMS(SYSLOG) and I made below modification to start
archival process.


 details about specifying rules.

#

ArchiveTimeOfDay 07:00

ArchiveThreshold 50

ArchiveCheckInterval 600

#

BeginArchiveParms

  DSNPrefix  TESB.ARCHIVE

  Volume TSO020

  RetPd  30

EndArchiveParms

#

   *.SYSLOGD.daemon.*   /var/logs/syslogd/daemon.notice -N daemon.n



# Write all messages with priority err and higher to log file errors.

#

# THIS EXAMPLE STATEMENT IS UNCOMMENTED.

#

*.*/tmp/ivp.syslog.log
#

Now, I can see archival dataset generated on regular interval from the
above parameter I mentioned in SYSLOG parm file but its not full syslogd
log, which we should be seeing it.

Can you please help, if anything more should be modified to make this
process work .

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: RACF Special User Revoked System

2018-08-04 Thread saurabh khandelwal
Thanks for reply.

Special user is getting  below message

IKJ5644I TSOLOGON RECONNECT REJECT - USER ACCESS REVOKED BY RACF

and any other TSO user getting

IKJ56425I  LOGON REJECTED, RACF TEMPORARILY REVOKING USER  access
IKJ56418I CONTACT YOUR TSO ADMINISTRATOR

I dont see any WTOR message for revoking or any such message for speical
user and notbody else replied on any such WTOR.

What i remember is, until this speical user is able to login or we get WTOR
and reply , nobody else will be able to login to system even any other
special user also .

Please correct, if my understanding is wrong and suggest.



On Sat, Aug 4, 2018 at 6:45 PM, retired mainframer  wrote:

> When an incorrect password is entered the requisite number of times for a
> user with SYSTEM SPECIAL, a WTOR is presented to the operator.  The user is
> not revoked unless the operator responds to that WTOR specifying the user
> should be revoked.  If that is indeed what happened, the operator needs
> some additional training.
>
> The fact that one user has been revoked should not prevent any other user
> from logging on.  What happens when a different user tries?  If all user
> logons fail, it is a different issue.  What updates were made to the system
> when this started happening?
>
> The message is a TSO message (specifically from the logon command
> processor), not a RACF one.  My manual says the message number should be
> 56443, not 6644.  Which version of TSO are you running?  The message
> addresses a reconnect issue.  What happens when the user logs on without
> specifying reconnect?
>
> Does your system have only one user with SYSTEM SPECIAL?  Another user
> with proper authority should be able to resume the revoked user.
>
> Are batch jobs being affected?  If not, the problem may be limited to
> TSO.  A batch job may be able to resume the user
>
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of saurabh khandelwal
> > Sent: Saturday, August 04, 2018 4:20 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: RACF Special User Revoked System
> >
> > Hello Group,
> >
> > We are facing issue that someone by mistake used wrong password on
> special
> > user and this end up revoking anybody to login to our system .
> >
> > RACF is not allowing anybody to login. But strange part is, we dont see
> any
> > outstanding message on console related to this special user. But when
> this
> > yser try to login to system we get below message,
> >
> > IKJ5644I TSOLOGON RECONNECT REJECT - USER ACCESS REVOKED BY
> > RACF
> >
> > Now, is there any way to solve this issue apart from flash copy of older
> > RACF dataset disk . Is there any resume command or some thing else we can
> > use from console to make the system available for rest of users.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: RACF Special User Revoked System

2018-08-04 Thread saurabh khandelwal
Joe,
So, using rvary inactive, will I be able to use same racf password to login
all users.

Also, once we login how can we solve that special user racf password issue
and let system to again use racf for security

On Sat, Aug 4, 2018, 2:56 PM Joe Monk  wrote:

>
> https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icha200/nut.htm#nut
>
> Joe
>
> On Sat, Aug 4, 2018 at 7:46 AM, saurabh khandelwal <
> venkatkulkarn...@gmail.com> wrote:
>
> > Hello Joe,
> >
> > How  RVARY INACTIVE command will solve this issue. Can you please explain
> >
> >
> > On Sat, Aug 4, 2018 at 2:37 PM, Joe Monk  wrote:
> >
> > > You can try to RVARY INACTIVE. Then, failsoft processing will be in
> > effect.
> > >
> > > Joe
> > >
> > > On Sat, Aug 4, 2018 at 7:19 AM, saurabh khandelwal <
> > > venkatkulkarn...@gmail.com> wrote:
> > >
> > > > Hello Group,
> > > >
> > > > We are facing issue that someone by mistake used wrong password on
> > > special
> > > > user and this end up revoking anybody to login to our system .
> > > >
> > > > RACF is not allowing anybody to login. But strange part is, we dont
> see
> > > any
> > > > outstanding message on console related to this special user. But when
> > > this
> > > > yser try to login to system we get below message,
> > > >
> > > > IKJ5644I TSOLOGON RECONNECT REJECT - USER ACCESS REVOKED BY RACF
> > > >
> > > > Now, is there any way to solve this issue apart from flash copy of
> > older
> > > > RACF dataset disk . Is there any resume command or some thing else we
> > can
> > > > use from console to make the system available for rest of users.
> > > >
> > > > Please suggest.
> > > >
> > > >
> --
> > > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > > send email to lists...@listserv.ua.edu with the message: INFO
> IBM-MAIN
> > > >
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: RACF Special User Revoked System

2018-08-04 Thread saurabh khandelwal
Is there any way to resume that special user from console or get the WTOR
message on console  for this user and let this user be in revoked status
and other users should be able to login to system

On Sat, Aug 4, 2018 at 2:46 PM, saurabh khandelwal <
venkatkulkarn...@gmail.com> wrote:

> Hello Joe,
>
> How  RVARY INACTIVE command will solve this issue. Can you please explain
>
>
> On Sat, Aug 4, 2018 at 2:37 PM, Joe Monk  wrote:
>
>> You can try to RVARY INACTIVE. Then, failsoft processing will be in
>> effect.
>>
>> Joe
>>
>> On Sat, Aug 4, 2018 at 7:19 AM, saurabh khandelwal <
>> venkatkulkarn...@gmail.com> wrote:
>>
>> > Hello Group,
>> >
>> > We are facing issue that someone by mistake used wrong password on
>> special
>> > user and this end up revoking anybody to login to our system .
>> >
>> > RACF is not allowing anybody to login. But strange part is, we dont see
>> any
>> > outstanding message on console related to this special user. But when
>> this
>> > yser try to login to system we get below message,
>> >
>> > IKJ5644I TSOLOGON RECONNECT REJECT - USER ACCESS REVOKED BY RACF
>> >
>> > Now, is there any way to solve this issue apart from flash copy of older
>> > RACF dataset disk . Is there any resume command or some thing else we
>> can
>> > use from console to make the system available for rest of users.
>> >
>> > Please suggest.
>> >
>> > --
>> > For IBM-MAIN subscribe / signoff / archive access instructions,
>> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>> >
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: RACF Special User Revoked System

2018-08-04 Thread saurabh khandelwal
Hello Joe,

How  RVARY INACTIVE command will solve this issue. Can you please explain


On Sat, Aug 4, 2018 at 2:37 PM, Joe Monk  wrote:

> You can try to RVARY INACTIVE. Then, failsoft processing will be in effect.
>
> Joe
>
> On Sat, Aug 4, 2018 at 7:19 AM, saurabh khandelwal <
> venkatkulkarn...@gmail.com> wrote:
>
> > Hello Group,
> >
> > We are facing issue that someone by mistake used wrong password on
> special
> > user and this end up revoking anybody to login to our system .
> >
> > RACF is not allowing anybody to login. But strange part is, we dont see
> any
> > outstanding message on console related to this special user. But when
> this
> > yser try to login to system we get below message,
> >
> > IKJ5644I TSOLOGON RECONNECT REJECT - USER ACCESS REVOKED BY RACF
> >
> > Now, is there any way to solve this issue apart from flash copy of older
> > RACF dataset disk . Is there any resume command or some thing else we can
> > use from console to make the system available for rest of users.
> >
> > Please suggest.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


RACF Special User Revoked System

2018-08-04 Thread saurabh khandelwal
Hello Group,

We are facing issue that someone by mistake used wrong password on special
user and this end up revoking anybody to login to our system .

RACF is not allowing anybody to login. But strange part is, we dont see any
outstanding message on console related to this special user. But when this
yser try to login to system we get below message,

IKJ5644I TSOLOGON RECONNECT REJECT - USER ACCESS REVOKED BY RACF

Now, is there any way to solve this issue apart from flash copy of older
RACF dataset disk . Is there any resume command or some thing else we can
use from console to make the system available for rest of users.

Please suggest.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: how to calculate previous day using REXX

2018-08-02 Thread saurabh khandelwal
Thank you so much.. this worked for us



On Thu, Aug 2, 2018 at 11:55 AM, Styles, Andy (ITS zPlatform Services) <
00d68f765d25-dmarc-requ...@listserv.ua.edu> wrote:

> Classification: Public
> say date('S', date('B') - 1 ,'B')
>
> Andy Styles
> z/Series System Programmer
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of ITschak Mugzach
> Sent: 02 August 2018 09:44
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: how to calculate previous day using REXX
>
> -- This email has reached the Bank via an external source --
>
>
> Try this logic:
>
>- Get the Julian date of today (YYXXX)
>- Deduct 1 from Julian date (xxx)
>- Last 3 digits zero? (xxx)
>- Deduct one from first two chars (year) (YY)
>- Decide the Julian date (365 or 366 based on year/4) (xxx)
>
> ITschak
>
>
> On Thu, Aug 2, 2018 at 10:38 AM saurabh khandelwal <
> sourabhkhandelwal...@gmail.com> wrote:
>
> > Hello Group,
> >
> > In REXX , we have Date function to calculate today's date but do we have
> > any separate function to calculate yesterday's date.
> >
> > currently, we used
> >
> > TODAY= DATE('S')
> > YESTERDAY  = TODAY - 1
> >
> > this code work whole month but, starting of the month where we have date
> >
> > ex :
> >
> > TODAY - '20180801'
> >
> > then yesterday will be calculated like
> >
> > TODAY -1 , So yesterday value will be
> > YESTERDAY = '20180800'  , which is wrong.
> >
> > Can you please help to overcome this issue.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
> --
> ITschak Mugzach
> *|** IronSphere Platform* *|* *Information Security Contiguous Monitoring
> for Legacy **|  *
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> Lloyds Banking Group plc. Registered Office: The Mound, Edinburgh EH1 1YZ.
> Registered in Scotland no. SC95000. Telephone: 0131 225 4555.
>
> Lloyds Bank plc. Registered Office: 25 Gresham Street, London EC2V 7HN.
> Registered in England and Wales no. 2065. Telephone 0207626 1500.
>
> Bank of Scotland plc. Registered Office: The Mound, Edinburgh EH1 1YZ.
> Registered in Scotland no. SC327000. Telephone: 03457 801 801.
>
> Lloyds Bank Corporate Markets plc. Registered office: 25 Gresham Street,
> London EC2V 7HN. Registered in England and Wales no. 10399850.
>
> Lloyds Bank plc, Bank of Scotland plc and Lloyds Bank Corporate Markets
> plc are authorised by the Prudential Regulation Authority and regulated by
> the Financial Conduct Authority and Prudential Regulation Authority.
>
> Halifax is a division of Bank of Scotland plc.
>
> HBOS plc. Registered Office: The Mound, Edinburgh EH1 1YZ. Registered in
> Scotland no. SC218813.
>
> This e-mail (including any attachments) is private and confidential and
> may contain privileged material. If you have received this e-mail in error,
> please notify the sender and delete it (including any attachments)
> immediately. You must not copy, distribute, disclose or use any of the
> information in it or any attachments. Telephone calls may be monitored or
> recorded.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: how to calculate previous day using REXX

2018-08-02 Thread saurabh khandelwal
Thanks for reply. But in our rexx automation, we basically need  all three
Year , month and date. So, not sure, if I can achieve it from the logic you
suggested before.



On Thu, Aug 2, 2018 at 11:43 AM, ITschak Mugzach  wrote:

> Try this logic:
>
>- Get the Julian date of today (YYXXX)
>- Deduct 1 from Julian date (xxx)
>- Last 3 digits zero? (xxx)
>- Deduct one from first two chars (year) (YY)
>- Decide the Julian date (365 or 366 based on year/4) (xxx)
>
> ITschak
>
>
> On Thu, Aug 2, 2018 at 10:38 AM saurabh khandelwal <
> sourabhkhandelwal...@gmail.com> wrote:
>
> > Hello Group,
> >
> > In REXX , we have Date function to calculate today's date but do we have
> > any separate function to calculate yesterday's date.
> >
> > currently, we used
> >
> > TODAY= DATE('S')
> > YESTERDAY  = TODAY - 1
> >
> > this code work whole month but, starting of the month where we have date
> >
> > ex :
> >
> > TODAY - '20180801'
> >
> > then yesterday will be calculated like
> >
> > TODAY -1 , So yesterday value will be
> > YESTERDAY = '20180800'  , which is wrong.
> >
> > Can you please help to overcome this issue.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
> --
> ITschak Mugzach
> *|** IronSphere Platform* *|* *Information Security Contiguous Monitoring
> for Legacy **|  *
>
> ----------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


how to calculate previous day using REXX

2018-08-02 Thread saurabh khandelwal
Hello Group,

In REXX , we have Date function to calculate today's date but do we have
any separate function to calculate yesterday's date.

currently, we used

TODAY= DATE('S')
YESTERDAY  = TODAY - 1

this code work whole month but, starting of the month where we have date

ex :

TODAY - '20180801'

then yesterday will be calculated like

TODAY -1 , So yesterday value will be
YESTERDAY = '20180800'  , which is wrong.

Can you please help to overcome this issue.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: DASD Utilization Trigger

2018-07-29 Thread saurabh khandelwal
Hello,
Our all volumes are not sms managed, so we can not use this   Storage Group
exceeds a define capacity percentage method.



On Sun, Jul 29, 2018 at 9:50 AM, Gadi Ben-Avi  wrote:

> When a Storage Group exceeds a define capacity percentage, a message is
> issued to the console and log.
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of saurabh khandelwal
> Sent: Sunday, July 29, 2018 9:38 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: DASD Utilization Trigger
>
> Hello Group,
>
> Do we have any free tool available in Mainframe ISMF or any other place to
> track dasd utilization .
>
> Ex . If any of dasd utilization reached more then threshold( Ex. 80%)
> limit, we should get alert on operator console.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> הודעה זו נשלחה אליך מטעם חברה בקבוצת מלם תים וייתכן שהיא מוגנת תחת סודיות
> מסחרית. כל הצעה, התחייבות או מצג מטעם החברה, מחייבים מסמך נפרד וחתום על ידי
> מורשה החתימה של החברה. החברה רשאית לנטר כל תכתובת העוברת בשרתיה והיא לא
> תישא באחריות לכל נזק, ו/או אובדן, שיבוש או פגיעה במידע כלשהו שנגרם מסיבות
> של תקיפה חיצונית ו/או זדונית על הארגון.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


DASD Utilization Trigger

2018-07-29 Thread saurabh khandelwal
Hello Group,

Do we have any free tool available in Mainframe ISMF or any other place to
track dasd utilization .

Ex . If any of dasd utilization reached more then threshold( Ex. 80%)
limit, we should get alert on operator console.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


MPFLST Msgid Formatting

2018-07-16 Thread saurabh khandelwal
Hello Group,

I read about message processing facility parmlib member and my requirement
is that

whenever I see msg id  EMS0675E and associated text  in syslog

it should reflect into operator console with red color  and should stick on
that console until operator press enter on that particular msgid.

I read about  *MSGCOLOR*  etc but couldn't get exact syntax to add into
MPFLST PARMLIB MEMBER.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: NVAS admin panel issue

2018-07-15 Thread saurabh khandelwal
Hello  Elardus *,*

Sorry for late reply.

I run this BATCHLO utility  and output was

NV/AS Batch Load & Reporting
Initialization





NV/AS Batch Load & Reporting Options:





EXEC,UID=PUBUSER,UNLOCK






Consistency Check of the NV/AS Database





NV/AS Batch Load & Reporting
Statistics







Correct commands:0



Incorrect commands:  0


Total commands:  0




Couple of other points,

1) I didnt find pubuser in our RACF
2) Now we are not able to get into admin panel because, we don't know which
user is having admin access.
3) Is there any way that we can use this pubuser to define other admin
user. But not sure how.


On Thu, Jul 12, 2018 at 2:57 PM, Elardus Engelbrecht <
elardus.engelbre...@sita.co.za> wrote:

> George Rodriguez wrote:
>
> >On the ADM menu there's an option 7 - Define an Administrator for making
> a regular user an administrator. You need to be an Admin already to use
> this option. If I'm right, the initial system came with a default
> administrator.
>
> The default one is PUBUSER. What the password is, is a guess. If RACF is
> required to logon, it should be easy to fix that.
>
>
> >To get a list of who's already define as an administrator, select option
> 7, on option User enter a ? and on the command line enter l (list).
>
> Of course you need to be an admin in the first place... ;-)
>
> Or run this job:
>
> //BATCHLO  EXEC PGM=EMSBXPMC,REGION=2M,
> // PARM='EXEC,UID=PUBUSER,UNLOCK'
> //STEPLIB   DD DSN=?=SHR
> //EMSBSRTS  DD DSN=?,DISP=SHR
> //EMSBSRTG  DD DSN=?,DISP=SHR
> //EMSBSRTU  DD DSN=?,DISP=SHR
> //EMSBPLDT  DD DSN=?,DISP=SHR
> //EMSBGPRF  DD DSN=?,DISP=SHR
> //EMSBALLT  DD DSN=?,DISP=SHR
> //EMSBGAL   DD DSN=?,DISP=SHR
> //SYSPRINT  DD SYSOUT=*,DCB=(LRECL=133,RECFM=FBA)
> //EMSBREPO  DD SYSOUT=*,DCB=(LRECL=133,RECFM=FBA)
> //EMSBLIST  DD SYSOUT=*,DCB=(LRECL=133,RECFM=FBA)
> //SYSUDUMP  DD SYSOUT=*
> //EMSBCOMM  DD *
>  LIST   ADMINISTRATOR,
>   USER_ID=*,
>   GROUP_NAME=*
>
> Groete / Greetings
> Elardus Engelbrecht
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: NVAS admin panel issue

2018-07-11 Thread saurabh khandelwal
Hello Alan,

As I am new  to NVAS, can you please suggest how my user id can be defined
as NVAS administrator.

On Wed, Jul 11, 2018 at 10:13 AM, Alan(GMAIL)Watthey 
wrote:

> Saurabh,
>
> As you were already told on the Netview forum, you need to be defined as
> an NVAS Administrator.  Your userid is obviously not.  However, you can
> instead update the settings in batch and then restart NVAS.
>
> Regards,
> Alan Watthey
>
> -Original Message-----
> From: saurabh khandelwal [mailto:sourabhkhandelwal...@gmail.com]
> Sent: 10 July 2018 6:04 pm
> Subject: NVAS admin panel issue
>
> Hello Group,
>
>
> We getting below message frequently on our syslog
>
>
> EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXMAP  RC=1453
>
> EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXCICS RC=1453
>
> EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXMAP  RC=1453
>
> EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXCICS RC=1453
>
>
> I would like to remove these message and for doing this I logged into NVAS
> but i m unable to get admin panel. . I just get parameter panel with adm
> command but I am unable to get the panel to delete these LU.
>
>
> when I type adm on main nvas screen , I get Maintain user parameters
> screen. I am unable to get this admin screen where i can use option 4 to
> delete these unwanted LU.
>
>
>
>
>
> EMSPU1 Maintain User Parameters
>
>
>  sp;  GR Name :
> Terminal: A01IP449
>
> Application . . . ACB Name:  User . .:
> AS54
>
> Last Update  . .: Group. .:
> CRTGRP2
>
>& nbsp;
>  Default Group: Y
>
> Fill in or change the following:
>
>
>   Selection ID  . . . . . __   (1-99) Default Application _  (Y/N)
> ;
>
>   Msg. Received Indicator _(N=Normal/J=Jump/I=
> Information)
>
>   Jump Key  . . . . . . .  (PFnn/PAnn/ATTN)
>
>
>   Logon Profile . . . . . _(U=User/G=Group/S=System)
> p;
>
>   Active Profile  . . . . _(1/2) If User Profile
>
>
>   Profile 1 Comment . . . ___   Profile 2 Comment
> ___
>
>   Application ID Display  _(Y=Yes/N=No)
>
>
>
>
>
> Variables for Logon profile:
>  ;
>
>. . .    . .    . .
> 
>
>. .    . .    . .
> 
>
>. . .. . .. .
> .
>
>
>
>
> Enter a command: d (display), u (update), or l (list).
>
>
>
>
> Can anybody help me to remove these EMS0675E  message from NVAS
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: NVAS admin panel issue

2018-07-11 Thread saurabh khandelwal
Thank you so much  for help

On Tue, Jul 10, 2018 at 10:14 PM, George Rodriguez <
016eebd7289b-dmarc-requ...@listserv.ua.edu> wrote:

> It's been a while since I made changes to the file used to capture
> messages. Let me check and I'll get back to you.
>
>
> *George Rodriguez*
> *Specialist II - IT Solutions*
> *IT Enterprise Applications*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(954) 415-7586 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-251*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District For Eight Consecutive Years*
>
>
> On Tue, Jul 10, 2018 at 11:46 AM saurabh khandelwal <
> sourabhkhandelwal...@gmail.com> wrote:
>
> > Hello George,
> >
> > Thanks for reply. But in netview, where will i find these message entry,
> so
> > that I can delete.
> >
> > I looked over internet and found that using option 4, I can remove these
> LU
> > but I am unable to get that panel.
> >
> > Can you please help me to drive this task .
> >
> > On Tue, Jul 10, 2018 at 6:32 PM, George Rodriguez <
> > 016eebd7289b-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > > Instead of using ADM (used to administer applications and menu options
> of
> > > NVAS) you have to use Netview on your NetView Application Selection
> Panel
> > > and from there, you look for the message you want to suppress.
> > >
> > > *George Rodriguez*
> > > *Specialist II - IT Solutions*
> > > *IT Enterprise Applications*
> > > *PX - 47652*
> > > *(561) 357-7652 (office)*
> > > *(954) 415-7586 (mobile)*
> > > *School District of Palm Beach County*
> > > *3348 Forest Hill Blvd.*
> > > *Room B-251*
> > > *West Palm Beach, FL. 33406-5869*
> > > *Florida's Only A-Rated Urban District For Eight Consecutive Years*
> > >
> > >
> > > On Tue, Jul 10, 2018 at 11:04 AM saurabh khandelwal <
> > > sourabhkhandelwal...@gmail.com> wrote:
> > >
> > > > Hello Group,
> > > >
> > > >
> > > > We getting below message frequently on our syslog
> > > >
> > > >
> > > > EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXMAP  RC=1453
> > > >
> > > > EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXCICS RC=1453
> > > >
> > > > EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXMAP  RC=1453
> > > >
> > > > EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXCICS RC=1453
> > > >
> > > >
> > > > I would like to remove these message and for doing this I logged into
> > > NVAS
> > > > but i m unable to get admin panel. . I just get parameter panel with
> > adm
> > > > command but I am unable to get the panel to delete these LU.
> > > >
> > > >
> > > > when I type adm on main nvas screen , I get Maintain user parameters
> > > > screen. I am unable to get this admin screen where i can use option 4
> > to
> > > > delete these unwanted LU.
> > > >
> > > >
> > > >
> > > >
> > > >
> > > > EMSPU1 Maintain User Parameters
> > > >
> > > >
> > > >  sp;  GR Name :
> > > > Terminal: A01IP449
> > > >
> > > > Application . . . ACB Name:  User .
> .:
> > > > AS54
> > > >
> > > > Last Update  . .: Group.
> .:
> > > > CRTGRP2
> > > >
> > > >& nbsp;
> > > >  Default Group: Y
> > > >
> > > > Fill in or change the following:
> > > >
> > > >
> > > >   Selection ID  . . . . . __   (1-99) Default Application _
> (Y/N)
> > > > ;
> > > >
> > > >   Msg. Received Indicator _(N=Normal/J=Jump/I=
> > > > Information)
> > > >
> > > >   Jump Key  . . . . . . .  (PFnn/PAnn/ATTN)
> > > >
> > > >
> > > >   Logon Profile . . . . . _(U=User/G=Group/S=System)
> > > > p;
> > > >
> > > >   Active Profile  . . . . _(1/2) If User Profile
> > > >
> > > >
> > > >   Profile 1 Comment . . . ___   Profile 2 Comment
> > > > ___
> > > >
> > > >   Ap

Re: NVAS admin panel issue

2018-07-10 Thread saurabh khandelwal
Hello George,

Thanks for reply. But in netview, where will i find these message entry, so
that I can delete.

I looked over internet and found that using option 4, I can remove these LU
but I am unable to get that panel.

Can you please help me to drive this task .

On Tue, Jul 10, 2018 at 6:32 PM, George Rodriguez <
016eebd7289b-dmarc-requ...@listserv.ua.edu> wrote:

> Instead of using ADM (used to administer applications and menu options of
> NVAS) you have to use Netview on your NetView Application Selection Panel
> and from there, you look for the message you want to suppress.
>
> *George Rodriguez*
> *Specialist II - IT Solutions*
> *IT Enterprise Applications*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(954) 415-7586 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-251*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District For Eight Consecutive Years*
>
>
> On Tue, Jul 10, 2018 at 11:04 AM saurabh khandelwal <
> sourabhkhandelwal...@gmail.com> wrote:
>
> > Hello Group,
> >
> >
> > We getting below message frequently on our syslog
> >
> >
> > EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXMAP  RC=1453
> >
> > EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXCICS RC=1453
> >
> > EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXMAP  RC=1453
> >
> > EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXCICS RC=1453
> >
> >
> > I would like to remove these message and for doing this I logged into
> NVAS
> > but i m unable to get admin panel. . I just get parameter panel with adm
> > command but I am unable to get the panel to delete these LU.
> >
> >
> > when I type adm on main nvas screen , I get Maintain user parameters
> > screen. I am unable to get this admin screen where i can use option 4 to
> > delete these unwanted LU.
> >
> >
> >
> >
> >
> > EMSPU1 Maintain User Parameters
> >
> >
> >  sp;  GR Name :
> > Terminal: A01IP449
> >
> > Application . . . ACB Name:  User . .:
> > AS54
> >
> > Last Update  . .: Group. .:
> > CRTGRP2
> >
> >& nbsp;
> >  Default Group: Y
> >
> > Fill in or change the following:
> >
> >
> >   Selection ID  . . . . . __   (1-99) Default Application _  (Y/N)
> > ;
> >
> >   Msg. Received Indicator _(N=Normal/J=Jump/I=
> > Information)
> >
> >   Jump Key  . . . . . . .  (PFnn/PAnn/ATTN)
> >
> >
> >   Logon Profile . . . . . _(U=User/G=Group/S=System)
> > p;
> >
> >   Active Profile  . . . . _(1/2) If User Profile
> >
> >
> >   Profile 1 Comment . . . ___   Profile 2 Comment
> > ___
> >
> >   Application ID Display  _(Y=Yes/N=No)
> >
> >
> >
> >
> >
> > Variables for Logon profile:
> >  ;
> >
> >. . .    . .    . .
> > 
> >
> >. .    . .    . .
> > 
> >
> >. . .. . .. .
> > .
> >
> >
> >
> >
> > Enter a command: d (display), u (update), or l (list).
> >
> >
> >
> >
> > Can anybody help me to remove these EMS0675E  message from NVAS
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
>
>
>
>
>
>
> *Disclaimer: *Under Florida law, e-mail addresses are public records.
> If you do not want your e-mail address released in response to a public
> records request, do not send electronic mail to this entity. Instead,
> contact this office by phone or in writing.
>
>
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


NVAS admin panel issue

2018-07-10 Thread saurabh khandelwal
Hello Group,


We getting below message frequently on our syslog


EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXMAP  RC=1453

EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXCICS RC=1453

EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXMAP  RC=1453

EMS0675E VTAM INQUIRE FAILED FOR LU=A1OXCICS RC=1453


I would like to remove these message and for doing this I logged into NVAS
but i m unable to get admin panel. . I just get parameter panel with adm
command but I am unable to get the panel to delete these LU.


when I type adm on main nvas screen , I get Maintain user parameters
screen. I am unable to get this admin screen where i can use option 4 to
delete these unwanted LU.





EMSPU1 Maintain User Parameters


 sp;  GR Name :
Terminal: A01IP449

Application . . . ACB Name:  User . .:
AS54

Last Update  . .: Group. .:
CRTGRP2

   & nbsp;
 Default Group: Y

Fill in or change the following:


  Selection ID  . . . . . __   (1-99) Default Application _  (Y/N)
;

  Msg. Received Indicator _(N=Normal/J=Jump/I=
Information)

  Jump Key  . . . . . . .  (PFnn/PAnn/ATTN)


  Logon Profile . . . . . _(U=User/G=Group/S=System)
p;

  Active Profile  . . . . _(1/2) If User Profile


  Profile 1 Comment . . . ___   Profile 2 Comment
___

  Application ID Display  _(Y=Yes/N=No)





Variables for Logon profile:
 ;

   . . .    . .    . .


   . .    . .    . .


   . . .. . .. .
.




Enter a command: d (display), u (update), or l (list).




Can anybody help me to remove these EMS0675E  message from NVAS

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


RMF III Reports on Console

2018-07-07 Thread saurabh khandelwal
Hello,

I setup  RMFIII RMFM3B  started task and its capturing workflow/Exception
screen
and keeping it in SYSOUT.

I tried adding below exception in ReportOption/Action Panel and I see these
exception in workflow/exceptions panel and SYSPUT and SYSLOG as well

But I unable to find the way to get these message like below when DASD
activity rate goes above limit on operator console, So that operator can
monitor and take action.

I read about WTO command, but I am not sure, where and what to add to get
this dasd activity alert on operator console

Can you please suggest way of achieving this task .


+RMF100I 3B: Processing WFEX Report...
+RMF100I 3B: Name Reason Critical val.
+RMF100I 3B: --
+RMF102I 3B: *STOR ONLXF < 16K 0 frames
+RMF102I 3B: OSPCAT DAR > 5 9.000 /sec
+RMF102I 3B: OSPRES DAR > 5 7.300 /sec

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


RMF RMFM3B Wrokflow

2018-07-06 Thread saurabh khandelwal
Hello Group,

I setup  RMFM3B  started task and its capturing workflow/Exception screen
and keeping it in SYSOUT.

I tried adding below exception in ReportOption/Action Panel and I see these
exception in workflow/exceptions panel and SYSPUT and SYSLOG as well

But I unable to find the way to get these message like below when DASD
activity rate goes above limit on operator console, So that operator can
monitor and take action.

I read about WTO command, but I am not sure, where and what to add to get
this dasd activity alert on operator console

Can you please suggest way of achieving this task .


+RMF100I 3B: Processing WFEX Report...
+RMF100I 3B: Name Reason Critical val.
+RMF100I 3B: --
+RMF102I 3B: *STOR ONLXF < 16K 0 frames
+RMF102I 3B: OSPCAT DAR > 5 9.000 /sec
+RMF102I 3B: OSPRES DAR > 5 7.300 /sec

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: CPU Utilization

2018-07-06 Thread saurabh khandelwal
Hello,

I am able to get RMF3B messages on on my syslog. But I unable to find the
way to get these message like below when DASD activity rate goes above
limit on console.

Can you please suggest way of achieving this task .


+RMF100I 3B: Processing WFEX Report...
+RMF100I 3B: Name Reason Critical val.
+RMF100I 3B: --
+RMF102I 3B: *STOR ONLXF < 16K 0 frames
+RMF102I 3B: OSPCAT DAR > 5 9.000 /sec
+RMF102I 3B: OSPRES DAR > 5 7.300 /sec

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: CPU Utilization

2018-07-03 Thread saurabh khandelwal
I would like operator console to be notified when any address space or  Job
taking more CPU for longer then any time we specify

On Wed, Jul 4, 2018 at 8:27 AM, retired mainframer  wrote:

> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf
> > Of Peter Hunkeler
> > Sent: Tuesday, July 03, 2018 10:10 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: AW: Re: CPU Utilization
> >
> > >No, IEFUTL is called INSIDE an Address Space as often as specified in
> SMFPRMxx in
> > statement JWT.
> >
> >
> >  and it would also be called when the CPU time used exceeds the time
> limit of the job or
> > step (TIME= parameter). But this means also that the exit is most never
> called.
>
> But if you specify the desired time on the job statement (the OP said 30
> min?), IEFUTL would get called and could take the desired action (extend
> for
> another 30 after generating some console message?).
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: CPU Utilization

2018-07-03 Thread saurabh khandelwal
Thanks for reply. We don't have  BMC Mainview or IBM Omegamon or any third
party product except  Netview from ibm.

I read about RMFM3B from rmf user guide also but not much help to setup
this  for CPU usage . Can anybody help me to achieve this task .



On Tue, Jul 3, 2018 at 10:22 PM, Feller, Paul 
wrote:

> If you have BMC Mainview or IBM Omegamon (or some other monitoring
> software) consider looking at those to monitor and alert you about CPU
> usage.  Among other things that is part of what they are created for.
>
> Thanks..
>
> Paul Feller
> AGT Mainframe Technical Support
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of saurabh khandelwal
> Sent: Tuesday, July 03, 2018 6:42 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: CPU Utilization
>
> Hello Group,
>
> We have requirement to trigger alert to operator console, once CPU
> utilization for any address space or any Job or any running STC  reach to
> certain pre defined number. Like any job or address space or STC consuming
> CPU for more then 30 min etc , operator should get alter on his console.
>
>
> Is there any way to implement this process using rexx, netview or any
> other way .
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: CPU Utilization

2018-07-03 Thread saurabh khandelwal
I read about  RMFM3B  from below white paper

http://www-03.ibm.com/support/techdocs/atsmastr.nsf/c6192fb3a432612485256d970082de57/399938068ea32df786256e2a005e8c8e/$FILE/RMF_WTO_2010.pdf

but i am not sure, how to implement this for checking live cpu usage for
every stc, jes job , omvs etc and send notification to operator console
once threshold value exceed to avoid issue


Is there anybody has implemented this facility.



On Tue, Jul 3, 2018 at 4:07 PM, Roger Lowe  wrote:

> On Tue, 3 Jul 2018 14:42:21 +0300, saurabh khandelwal <
> venkatkulkarn...@gmail.com> wrote:
>
> >Hello Group,
> >
> >We have requirement to trigger alert to operator console, once CPU
> >utilization for any address space or any Job or any running STC  reach to
> >certain pre defined number. Like any job or address space or STC consuming
> >CPU for more then 30 min etc , operator should get alter on his console.
> >
> >
> >Is there any way to implement this process using rexx, netview or any
> other
> >way .
> >
> If you have RMF installed, you could look at using RMFM3B and zEvent which
> could do what you are after 
>
> Roger
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: CPU Utilization

2018-07-03 Thread saurabh khandelwal
Hello,

Thanks for reply.  Can IEFUTL exit also provide live CPU usage detail by
every job, stc, address space, omvs etc and send alert to operator console,
if any set limit for CPU is exceeded .



On Tue, Jul 3, 2018 at 6:53 PM, retired mainframer  wrote:

> You might look at IEFUTL in the MVS Installation Exits manual to see if it
> can do what you want.
>
> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf
> > Of saurabh khandelwal
> > Sent: Tuesday, July 03, 2018 4:42 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: CPU Utilization
> >
> > Hello Group,
> >
> > We have requirement to trigger alert to operator console, once CPU
> > utilization for any address space or any Job or any running STC  reach to
> > certain pre defined number. Like any job or address space or STC
> consuming
> > CPU for more then 30 min etc , operator should get alter on his console.
> >
> >
> > Is there any way to implement this process using rexx, netview or any
> other
> > way .
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


CPU Utilization

2018-07-03 Thread saurabh khandelwal
Hello Group,

We have requirement to trigger alert to operator console, once CPU
utilization for any address space or any Job or any running STC  reach to
certain pre defined number. Like any job or address space or STC consuming
CPU for more then 30 min etc , operator should get alter on his console.


Is there any way to implement this process using rexx, netview or any other
way .

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-24 Thread saurabh khandelwal
Hello All,

I still have same issue when i use pipe command in rexx and I don't get
message on console. But when I don't use pipe command on console, then I
get message on console.

Details are below.

1) Doesnt work. It means that we don't get messages on console.


Netview automation table **
***

IF MSGID = 'SVTM052I' THEN

EXEC(CMD('FDIREXX')) NETLOG(Y) SYSLOG(Y);





BROWSENETVIEW.CNMCLST(FDIREXX) - 01.17   Line 

* Top of Data **

/*  REXX */

trace i

'PIPE SAFE * | STEM MSG.'

TODataset = Word( Msg.3,3 )

WTO.CONSNAME ='CNDVMSTR'

WTO.DESC = '01000100'/* WHITE */

WTO.DESC = '00100010'/* RED   */

WTO.MCSFLAG  = ''

WTO.TEXT = 'FDI' TODataset

WTO

mvs "send 'FDI DATAST NAME IS "TODataset"',user=(TS06,OP117),LOGON"

exit





Netview Log


2) Solution works .It means that we get messages on console.


Netview automation table **
***

IF MSGID = 'IEF403I' & TEXT = .'OP117LST'.  & TEXT = MTXT THEN

 EXEC(CMD('FDIREXX1 'MTXT)) NETLOG(Y) SYSLOG(Y);



/*  REXX */

trace i

parse arg mtxt . mtxt

WTO.CONSNAME = '   '

WTO.DESC = '01000100'/* WHITE */

WTO.DESC = '00100010'/* RED   */

WTO.MCSFLAG  = ''

WTO.TEXT =  'CONSOLE TEST MSG IS' mtxt

WTO

exit





 Netview log



- CNM493I DSITBL01 : #250 : FDIREXX1 IEF403I AB54LST -

E IEF403I AB54LST - STARTED - TIME=07.19.45

C  3 *-* parse arg mtxt . mtxt

C>>>   "IEF403I"

C>.>   "AB54LST"

C>>>   "- STARTED - TIME=07.19.45"

C  4 *-* /* say 'AB54LST Job STARTED at' mtxt */

C  5 *-* /* mvs "send 'AB54LST JOB "mtxt"',user=(AB54)

C  6 *-* /*  mvs "send 'CONSOLE OUTPUT DISPLAY "mtxt"',C

C  7 *-* WTO.CONSNAME = 'CNDVMSTR'

C>L>   "CNDVMSTR"

C  8 *-* WTO.DESC = '01000100'/* WHITE */

C>L>   "01000100"

C  9 *-* WTO.DESC = '00100010'/* RED   */

C>L>   "00100010"

C 10 *-* WTO.MCSFLAG  = ''

C>L>   ""

C 11 *-* WTO.TEXT =  'CONSOLE TEST MSG IS' mtxt

C>L>   "CONSOLE TEST MSG IS"

C>V>   "- STARTED - TIME=07.19.45"

C    >O>   "CONSOLE TEST MSG IS - STARTED - TIME=07.19.4

C 12 *-* WTO

C>L>   "WTO"

C 13 *-* exit

> CONSOLE TEST MSG IS - STARTED - TIME=07.19.45


On Fri, Jun 22, 2018 at 9:15 PM, saurabh khandelwal <
sourabhkhandelwal...@gmail.com> wrote:

> Thanks for reply.
>
> I looked at netview command manual and found  "WTO.TEXT" can be used for
> this purpose. But I am not sure, how do I incorporate this into this case.
>
> Netview table code.
>
>  IF MSGID = 'SVTM052I' THEN
>  EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);
>
>
>
> In our rexx we retrieve the full messge via:
>
> /* REXX   */
>
> 'PIPE SAFE * | STEM MSG.'
>
> TODataset = Word( Msg.3,3 )
> mvs "send 'FIB DATASET NAME IS "TODataset"',CON=CNDVMSTR"
>
> in this rexx, where do I need to add WTO.TEXT to display  TODataset as
> WTO message on operator console.
>
> Can anybody suggest to implement this change.
>
>
>
> On Fri, Jun 22, 2018 at 5:15 PM, Lucas Rosalen 
> wrote:
>
>> Right tool for the right job.
>>
>> Read about WTO (REXX) command in Netview commands manual.
>>
>> 
>> ---
>> *Lucas Rosalen*
>> rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
>> http://br.linkedin.com/in/lrosalen
>>
>>
>> 2018-06-22 6:31 GMT+02:00 saurabh khandelwal > >:
>>
>> > Hello Group,
>> >
>> >
>> >  /*  REXX */
>> >
>> > 'PIPE SAFE * | STEM MSG.'
>> >
>> >
>> >
>> > TODataset = Word( Msg.3,3 )
>> >
>> > mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"
>> >
>> > exit
>> >
>> >
>> > We used CN operand with send command to send message to  operator
>> console
>> > and now i receive output as required.
>> >
>> > But this message is visible in green color which get disappeared as
>> other
>> > message comes on console.
>> >
>> > But, I would like to have these message in white color ( not sure if we
>> can
>> > say

Re: Issue WTO message using MVS SEND command

2018-06-24 Thread saurabh khandelwal
Hello Steve,

Still didnt work. I think something should be taken care while having pipe
command in rexx.

Below are two example, in first one this process is working and another one
is not..

The only difference between two is pipe commands

Please suggest.

1)   Working.

CNM493I DSITBL01 : #250 : FDIREXX1 IEF403I AB54LST -

E IEF403I AB54LST - STARTED - TIME=07.19.45

C  3 *-* parse arg mtxt . mtxt

C>>>   "IEF403I"

C>.>   "AB54LST"

C>>>   "- STARTED - TIME=07.19.45"

C  4 *-* /* say 'AB54LST Job STARTED at' mtxt */

C  5 *-* /* mvs "send 'AB54LST JOB "mtxt"',user=(AB54)

C  6 *-* /*  mvs "send 'CONSOLE OUTPUT DISPLAY "mtxt"',C

C  7 *-* WTO.CONSNAME = 'CNDVMSTR'

C>L>   "CNDVMSTR"

C  8 *-* WTO.DESC = '01000100'/* WHITE */

C>L>   "01000100"

C  9 *-* WTO.DESC = '00100010'/* RED   */

C>L>   "00100010"

C 10 *-* WTO.MCSFLAG  = ''

C>L>   ""

C 11 *-* WTO.TEXT =  'CONSOLE TEST MSG IS' mtxt

C>L>   "CONSOLE TEST MSG IS"

C>V>   "- STARTED - TIME=07.19.45"

C>O>   "CONSOLE TEST MSG IS - STARTED - TIME=07.19.4

C 12 *-* WTO

C>L>   "WTO"

C 13 *-* exit

> CONSOLE TEST MSG IS - STARTED - TIME=07.19.45



 2) Not working



- CNM493I DSITBL01 : #247 : FDIREXX

" SVTM052I STEP01   COPY TDNBK001(  31,976) PNODE=SIG.BA
<http://sig.ba/>

" SVTM052I  FROM E2CP.ARDLY4M.ATCHNB.NBK.PS.G3971V00

" SVTM052I  TO   FDNBT.DATA.VPLUS.ATCH.G0610V00

" SVTM052I  COMPLETED  /SCPA000I

C  3 *-* 'PIPE SAFE * | STEM MSG.'

C>L>   "PIPE SAFE * | STEM MSG."

C  4 *-* TODataset = Word( Msg.3,3 )

C>V>   "SVTM052I  TO   FDNBT.DATA.VPLUS.ATCH.G06

C>L>   "3"

C>F>   "FDNBT.DATA.VPLUS.ATCH.G0610V00"

C  5 *-* WTO.CONSNAME ='CNDVMSTR'

C>L>   "CNDVMSTR"

C  6 *-* WTO.DESC ='00100010'/* RED   */

C>L>   "00100010"

C  7 *-* WTO.DESC ='01000100'/* WHITE */

C>L>   "01000100"

C  8 *-* WTO.MCSFLAG  = ''

C>L>   ""

C  9 *-* WTO.TEXT ='FDI CONSOLE DATASET IS' TODataset

C>L>   "FDI CONSOLE DATASET IS"

C>V>   "FDNBT.DATA.VPLUS.ATCH.G0610V00"

C>O>   "FDI CONSOLE DATASET IS FDNBT.DATA.VPLUS.ATCH

C 10 *-* WTO

C>L>   "WTO"

C 11 *-* mvs "send 'FDI DATAST NAME IS "TODataset"',user

C>L>   "MVS"

C>L>   "send 'FDI DATAST NAME IS "

C>O>   "MVS send 'FDI DATAST NAME IS "

C>V>   "FDNBT.DATA.VPLUS.ATCH.G0610V00"

C>O>   "MVS send 'FDI DATAST NAME IS FDNBT.DATA.VPLU

C>L>   "',user=(AB55,AB54),LOGON"

C>O>   "MVS send 'FDI DATAST NAME IS FDNBT.DATA.VPLU

C 12 *-* exit


On Sun, Jun 24, 2018 at 1:03 PM, saurabh khandelwal <
sourabhkhandelwal...@gmail.com> wrote:

> You mean, console name should be blank.
>
> On Sun, Jun 24, 2018, 1:01 PM Steve Horein  wrote:
>
>> Set
>> WTO.CONSNAME = ''
>>
>>
>> On Sun, Jun 24, 2018 at 1:30 AM saurabh khandelwal <
>> sourabhkhandelwal...@gmail.com> wrote:
>>
>>> Hello,
>>>
>>> Thanks for your input. But I am surprised that I am still unable to see
>>> required message on console. I started trace to isolate this and I didnt
>>> find any issues but somehow its not working.
>>>
>>> Netview table code.
>>>
>>>  IF MSGID = 'SVTM052I' THEN
>>>  EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);
>>>
>>>
>>>
>>> In our rexx we retrieve the full messge via:
>>>
>>>
>>> /*  REXX */
>>> 'PIPE SAFE * | STEM MSG.'
>>> TODataset = Word( Msg.3,3 )
>>>
>>> WTO.CONSNAME = 'CNDVMSTR'
>>>
>>> WTO.DESC = '01000100'/* WHITE */
>>>
>>> WTO.DESC = '00100010'/* RED   */
>>>
>>> WTO.MCSFLAG  = ''
>>>
>>> WTO.TEXT =  'CONSOLE TEST MSG IS' TODataset
>>>
>>> WTO
>>>
>>> MVS "send 'FDI DATAST NAME IS "TODataset"',user=(AB55,AB54),logon"
>>>
>>> exit
>>>
>>>
>>> and output from netvie

Re: Issue WTO message using MVS SEND command

2018-06-24 Thread saurabh khandelwal
Hello,

Thanks for your input. But I am surprised that I am still unable to see
required message on console. I started trace to isolate this and I didnt
find any issues but somehow its not working.

Netview table code.

 IF MSGID = 'SVTM052I' THEN
 EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);



In our rexx we retrieve the full messge via:


/*  REXX */
'PIPE SAFE * | STEM MSG.'
TODataset = Word( Msg.3,3 )

WTO.CONSNAME = 'CNDVMSTR'

WTO.DESC = '01000100'/* WHITE */

WTO.DESC = '00100010'/* RED   */

WTO.MCSFLAG  = ''

WTO.TEXT =  'CONSOLE TEST MSG IS' TODataset

WTO

MVS "send 'FDI DATAST NAME IS "TODataset"',user=(AB55,AB54),logon"

exit


and output from netview log is

CNM493I DSITBL01 : #247 : FDIREXX

" SVTM052I STEP01   COPY TDNBK001(  31,976) PNODE=SIG.BA
<http://sig.ba/>

" SVTM052I  FROM E2CP.ARDLY4M.ATCHNB.NBK.PS.G3971V00

" SVTM052I  TO   FDNBT.DATA.VPLUS.ATCH.G0610V00

" SVTM052I  COMPLETED  /SCPA000I

C  3 *-* 'PIPE SAFE * | STEM MSG.'

C>L>   "PIPE SAFE * | STEM MSG."

C  4 *-* TODataset = Word( Msg.3,3 )

C>V>   "SVTM052I  TO   FDNBT.DATA.VPLUS.ATCH.G06

C>L>   "3"

C>F>   "FDNBT.DATA.VPLUS.ATCH.G0610V00"

C  5 *-* WTO.CONSNAME ='CNDVMSTR'

C>L>   "CNDVMSTR"

C  6 *-* WTO.DESC ='00100010'/* RED   */

C>L>   "00100010"

C  7 *-* WTO.DESC ='01000100'/* WHITE */

C>L>   "01000100"

C  8 *-* WTO.MCSFLAG  = ''

C>L>   ""

C  9 *-* WTO.TEXT ='FDI CONSOLE DATASET IS' TODataset

C>L>   "FDI CONSOLE DATASET IS"

C>V>   "FDNBT.DATA.VPLUS.ATCH.G0610V00"

C>O>   "FDI CONSOLE DATASET IS FDNBT.DATA.VPLUS.ATCH

C 10 *-* WTO

C>L>   "WTO"

C 11 *-* mvs "send 'FDI DATAST NAME IS "TODataset"',user

C>L>   "MVS"

C>L>   "send 'FDI DATAST NAME IS "

C>O>   "MVS send 'FDI DATAST NAME IS "

C>V>   "FDNBT.DATA.VPLUS.ATCH.G0610V00"

C>O>   "MVS send 'FDI DATAST NAME IS FDNBT.DATA.VPLU

C>L>   "',user=(AB55,AB54),LOGON"

C>O>   "MVS send 'FDI DATAST NAME IS FDNBT.DATA.VPLU

C 12 *-* exit


Please suggest, where I am missing to generate correct output.

On Sat, Jun 23, 2018 at 8:02 PM, Dale R. Smith 
wrote:

> On Sat, 23 Jun 2018 11:16:15 +0300, saurabh khandelwal <
> sourabhkhandelwal...@gmail.com> wrote:
>
> >Hello,
> >
> >I trigger event and below rexx should have been executed
> >
> >/*  REXX */
> >
> >parse arg mtxt . mtxt
> >
> >WTO.CONSNAME = 'CNDVMSTR'
> >
> >WTO.DESC = '01000100'/* WHITE */
> >
> >WTO.DESC = '00100010'/* RED   */
> >
> >WTO.MCSFLAG  = ''
> >
> >WTO.TEXT =  'CONSOLE TEST MSG IS' mtxt
> >
> >WTO.
> >
> >exit
> >
> >But, I checked with operator and they didn't receive any message on their
> >console.  Are we missing anything in this.
>
> Remove the period from the last WTO before the EXIT.  "WTO" is a command,
> "WTO." is not a command.
>
> A simple Google search for NETVIEW WTO found this as the first entry:
> https://www.ibm.com/support/knowledgecenter/en/SSZJDU_5.3.
> 0/com.ibm.itnetviewforzos.doc_5.3/dqcl2ms2171.htm
>
> Not sure if the NETVIEW manuals document what the DESC and MCSFLAG
> settings are.  They are documented in the WTO MACRO definition:
> https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.
> 0/com.ibm.zos.v2r1.ieaa400/iea3a4_Description14.htm
>
> WTO.DESC is a variable that will be read by the WTO command.  Since you
> have two of them in your REXX program, only the last one set will be used.
> In the description for WTO.DESC, it shows that you can code it as decimal
> numbers instead of binary, which would be more readable!
>
> Instead of coding WTO.DESC = '01000100' you could code WTO.DESC =
> '(2,6)'.  2 and 6 mean "Immediate Action Required" and "Job Status".  I
> don't know if that means the message will be displayed in "white".
>
> Instead of coding WTO.DESC = '00100010'  you could code WTO.DESC =
> '(3,11)'.  3 and 11 mean "Eventual Action Required" and "Critical Eventual
> Action Required".  I don't know if that means the message will be displayed
> in "red".
>
> Instead of coding WTO.MCSFLAG  = '' you could code WTO.MCSFLAG =
> '(NOCPY)'
>
> If you have not done so already, please download and read, (or read
> online),  the NETVIEW manuals!
>
> --
> Dale R. Smith
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-23 Thread saurabh khandelwal
Hello,

I trigger event and below rexx should have been executed

/*  REXX */

parse arg mtxt . mtxt

WTO.CONSNAME = 'CNDVMSTR'

WTO.DESC = '01000100'/* WHITE */

WTO.DESC = '00100010'/* RED   */

WTO.MCSFLAG  = ''

WTO.TEXT =  'CONSOLE TEST MSG IS' mtxt

WTO.

exit

But, I checked with operator and they didn't receive any message on their
console.  Are we missing anything in this.


On Sat, Jun 23, 2018 at 7:35 AM, saurabh khandelwal <
sourabhkhandelwal...@gmail.com> wrote:

> Hello Steve,
> In below example, how do we make sure which console, this output should
> go. Don't we need to put console name in this rexx and will i be getting
> these message in white color or red color. to operator console.
>
>
>  /* REXX   */
> 'PIPE SAFE * | STEM MSG.'
> TODataset = Word( Msg.3,3 )
> WTO.CONSNAME = ''
> WTO.DESC = '00100010'/* RED   */
> WTO.DESC = '01000100'/* WHITE */
> WTO.MCSFLAG  = ''
> WTO.TEXT =  'OPSMSG01 FIB DATASET NAME IS' TODataset
> WTO.
> EXIT
>
>
>
> On Sat, Jun 23, 2018 at 3:35 AM, Steve Horein 
> wrote:
>
>>  /* REXX   */
>> 'PIPE SAFE * | STEM MSG.'
>> TODataset = Word( Msg.3,3 )
>> WTO.CONSNAME = ''
>> WTO.DESC = '00100010'/* RED   */
>> WTO.DESC = '01000100'/* WHITE */
>> WTO.MCSFLAG  = '0000'
>> WTO.TEXT =  'OPSMSG01 FIB DATASET NAME IS' TODataset
>> WTO.
>> EXIT
>>
>> On Fri, Jun 22, 2018 at 1:15 PM saurabh khandelwal <
>> sourabhkhandelwal...@gmail.com> wrote:
>>
>> > Thanks for reply.
>> >
>> > I looked at netview command manual and found  "WTO.TEXT" can be used for
>> > this purpose. But I am not sure, how do I incorporate this into this
>> case.
>> >
>> > Netview table code.
>> >
>> >  IF MSGID = 'SVTM052I' THEN
>> >  EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);
>> >
>> >
>> >
>> > In our rexx we retrieve the full messge via:
>> >
>> > /* REXX   */
>> >
>> > 'PIPE SAFE * | STEM MSG.'
>> >
>> > TODataset = Word( Msg.3,3 )
>> > mvs "send 'FIB DATASET NAME IS "TODataset"',CON=CNDVMSTR"
>> >
>> > in this rexx, where do I need to add WTO.TEXT to display  TODataset as
>> WTO
>> > message on operator console.
>> >
>> > Can anybody suggest to implement this change.
>> >
>> >
>> >
>> > On Fri, Jun 22, 2018 at 5:15 PM, Lucas Rosalen > >
>> > wrote:
>> >
>> > > Right tool for the right job.
>> > >
>> > > Read about WTO (REXX) command in Netview commands manual.
>> > >
>> > > 
>> > > ---
>> > > *Lucas Rosalen*
>> > > rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
>> > > http://br.linkedin.com/in/lrosalen
>> > >
>> > >
>> > > 2018-06-22 6:31 GMT+02:00 saurabh khandelwal <
>> venkatkulkarn...@gmail.com
>> > >:
>> > >
>> > > > Hello Group,
>> > > >
>> > > >
>> > > >  /*  REXX */
>> > > >
>> > > > 'PIPE SAFE * | STEM MSG.'
>> > > >
>> > > >
>> > > >
>> > > > TODataset = Word( Msg.3,3 )
>> > > >
>> > > > mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"
>> > > >
>> > > > exit
>> > > >
>> > > >
>> > > > We used CN operand with send command to send message to  operator
>> > console
>> > > > and now i receive output as required.
>> > > >
>> > > > But this message is visible in green color which get disappeared as
>> > other
>> > > > message comes on console.
>> > > >
>> > > > But, I would like to have these message in white color ( not sure
>> if we
>> > > can
>> > > > say as WTO), so that until operator intervention, these message
>> will be
>> > > on
>> > > > console itself.
>> > > >
>> > > >
>> > > > Can you please suggest, how can i achieve this
>> > > >
>> > > > 
>> --
>> > > > For IBM-MAIN subscribe / signoff / archive access instructions,
>> > > > send email to lists...@listserv.ua.edu with the message: INFO
>> IBM-MAIN
>> > > >
>> > >
>> > > 
>> --
>> > > For IBM-MAIN subscribe / signoff / archive access instructions,
>> > > send email to lists...@listserv.ua.edu with the message: INFO
>> IBM-MAIN
>> > >
>> >
>> >
>> >
>> > --
>> > Thanks & Regards
>> > Saurabh Khandelwal
>> >
>> > --
>> > For IBM-MAIN subscribe / signoff / archive access instructions,
>> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>> >
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>
>
>
> --
> Thanks & Regards
> Saurabh Khandelwal
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread saurabh khandelwal
Hello Steve,
In below example, how do we make sure which console, this output should go.
Don't we need to put console name in this rexx and will i be getting these
message in white color or red color. to operator console.


 /* REXX   */
'PIPE SAFE * | STEM MSG.'
TODataset = Word( Msg.3,3 )
WTO.CONSNAME = ''
WTO.DESC = '00100010'/* RED   */
WTO.DESC = '01000100'/* WHITE */
WTO.MCSFLAG  = ''
WTO.TEXT =  'OPSMSG01 FIB DATASET NAME IS' TODataset
WTO.
EXIT



On Sat, Jun 23, 2018 at 3:35 AM, Steve Horein 
wrote:

>  /* REXX   */
> 'PIPE SAFE * | STEM MSG.'
> TODataset = Word( Msg.3,3 )
> WTO.CONSNAME = ''
> WTO.DESC = '00100010'/* RED   */
> WTO.DESC = '01000100'/* WHITE */
> WTO.MCSFLAG  = ''
> WTO.TEXT =  'OPSMSG01 FIB DATASET NAME IS' TODataset
> WTO.
> EXIT
>
> On Fri, Jun 22, 2018 at 1:15 PM saurabh khandelwal <
> sourabhkhandelwal...@gmail.com> wrote:
>
> > Thanks for reply.
> >
> > I looked at netview command manual and found  "WTO.TEXT" can be used for
> > this purpose. But I am not sure, how do I incorporate this into this
> case.
> >
> > Netview table code.
> >
> >  IF MSGID = 'SVTM052I' THEN
> >  EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);
> >
> >
> >
> > In our rexx we retrieve the full messge via:
> >
> > /* REXX   */
> >
> > 'PIPE SAFE * | STEM MSG.'
> >
> > TODataset = Word( Msg.3,3 )
> > mvs "send 'FIB DATASET NAME IS "TODataset"',CON=CNDVMSTR"
> >
> > in this rexx, where do I need to add WTO.TEXT to display  TODataset as
> WTO
> > message on operator console.
> >
> > Can anybody suggest to implement this change.
> >
> >
> >
> > On Fri, Jun 22, 2018 at 5:15 PM, Lucas Rosalen 
> > wrote:
> >
> > > Right tool for the right job.
> > >
> > > Read about WTO (REXX) command in Netview commands manual.
> > >
> > > 
> > > ---
> > > *Lucas Rosalen*
> > > rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
> > > http://br.linkedin.com/in/lrosalen
> > >
> > >
> > > 2018-06-22 6:31 GMT+02:00 saurabh khandelwal <
> venkatkulkarn...@gmail.com
> > >:
> > >
> > > > Hello Group,
> > > >
> > > >
> > > >  /*  REXX */
> > > >
> > > > 'PIPE SAFE * | STEM MSG.'
> > > >
> > > >
> > > >
> > > > TODataset = Word( Msg.3,3 )
> > > >
> > > > mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"
> > > >
> > > > exit
> > > >
> > > >
> > > > We used CN operand with send command to send message to  operator
> > console
> > > > and now i receive output as required.
> > > >
> > > > But this message is visible in green color which get disappeared as
> > other
> > > > message comes on console.
> > > >
> > > > But, I would like to have these message in white color ( not sure if
> we
> > > can
> > > > say as WTO), so that until operator intervention, these message will
> be
> > > on
> > > > console itself.
> > > >
> > > >
> > > > Can you please suggest, how can i achieve this
> > > >
> > > > 
> --
> > > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > > send email to lists...@listserv.ua.edu with the message: INFO
> IBM-MAIN
> > > >
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> >
> >
> > --
> > Thanks & Regards
> > Saurabh Khandelwal
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread saurabh khandelwal
Thanks for reply.

I looked at netview command manual and found  "WTO.TEXT" can be used for
this purpose. But I am not sure, how do I incorporate this into this case.

Netview table code.

 IF MSGID = 'SVTM052I' THEN
 EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);



In our rexx we retrieve the full messge via:

/* REXX   */

'PIPE SAFE * | STEM MSG.'

TODataset = Word( Msg.3,3 )
mvs "send 'FIB DATASET NAME IS "TODataset"',CON=CNDVMSTR"

in this rexx, where do I need to add WTO.TEXT to display  TODataset as WTO
message on operator console.

Can anybody suggest to implement this change.



On Fri, Jun 22, 2018 at 5:15 PM, Lucas Rosalen 
wrote:

> Right tool for the right job.
>
> Read about WTO (REXX) command in Netview commands manual.
>
> 
> ---
> *Lucas Rosalen*
> rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
> http://br.linkedin.com/in/lrosalen
>
>
> 2018-06-22 6:31 GMT+02:00 saurabh khandelwal :
>
> > Hello Group,
> >
> >
> >  /*  REXX */
> >
> > 'PIPE SAFE * | STEM MSG.'
> >
> >
> >
> > TODataset = Word( Msg.3,3 )
> >
> > mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"
> >
> > exit
> >
> >
> > We used CN operand with send command to send message to  operator console
> > and now i receive output as required.
> >
> > But this message is visible in green color which get disappeared as other
> > message comes on console.
> >
> > But, I would like to have these message in white color ( not sure if we
> can
> > say as WTO), so that until operator intervention, these message will be
> on
> > console itself.
> >
> >
> > Can you please suggest, how can i achieve this
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread saurabh khandelwal
Hello All,

We have requirement of displaying dataset name to operator console upon
receiving  SVTM052I  msg id like below.

 SVTM052I message is a multiline message, so the message is 1 message of 4
lines.

In the automationtable you can just code:



 IF MSGID = 'SVTM052I' THEN

 EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);



In your rexx you can retrieve the full messge via:



'PIPE SAFE * | STEM MSG.'



Stem variable Msg.1 to Msg.4 will contain all 4 lines of the SVTM052I
message.

So if you would want the TO-dataset, then you could take the 3th word of
Msg.3:



TODataset = Word( Msg.3,3 )

mvs "send 'FIB DATASET NAME IS "TODataset"',CON=CNDVMSTR"


Now, my problem is, once these dataset name getting displayed on operator
console. He is over looking it because as soon as other message comes, this
dataset message scroll up and then eventually disappear from screen.


My requirement is, once this dataset message display on operator console,
it should be there and  should not be scroll up with other message until
operator press enter on that message which is indication of the looked at
this dataset for further processing.


I hope, i am able to explain my requirement.   Thank you all for reply.


On Fri, Jun 22, 2018 at 5:15 PM, Lucas Rosalen 
wrote:

> Right tool for the right job.
>
> Read about WTO (REXX) command in Netview commands manual.
>
> 
> ---
> *Lucas Rosalen*
> rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
> http://br.linkedin.com/in/lrosalen
>
>
> 2018-06-22 6:31 GMT+02:00 saurabh khandelwal :
>
> > Hello Group,
> >
> >
> >  /*  REXX */
> >
> > 'PIPE SAFE * | STEM MSG.'
> >
> >
> >
> > TODataset = Word( Msg.3,3 )
> >
> > mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"
> >
> > exit
> >
> >
> > We used CN operand with send command to send message to  operator console
> > and now i receive output as required.
> >
> > But this message is visible in green color which get disappeared as other
> > message comes on console.
> >
> > But, I would like to have these message in white color ( not sure if we
> can
> > say as WTO), so that until operator intervention, these message will be
> on
> > console itself.
> >
> >
> > Can you please suggest, how can i achieve this
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Issue WTO message using MVS SEND command

2018-06-21 Thread saurabh khandelwal
Hello Group,


 /*  REXX */

'PIPE SAFE * | STEM MSG.'



TODataset = Word( Msg.3,3 )

mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"

exit


We used CN operand with send command to send message to  operator console
and now i receive output as required.

But this message is visible in green color which get disappeared as other
message comes on console.

But, I would like to have these message in white color ( not sure if we can
say as WTO), so that until operator intervention, these message will be on
console itself.


Can you please suggest, how can i achieve this

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: MVS SEND command Error

2018-06-21 Thread saurabh khandelwal
 /*  REXX */

'PIPE SAFE * | STEM MSG.'



TODataset = Word( Msg.3,3 )

mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"

exit


Problem has been resolved by using sync command with option both.

Now, i used CN operand with send command to send message to  operator
console and now i receive as required.

But this message is visible in green color which get disappeared as other
message comes on console.

But, I would like to have these message in white color ( not sure if we can
say as WTO), so that until operator intervention, these message will be on
console itself.


Can you please suggest.

On Thu, Jun 21, 2018 at 2:56 AM, Jesse 1 Robinson 
wrote:

> Two separate issues have been discussed in this thread. One is the use (or
> not) of user logs. The other is the use (or not) of TSOE segments. These
> two issues are independent. You can have user logs with or without TSOE
> segments, and TSOE segments with or without user logs.
>
> I have not been able to reproduce OP's problem directly with MVS commands.
> If I name more than one userid, the message goes to all of them unless (in
> our case) there is no associated user log, in which case I get this:
>
> 16.51.01 X0   se 'test msg from Skip',user=(xxx066, xxx166,
> xxx266),logon
>
> 16.51.01 X0   IKJ591I   USER LOG DOES NOT EXIST FOR USER(S)
> XXX266  AND THE BROADCAST
> 16.51.01 X0   IKJ591I  DATA SET CANNOT BE USED, MESSAGE
> CANCELLED.
>
> All three userids are targeted. The first two are successful while the
> third fails on missing user log.
>
> .
> .
> J.O.Skip Robinson
> Southern California Edison Company
> Electric Dragon Team Paddler
> SHARE MVS Program Co-Manager
> 323-715-0595 Mobile
> 626-543-6132 Office ⇐=== NEW
> robin...@sce.com
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Seymour J Metz
> Sent: Wednesday, June 20, 2018 12:06 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: (External):Re: MVS SEND command Error
>
> It's related to broadcast because you used the LOGON option of SEND. Did
> you do a SYNCH/ Did you try having user logs? See <
> https://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/
> com.ibm.zos.v2r1.ikjb400/conlogs.htm>.
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of saurabh khandelwal 
> Sent: Wednesday, June 20, 2018 1:36 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: MVS SEND command Error
>
> yes.. both users have TSO segments and active users. I was unable to
> understand how it is related to UADS and broadcast dataset.
>
> On Wed, Jun 20, 2018 at 7:35 PM, Seymour J Metz  wrote:
>
> > Does AB55 have a TSO segment?
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List  on
> > behalf of saurabh khandelwal 
> > Sent: Wednesday, June 20, 2018 11:03 AM
> > To: IBM-MAIN@listserv.ua.edu
> > Subject: Re: MVS SEND command Error
> >
> > Hello Seymour/ Lizette,
> >
> > We use RACF in our system .
> >
> > Below is our definition of IKJTSO.
> >
> > BROWSESYS1.DEVL.PARMLIB(IKJTSODV) - 01.02
> >
> >   LOGNAME(*)   /*   */ +
> >
> >   BROADCAST (DATASET(SYS2.DEVL.BRODCAST))
> >
> > SEND/* SEND COMMAND DEFAULTS */ +
> >
> >OPERSEND(ON) /*   */ +
> >
> >USERSEND(ON) /*   */ +
> >
> >SAVE(ON) /*   */ +
> >
> >CHKBROD(OFF) /*   */ +
> >
> >LOGNAME(*)   /*   */ +
> >
> >BROADCAST (DATASET(SYS2.DEVL.BRODCAST))
> >
> > ALLOCATE/* ALLOCATE COMMAND DEFAULT  */  +
> >
> >DEFAULT(OLD) /*   */
> >
> > TRANSREC /* ALLOCATE COMMAND DEFAULT  */
> >
> >NODESMF((NODENAME,SMF)) /*ALLOCATE COMMAND DEFAULT*/ +
> >
> >CIPHER(YES)  /*   */ +
> >
> >SPOOLCL(B)   /*   */ +
> >
> >OUTWARN(5,15000) /*   */ +
> >
> >OUTLIM(500)  /*   */ +
> >
> >VIO(SYSALLDA)/*   */ +
> >
> >  

Re: MVS SEND command Error

2018-06-20 Thread saurabh khandelwal
yes.. both users have TSO segments and active users. I was unable to
understand how it is related to UADS and broadcast dataset.

On Wed, Jun 20, 2018 at 7:35 PM, Seymour J Metz  wrote:

> Does AB55 have a TSO segment?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of saurabh khandelwal 
> Sent: Wednesday, June 20, 2018 11:03 AM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: MVS SEND command Error
>
> Hello Seymour/ Lizette,
>
> We use RACF in our system .
>
> Below is our definition of IKJTSO.
>
> BROWSESYS1.DEVL.PARMLIB(IKJTSODV) - 01.02
>
>   LOGNAME(*)   /*   */ +
>
>   BROADCAST (DATASET(SYS2.DEVL.BRODCAST))
>
> SEND/* SEND COMMAND DEFAULTS */ +
>
>OPERSEND(ON) /*   */ +
>
>USERSEND(ON) /*   */ +
>
>SAVE(ON) /*   */ +
>
>CHKBROD(OFF) /*   */ +
>
>LOGNAME(*)   /*   */ +
>
>BROADCAST (DATASET(SYS2.DEVL.BRODCAST))
>
> ALLOCATE/* ALLOCATE COMMAND DEFAULT  */  +
>
>DEFAULT(OLD) /*   */
>
> TRANSREC /* ALLOCATE COMMAND DEFAULT  */
>
>NODESMF((NODENAME,SMF)) /*ALLOCATE COMMAND DEFAULT*/ +
>
>CIPHER(YES)  /*   */ +
>
>SPOOLCL(B)   /*   */ +
>
>OUTWARN(5,15000) /*   */ +
>
>OUTLIM(500)  /*   */ +
>
>VIO(SYSALLDA)/*   */ +
>
>LOGSEL(LOG)  /*   */ +
>
>LOGNAME(MISC)/*   */ +
>
>DAPREFIX(TUPREFIX)   /*   */ +
>
>USRCTL(NAMES.TEXT)   /*   */ +
>
>SYSOUT(*)/*   */
>
>
>
> Can you please tell me, what kind of changes do we have to make to solve
> this issue in our IKJTSO member.
>
>
>
>
> On Tue, Jun 19, 2018 at 10:39 PM, Seymour J Metz  wrote:
>
> > Are you using UADS or SAF?
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List  on behalf
> > of saurabh khandelwal 
> > Sent: Tuesday, June 19, 2018 3:17 PM
> > To: IBM-MAIN@listserv.ua.edu
> > Subject: MVS SEND command Error
> >
> > Hello Group,
> >
> > During execution of rexx, I am getting little weird output and not sure
> the
> > relationship between them .
> >
> >
> >  /*  REXX */
> >
> > 'PIPE SAFE * | STEM MSG.'
> >
> >
> >
> > TODataset = Word( Msg.3,3 )
> >
> > mvs "send 'My console name is  "TODataset"',user=(AB54,AB55),LOGON
> >
> > exit
> >
> >
> >
> > I am getting below error.
> >
> >
> >
> >  IKJ144I   UNDEFINED USERID(S) AB55
> >
> >  IKJ144I
> >
> > https://secure-web.cisco.com/1SAZQhOsalsJElMXos2HSHFNwHW11W
> > 0t6ydh6-sV2VQfEJKGBctchdxQ3-oeq-da6JvYHQKI0xv0l94P363BPPGumj6N
> > UKjK9qtyy5txX_j3xaNXhCr6_ra2ZSyuS4I7rAOq8JOV-rTqAgO_
> > U3CJcnrDdKsBtH47VD4LnjEVnn0Sl7blSoUEHBNEhqSXPxezgMZro6ZAJIZX_
> > 1UU6sIVW54emLWoGihf81jbu4siCKBIT3xTNlrI57-Hs1pYXJpfjrcaXc9JzkQIXDHduIhTC
> > m7sjvzVTnnq9xJkvYBj4hJQ9dVy5jyj0jJE8mrE8it5_5Dn38ni0PNCnA_
> > ljN-B8ofBx45oZv_F7yz2dGnJ_jpgC7RIRjIevQUYtSh9Nqq0M-_
> > h4eQ5eCWvVFvsVVOGljj2bcoi0BjfGyr27I91L-rQLpICav9bAWEHMlyJ1pmOn/https%
> > 3A%2F%2Fhttp://secure-web.cisco.com/19w7PwdpJn1oLqmJWBtyG1V5O6RgDkK_
> eX3gDR3fgUeQ60hhj6qdoVGxuxwmBuAvfhntCwAlCh0CXhyEdc8cMaN9KLud
> xkiXUJzHHfyMgPa3UPLUA88JHnzvvtCgS7UVuyiXH4UtZ8hEmrQXMlIhNYg2
> dlSE9HNb3z4Q5Xaf1LsfcU-5CSw1ZOU9H0v1DqmMeUp5AZpn3zFnr
> 23DKfBSZpRVeRXsErsuDtQl09NLnsIIm5piY2WzNm9P7LcHq4Js1Q0HKKjD8
> SYjziZTPL3kkmoceqKECgCgbjN2N9tr889E4NEfrgY8x26PlYtgUmYKE1QXzocu8NE55_
> LaoEdfnKx0eI25saYvyiEkgOilbbL2nT9cFeqHBD8EXXLfPsZnnZDwJ6n6Wg
> 630ajeXDYKlKYkCl8COLiGtGWVFHdJej53xFXCT6AcZNcJM0bNpt03f/
> http%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%
> > 2FSSLTBW_2.1.0%2Fcom.ibm.zos.v2r1.ieam900%2Fm012707.htm
> >
> > and this explain that broadcast and uads are not matching. I dont
> > understand meaning of this error and how sync uads command will help to
> > solve this issue.
>

Re: MVS SEND command Error

2018-06-20 Thread saurabh khandelwal
Hello Seymour/ Lizette,

We use RACF in our system .

Below is our definition of IKJTSO.

BROWSESYS1.DEVL.PARMLIB(IKJTSODV) - 01.02

  LOGNAME(*)   /*   */ +

  BROADCAST (DATASET(SYS2.DEVL.BRODCAST))

SEND/* SEND COMMAND DEFAULTS */ +

   OPERSEND(ON) /*   */ +

   USERSEND(ON) /*   */ +

   SAVE(ON) /*   */ +

   CHKBROD(OFF) /*   */ +

   LOGNAME(*)   /*   */ +

   BROADCAST (DATASET(SYS2.DEVL.BRODCAST))

ALLOCATE/* ALLOCATE COMMAND DEFAULT  */  +

   DEFAULT(OLD) /*   */

TRANSREC /* ALLOCATE COMMAND DEFAULT  */

   NODESMF((NODENAME,SMF)) /*ALLOCATE COMMAND DEFAULT*/ +

   CIPHER(YES)  /*   */ +

   SPOOLCL(B)   /*   */ +

   OUTWARN(5,15000) /*   */ +

   OUTLIM(500)  /*   */ +

   VIO(SYSALLDA)/*   */ +

   LOGSEL(LOG)  /*   */ +

   LOGNAME(MISC)/*   */ +

   DAPREFIX(TUPREFIX)   /*   */ +

   USRCTL(NAMES.TEXT)   /*   */ +

   SYSOUT(*)/*   */



Can you please tell me, what kind of changes do we have to make to solve
this issue in our IKJTSO member.




On Tue, Jun 19, 2018 at 10:39 PM, Seymour J Metz  wrote:

> Are you using UADS or SAF?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of saurabh khandelwal 
> Sent: Tuesday, June 19, 2018 3:17 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: MVS SEND command Error
>
> Hello Group,
>
> During execution of rexx, I am getting little weird output and not sure the
> relationship between them .
>
>
>  /*  REXX */
>
> 'PIPE SAFE * | STEM MSG.'
>
>
>
> TODataset = Word( Msg.3,3 )
>
> mvs "send 'My console name is  "TODataset"',user=(AB54,AB55),LOGON
>
> exit
>
>
>
> I am getting below error.
>
>
>
>  IKJ144I   UNDEFINED USERID(S) AB55
>
>  IKJ144I
>
> https://secure-web.cisco.com/1SAZQhOsalsJElMXos2HSHFNwHW11W
> 0t6ydh6-sV2VQfEJKGBctchdxQ3-oeq-da6JvYHQKI0xv0l94P363BPPGumj6N
> UKjK9qtyy5txX_j3xaNXhCr6_ra2ZSyuS4I7rAOq8JOV-rTqAgO_
> U3CJcnrDdKsBtH47VD4LnjEVnn0Sl7blSoUEHBNEhqSXPxezgMZro6ZAJIZX_
> 1UU6sIVW54emLWoGihf81jbu4siCKBIT3xTNlrI57-Hs1pYXJpfjrcaXc9JzkQIXDHduIhTC
> m7sjvzVTnnq9xJkvYBj4hJQ9dVy5jyj0jJE8mrE8it5_5Dn38ni0PNCnA_
> ljN-B8ofBx45oZv_F7yz2dGnJ_jpgC7RIRjIevQUYtSh9Nqq0M-_
> h4eQ5eCWvVFvsVVOGljj2bcoi0BjfGyr27I91L-rQLpICav9bAWEHMlyJ1pmOn/https%
> 3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%
> 2FSSLTBW_2.1.0%2Fcom.ibm.zos.v2r1.ieam900%2Fm012707.htm
>
> and this explain that broadcast and uads are not matching. I dont
> understand meaning of this error and how sync uads command will help to
> solve this issue.
>
> can anybody guide me how this send command works when we have multiple
> users in list to receive those messages.
>
> One more thing I noticed that, whichever user id I put it first in the send
> command ex :  user=(AB54,AB55)  , AB54 . This user will get notified but
> for rest of the users, I get undefined error.
>
> These all are working RACF users. I am not sure, why I am getting this
> issue.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> ----------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


MVS SEND command Error

2018-06-19 Thread saurabh khandelwal
Hello Group,

During execution of rexx, I am getting little weird output and not sure the
relationship between them .


 /*  REXX */

'PIPE SAFE * | STEM MSG.'



TODataset = Word( Msg.3,3 )

mvs "send 'My console name is  "TODataset"',user=(AB54,AB55),LOGON

exit



I am getting below error.



 IKJ144I   UNDEFINED USERID(S) AB55

 IKJ144I

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieam900/m012707.htm

and this explain that broadcast and uads are not matching. I dont
understand meaning of this error and how sync uads command will help to
solve this issue.

can anybody guide me how this send command works when we have multiple
users in list to receive those messages.

One more thing I noticed that, whichever user id I put it first in the send
command ex :  user=(AB54,AB55)  , AB54 . This user will get notified but
for rest of the users, I get undefined error.

These all are working RACF users. I am not sure, why I am getting this
issue.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Netview Automation Table Code

2018-06-13 Thread saurabh khandelwal
Hello Tony,



Thanks for reply. I have  don’t have programming knowledge to code member
in SDGASAMP for

DGA.SDGASAMP(DGADTFY2).



Also, my netview knowledge is limited to code trap command as you mentioned
previously.



SVTM052I STEP1COPY FKFD022( 704) SNODE=SEB.SND.TCS 280

SVTM052I  FROM ECP.A601P2.ATI7.NBK.PS
<http://e2cp.azd601p2.ati7.nbk.ps/>.G3104V00

SVTM052I  TO   FBT.DATA.VLUS.SAT17.G1678V00*

 SVTM052I  COMPLETED  /SCPA000I

Can you please help me to code this multiline WTO..



I checked MVS initialization guide and found that by default,



If you do not specify an MPFLSTxx member, the defaults are AUTO(YES). So,
we don’t have to code this . Please correct me, if wrong.




On Tue, Jun 12, 2018 at 7:54 PM, Cieri, Anthony  wrote:

>
> Hello Saurabh,
>
> I can hopefully offer a few points of clarification.  I think that
> the IGD104I messages are generally only written to the joblog.
> Connect:Direct uses dynamic allocation for all processes.
> The SVTM052I message IS written to syslog and can be automated if
> you have coded AUTO(YES) in you MPFLSTxx PARMLIB member.  Also, the most
> significant point was offered by @Vince. The SVTM052I message ID is
> Multi-line Write-to-Operator (MLWTO) message. It is generally issued as a
> (4) line WTO, but each line has the SVTM052I message ID. Your message trap
> as provided in a previous post will not work because the 'TO' text does NOT
> occur in the first line of the MLWTO. We do something similar here and I
> have pasted my trap for reference:
>
> IF (LABEL:SVTM052A) MSGID = 'SVTM052I' & JOBNAME = JOB
>   & (ACQUIRE('LASTLINE WORD 4.1') = .'SDEDSNRI'. |
> ACQUIRE('LASTLINE WORD 4.1') = .'SDEPDSRI'.)
> THEN EXEC( CMD('MVS %CON ') ROUTE(ONE AUTONDM));
>
> This MAT entry is used to trap the sense code is the last (4th)
> line of the MLWTO.  You could do something similar to trap the 'TO'  text
> and Dataset name in the third line of the MLWTO.
>
> Also, in case you were not aware, there are a few utility programs
> that are distributed along with Connect:Direct for z/OS.  One in
> particular, DGADTFY2 (DMNOTFY2) can be used within a Conenct:Direct process
> to send a message to a TSO user when the process ends.  You can pass the TO
> dataset name as a parameter to DGADTFY2. You can also use modal logic in
> the process to send the message for a successful or unsuccessful COPY step
> (or BOTH if you choose). Here is a simple example:
>
> STEP02 IF (COPY01 = 0) THEN
> NOTE21 RUN TASK (PGM=DGADTFY2,PARM=(GOOD,'',)) -
>
> SNODE
>  ELSE
> NOTE22 RUN TASK (PGM=DGADTFY2,PARM=(FAIL,'',)) -
>
>   SNODE
>
> The first step (NOTE21) will send a message to the user specified
> by  indicating that the file transfer was successful if the COPY01
> Step ended with a return code of 0.. The message will also contain the
> dataset name. The second step (NOTE22) will send a message to the same user
> indicating that the file transfer fails, if the COPY01 step ends with a
> return code other than 0. Of course, this example assumes that you have
> coded a Connect:Direct COPY step named COPY01.
>
> I hope this helps some.
>
> Tony
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of saurabh khandelwal
> Sent: Tuesday, June 12, 2018 7:00 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Netview Automation Table Code
>
> Hello Steve,
>
> I couldn't understand your point. Can you please help to understand this.
>
> I am getting below message in SYSLOG generated using DCON  and I could see
> these messages are in  JESYSMSG, JESMSGLG and  also in SYSLOG
>
> OUR SYSLOG VIEW*
>
> ---6+7+8+9+0+1+2+
>
> IGD104I FDNBT.DATA.VPLUS.SDPAT17.G1678V00RETAINED,
>
>  DDNAME=NDM00222
>
>  SVTM052I  FROM E2CP.AZD601P2.ATI7.NBK.PS.G3104V00
>
> * SVTM052I  TO   FDNBT.DATA.VPLUS.SDPAT17.G1678V00*
>
>  SVTM052I  COMPLETED  /SCPA000I
>
> -  -TIMINGS (MINS.)-
>
>
> Thanks & Regards
> Saurabh
>
> On Tue, Jun 12, 2018 at 1:04 PM, Steve Horein 
> wrote:
>
> > It appears the messages are found in JESYSMSG, and not
> > JESMSGLG/SYSLOG/OPERLOG.
> > You will likely need something like System Automation's Job Log
> > Monitoring <https://www.ibm.com/support/knowledgecenter/SSWRCJ_4.1.0/
> > com.ibm.safos.doc_4.1/CustandProg/Joblog_Monitoring.html>
> > to accomplish the g

Re: REXX to change Date in PDS member

2018-06-12 Thread saurabh khandelwal
Hello  Kolusu,

I tried to answer queries raised by different experts.

We are looking for YYMMDD format, which is DATE('S') function in REXX

 In my current requirement, we have JCL in place and there we are using
tape volume as date like below.
example  OV='D18611',


Ex : In this below DD name, from JCL should be updated with today's date in
 OV='D18611'

//IEB  PROC OV='D18611',DS='DS',LB='LB',GDG='(0)'



and


Or  like below.  in DD name TAPE  with  VOL=SER=(D18611) .



//TAPE DD  DSN=RETP.DATA.QSAMCPY1,DISP=(,PASS),

// UNIT=359D,VOL=SER=(D18611),LABEL=(193,SL)



//*=


Can you please suggest, how to handle such situation and update required
date

Thank you once again to help us to solve this issue.

On Tue, Jun 12, 2018 at 6:49 PM, Sri h Kolusu  wrote:

> Saurabh,
>
> You need to first answer the question about the date format.  Post detailed
> information on what you're trying to accomplish. Do not make people guess
> what you mean. This will give you a much better chance of getting a good
> answer to your question.
>
> As for the latest requirement, Look up PARSE and Build the entire string or
> use OVERLAY
>
> Thanks,
> Kolusu
>
> IBM Mainframe Discussion List  wrote on
> 06/12/2018 02:46:02 AM:
>
> > From: saurabh khandelwal 
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Date: 06/12/2018 02:47 AM
> > Subject: Re: REXX to change Date in PDS member
> > Sent by: IBM Mainframe Discussion List 
> >
> > Hello Kolusu,
> >
> > Thanks for help. This is exactly what I was looking for to code. But I
> > still have one doubt in this,
> >
> > Your code works only when I have empty memeber to update with yesterday's
> > and today's date . But how this process works, when we updating dates in
> > JCL like below.
> >
> > Ex : In this below DD name, from JCL should be updated with today's date
> > in  OV='D18611'
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Netview Automation Table Code

2018-06-12 Thread saurabh khandelwal
Hello Steve,

I couldn't understand your point. Can you please help to understand this.

I am getting below message in SYSLOG generated using DCON  and I could see
these messages are in  JESYSMSG, JESMSGLG and  also in SYSLOG

OUR SYSLOG VIEW*

---6+7+8+9+0+1+2+

IGD104I FDNBT.DATA.VPLUS.SDPAT17.G1678V00RETAINED,

 DDNAME=NDM00222

 SVTM052I  FROM E2CP.AZD601P2.ATI7.NBK.PS.G3104V00

* SVTM052I  TO   FDNBT.DATA.VPLUS.SDPAT17.G1678V00*

 SVTM052I  COMPLETED  /SCPA000I

-  -TIMINGS (MINS.)-


Thanks & Regards
Saurabh

On Tue, Jun 12, 2018 at 1:04 PM, Steve Horein 
wrote:

> It appears the messages are found in JESYSMSG, and
> not JESMSGLG/SYSLOG/OPERLOG.
> You will likely need something like System Automation's Job Log Monitoring
> <https://www.ibm.com/support/knowledgecenter/SSWRCJ_4.1.0/
> com.ibm.safos.doc_4.1/CustandProg/Joblog_Monitoring.html>
> to accomplish the goal, or some other method to get these messages as WTOs.
>
>
>
> On Tue, Jun 12, 2018 at 4:31 AM saurabh khandelwal <
> venkatkulkarn...@gmail.com> wrote:
>
> > Hello Vince,
> >
> > Thanks for reply.
> >
> > I want to trap below dataset only when
> >
> >   FDNBT.DATA.VPLUS.SDPAT17.G1678V00
> >
> > we see  SVTM052I   this msgid and TEXT  "TO " .
> > I am not sure, if i made mistake in coding this in netview automation
> > table.
> >
> > please suggest.
> >
> > On Tue, Jun 12, 2018 at 12:10 PM, Vince Getgood 
> > wrote:
> >
> > > I'm not a Netview or Systems Automation expert, but I THINK what's
> > > happening here is that SVTM052I is a multi-line message, and you are
> > trying
> > > to process it like a single line message.
> > >
> > > Note in your post that there are THREE lines that have the message
> number
> > > SVTM052I.
> > >
> > > I'm guessing that Netview is matching on the FIRST line (SVTM052I
> > > FROM E2CP.AZD601P2.ATI7.NBK.PS), but as that DOES NOT contain .'TO'.
> or
> > > MTXT (whatever that is), the REXX isn't being executed.
> > >
> > > You need to process SVTM052I as a multi-line message.
> > >
> > > Have a look at this http://www-01.ibm.com/support/
> > > docview.wss?uid=swg21253770
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: REXX to change Date in PDS member

2018-06-12 Thread saurabh khandelwal
Thanks for reply.

We always use  IPOUPDTE  for making this change but somebody have to
update  IPOUPDTE  Job with today's date etc, So that required members can
be updated with correct date values. Do you have any other way to make this
happen, so that manual intervention can be avoided.



On Mon, Jun 11, 2018 at 10:27 PM, PINION, RICHARD W. <
rpin...@firsttennessee.com> wrote:

> Why re-invent the wheel, use IPOUPDTE.
>
> //UPDATE1  EXEC  PGM=IPOUPDTE,PARM=UPDATE
> //*
> //*   *
> //* PARM=UPDATECAUSES IPOUPDTE TO CHANGE PDS MEMBERS  *
> //*   *
> //*   *
> //*
> //SYSPRINT DD  SYSOUT=*
> //SYSUDUMP DD  SYSOUT=*
> //@LIB DD  DSN=x.my.CNTL,DISP=SHR
> //* FROM  *   TO  *
> //SYSINDD  DATA,DLM='@@'
> xx
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Seymour J Metz
> Sent: Monday, June 11, 2018 3:24 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: REXX to change Date in PDS member
>
> [External Email]
>
> You can write an ISPF script to edit the member.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> ____
> From: IBM Mainframe Discussion List  on behalf
> of saurabh khandelwal 
> Sent: Monday, June 11, 2018 3:11 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: REXX to change Date in PDS member
>
> Hello Group,
>
>
> I am new to rexx and our new requirement to edit one PDS member with
> previous day day date today's date on regular basis .
>
>
> We are doing this  to edit our full set of JCL on daily basis according to
> this new date by over writing  previous datr date and putting new date.
>
>
> currently we do this manually by editing below member every day with new
> date ( current date. ) .
>
>
> BROWSEBKP.JCL.CNTL(BKPDABD1) - 01.99Line  Col 001
> 080
>
> * Top of Data
> **
> 
>
> D18610
>
>  Bottom of Data
> 
>
> can we automate this process by creating a rexx which will run on daily
> basis and update above pds member with  current date and later on running
> JCL having new dates.
>
> Can you please help.
>
>
>
>
>
>
>
> --
> Thanks & Regards
> Saurabh Khandelwal
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> FIRST TENNESSEE
>
> Confidentiality notice:
> This e-mail message, including any attachments, may contain legally
> privileged and/or confidential information. If you are not the intended
> recipient(s), or the employee or agent responsible for delivery of this
> message to the intended recipient(s), you are hereby notified that any
> dissemination, distribution, or copying of this e-mail message is strictly
> prohibited. If you have received this message in error, please immediately
> notify the sender and delete this e-mail message from your computer.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: REXX to change Date in PDS member

2018-06-12 Thread saurabh khandelwal
Hello Kolusu,

Thanks for help. This is exactly what I was looking for to code. But I
still have one doubt in this,

Your code works only when I have empty memeber to update with yesterday's
and today's date . But how this process works, when we updating dates in
JCL like below.

Ex : In this below DD name, from JCL should be updated with today's date
in  OV='D18611'

//IEB  PROC OV='D18611',DS='DS',LB='LB',GDG='(0)'



Or  like below.  in DD name TAPE  with  VOL=SER=(D18611) .



//TAPE DD  DSN=RETP.DATA.QSAMCPY1,DISP=(,PASS),

// UNIT=359D,VOL=SER=(D18611),LABEL=(193,SL)



//*=


Can you please suggest, how to handle such situation and update required
date

On Mon, Jun 11, 2018 at 11:26 PM, Sri h Kolusu  wrote:

> >>> is the date format YYMDD ?  > or Julian , yeah WTH ?
>
> Carmen,
>
> I am guessing that OP date format is YYMMDD but needs to  remove the
> leading zero for Month (January thru September ) and the same for Day (01
> thru 09). Since the year is already 18, we don't have worry about it for
> another 82 years. :)
>
> Saurabh,
>
> You can try this
>
> /* REXX */
> "ALLOC FI(OUTDD) DA('BKP.JCL.CNTL(BKPDABD1)') SHR REUSE"
>
> TODAY = DATE('S')
> YESTERDAY = TODAY - 1
> CDAYMM= STRIP(SUBSTR(TODAY,5,2),'L','0')
> CDAYDD= STRIP(SUBSTR(TODAY,7,2),'L','0')
> YDAYMM= STRIP(SUBSTR(YESTERDAY,5,2),'L','0')
> YDAYDD= STRIP(SUBSTR(YESTERDAY,7,2),'L','0')
>
> LINEOUT   = 'D'||,
>  SUBSTR(YESTERDAY,3,2) ||,
>  YDAYMM||,
>  YDAYDD||,
> '<'||,
> 'D'||,
>  SUBSTR(TODAY,3,2) ||,
>  CDAYMM||,
>  CDAYDD||,
> '<'||,
> 'VOL=SER<'
> QUEUE LINEOUT
> "EXECIO 1 DISKW OUTDD (FINIS"
> "FREE FI(OUTDD)"
>
>
> I will let you ponder about updating the stats upon updating the contents
> of the member
>
> Thanks,
> Kolusu
>
> IBM Mainframe Discussion List  wrote on
> 06/11/2018 12:57:09 PM:
>
> > From: Carmen Vitullo 
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Date: 06/11/2018 12:57 PM
> > Subject: Re: REXX to change Date in PDS member
> > Sent by: IBM Mainframe Discussion List 
> >
> > is the date format YYMDD ?
> > or Julian , yeah WTH ?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Netview Automation Table Code

2018-06-12 Thread saurabh khandelwal
Hello Vince,

Thanks for reply.

I want to trap below dataset only when

  FDNBT.DATA.VPLUS.SDPAT17.G1678V00

we see  SVTM052I   this msgid and TEXT  "TO " .
I am not sure, if i made mistake in coding this in netview automation
table.

please suggest.

On Tue, Jun 12, 2018 at 12:10 PM, Vince Getgood 
wrote:

> I'm not a Netview or Systems Automation expert, but I THINK what's
> happening here is that SVTM052I is a multi-line message, and you are trying
> to process it like a single line message.
>
> Note in your post that there are THREE lines that have the message number
> SVTM052I.
>
> I'm guessing that Netview is matching on the FIRST line (SVTM052I
> FROM E2CP.AZD601P2.ATI7.NBK.PS), but as that DOES NOT contain .'TO'. or
> MTXT (whatever that is), the REXX isn't being executed.
>
> You need to process SVTM052I as a multi-line message.
>
> Have a look at this http://www-01.ibm.com/support/
> docview.wss?uid=swg21253770
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: [EXTERNAL] Netview Automation Table Code

2018-06-12 Thread saurabh khandelwal
Hello  Simon ,

Thanks for reply. I checked our MPFLST and we dont isolate  SVTM052I or
IGD104I  message.
I also checked netview log by using br netloga command and i couldnt find
any traces related to this message.

But i verified that our other automation are working fine.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


REXX to change Date in PDS member

2018-06-11 Thread saurabh khandelwal
Hello Group,


I am new to rexx and our new requirement to edit one PDS member with
previous day day date today's date on regular basis .


We are doing this  to edit our full set of JCL on daily basis according to
this new date by over writing  previous datr date and putting new date.


currently we do this manually by editing below member every day with new
date ( current date. ) .


BROWSEBKP.JCL.CNTL(BKPDABD1) - 01.99Line  Col 001
080

* Top of Data **


D18610

Re: MVS send command in REXX

2018-06-10 Thread saurabh khandelwal
changing  user=(AG54) from  user(AG54) finally worked for me  and now this
command performing correctly.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Netview Automation Table Code

2018-06-10 Thread saurabh khandelwal
I tried posting my message in netview group but I think its not active much.

I designed solution like below.

Message to be trapped from syslog is ...

* FDNBT.DATA.VPLUS.SDPAT17.G1678V00*


*OUR SYSLOG VIEW*

---6+7+8+9+0+1+2+

IGD104I FDNBT.DATA.VPLUS.SDPAT17.G1678V00RETAINED,

 DDNAME=NDM00222

 SVTM052I  FROM E2CP.AZD601P2.ATI7.NBK.PS
.G3104V00

* SVTM052I  TO   FDNBT.DATA.VPLUS.SDPAT17.G1678V00*

 SVTM052I  COMPLETED  /SCPA000I

-  -TIMINGS (MINS.)--




In netview table, i wrote below code.



IF MSGID = 'SVTM052I' & TEXT = .'TO'. & TEXT = MTXT THEN

 EXEC(CMD('FIBREXX 'MTXT)) NETLOG(Y) SYSLOG(Y);





and the REXX i am calling from CNMCLST is  FIBREXX  as below.


/*  REXX */

parse arg mtxt . mtxt

say 'FIB DATASET NAME IS' mtxt

mvs "send 'FIB DATASET NAME IS "mtxt"',user=(TS54),LOGON"

exit




But unfortunately, above solution is not working for me. I even unable to
trap this  SVTM052I message id in netview and then submit this rexx to
operator.


Can you please help to identify the issue.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: MVS send command in REXX

2018-06-08 Thread saurabh khandelwal
Hello,

Thanks for reply.

below command doesn't work. After changing

mvs "send 'AG54LST JOB "mtxt"' user(AG54) now"

to

mvs "send 'AG54LST JOB "mtxt"',user(AG54),now"

I stopped getting any notification as i was getting on any system.

Is there any other syntax for this command .


here mtxt is notthing but a tapped message from syslog , we tried to
capture using netview and we should like to display it to particular tso
user when even triger.

but instead , it was displaying it to all users. I am unable to find
correct way to isolate this issue.

On Fri, Jun 8, 2018 at 1:52 PM, Elardus Engelbrecht <
elardus.engelbre...@sita.co.za> wrote:

> saurabh khandelwal wrote:
>
> >000120 parse arg mtxt . mtxt
>
> How long is that mtxt? If it is too long, the rest of the message command
> will be trimmed off.
>
>
> >000500 mvs "send 'AG54LST JOB "mtxt"' user(AG54) now"
>
> Change above to this (replacing two spaces with two commas):
>
>  mvs "send 'AG54LST JOB "mtxt"',user(AG54),now"
>
> Look up SEND for specific message  receivers in
>
>https://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/
> com.ibm.zos.v2r2.ieag100/s1mess1.htm
>
>
> Disclaimer - I am not a NETVIEW expert anymore...
>
> So, you, not me, need to double check all those ' and " are properly
> balanced.
>
> Groete / Greetings
> Elardus Engelbrecht
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


MVS send command in REXX

2018-06-08 Thread saurabh khandelwal
Hello Group,

In this below REXX,  I want to send message only to operator AG54 but, not
sure why this send command sending message to all users in system , not
only AG54.

I checked syntax for this send command but result is same,





EDIT   NETVIEW.CNMCLST(FAIREXX1) - 01.14

** * Top of Data 

000100 /*  REXX */

000120 parse arg mtxt . mtxt

000240 say 'AG54LST Job STARTED at' mtxt

000500 mvs "send 'AG54LST JOB "mtxt"' user(AG54) now"

000600 exit

**  Bottom of Data **

Can you please help.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Netview Automation Issue

2018-06-03 Thread saurabh khandelwal
 Hello Group,

We using Netview v6.1

After activating RACF, when i restarted netview, I get failure for AUTO1
id  :   "AUTO1' NOT ACTIVE  as below.

>From CNMPROC address space ,

ASSIGN GROUP=+STATGRP,OP=(NETOP1,NETOP2,AUTO1)

NetView initialization style sheet processing has

begun. There is one blank preceding the earlier "is".

 Remember, NetView is one word.  The value of

 is "CNM04" and  is "NM".

This is an example styleMsg statement. There is one

blank preceding the earlier "is".  Remember, NetView

is one word.  The value of  is "CNM04" and

 is "NM".

Member CNMSTGEN included.

DSI089I INVALID STATEMENT IN NCCF MEMBER CNMSTYLE

%INCLUDE CNMSTACT

DSI724I NCCF MEMBER CNMSCBET NOT FOUND ON DSIPARM

DWO362E PIPELINE TERMINATED.  ERROR IN STAGE 1 IN PIPELINE '

< DSIPARM.CNMSCBET

BNH111I NETVIEW LOGON SCREEN BYPASS IS NOW ENABLED.

DSI148I SEVERE ERROR - INVALID VALUE SPECIFIED FOR KEYWORD E

DSI008I 'AUTO1' NOT ACTIVE

DSI031I SPECIFIED NAME 'AUTO1' INVALID

DSI556I DSISVRT : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'D

DSI530I 'DSISVRT ' : 'DST' IS READY AND WAITING FOR WORK

DSI412I THE FOLLOWING ERRORS ENCOUNTERED IN PROCESSING DSIPA

CNM536W OPERATOR ID "AUTO1" SPECIFIED FOR ROUTE KEYWORD IS U

DSI417I DSITBL01 : #066 : IF MSGID = 'NAS3799I' & (TOKEN

 ROUTE(ONE AUTO1)




*RACF definition for AUTO1 user if *



USER=AUTO1  NAME=NETVIEW PPT DEVL  OWNER=STCGRPCREATED=18.142

 DEFAULT-GROUP=SPCUSER  PASSDATE=N/APASS-INTERVAL=N/A PHRASEDATE=N/A

 ATTRIBUTES=PROTECTED

  REVOKE DATE=NONE   RESUME DATE=NONE


  LAST-ACCESS=18.143/11:14:30


  CLASS AUTHORIZATIONS=NONE


  INSTALLATION-DATA=NETVIEW PPT DEVL


  MODEL-NAME=NO


  LOGON ALLOWED   (DAYS)  (TIME)


  -


  ANYDAY  ANYTIME


   GROUP=SPCUSER   AUTH=USE  CONNECT-OWNER=STCGRP
CONNECT-DATE=18.142

 CONNECTS=02  UACC=NONE LAST-CONNECT=18.143/11:14:30


 CONNECT ATTRIBUTES=NONE


 REVOKE DATE=NONE   RESUME DATE=NONE


 SECURITY-LEVEL=NONE SPECIFIED


 CATEGORY-AUTHORIZATION


  NONE SPECIFIED


 SECURITY-LABEL=NONE SPECIFIED


 ***








We tried to trap the same message as earlier but got below message in
netloga




15:44:54 C BR NETLOGA

15:45:19 - CNM493I DSITBL01 : #246 : FDIREXX1 IEF

15:45:19 - DWO032E AUTOMATION ACTION 'FDIREXX1 IEF403I OP117LST - STARTED -
TIME=15.45.19' COULD NOT BE ROUTED TO TASK(S) CNMCSSI

15:45:19 E IEF403I OP117LST - STARTED - TIME=15.45.19

15:45:23 C BR NETLOGA

and I dont see any message on console which i was getting earlier after
trapping message.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Netview Submit JCL

2018-05-16 Thread saurabh khandelwal
Hello Steve,

I understood the meaning of placeholder and will use it to over come this
issue

But I couldn't understand how to solve issue in rexx code

 also believe you will not get the expected results in FDIREXXO when
(re)assigning:
MTXT = DSET

Can you please explain this once.
I am really sorry for asking basic query and thank you so much for help


On Wed, May 16, 2018, 5:22 PM Steve Horein <steve.hor...@gmail.com> wrote:

> I'll repeat the previous response for this problem, but change 'END OF' to
> '
> USR54LST'
>
> You need to use placeholders described here to allow 'USR54LST' to be found
> anywhere in the message:
> https://www.ibm.com/support/knowledgecenter/SSZJDU_6.2.1/
> com.ibm.itnetviewforzos.doc_6.2.1/dqa_ata_place.htm
>
> Do you not have access to the documentation links?
> I will assist in pointing you in the right direction to accomplish your
> task.
> I will NOT write the code to do so.
>
> I also believe you will not get the expected results in FDIREXXO when
> (re)assigning:
> MTXT = DSET
>
> ...but that is part of learning.
>
>
>
>
> On Wed, May 16, 2018 at 12:13 AM, saurabh khandelwal <
> venkatkulkarn...@gmail.com> wrote:
>
> > Hello Steve,
> >
> > hanks for your response and guiding me on this. I use Netview forum
> before
> > but nobody responded. So, I assumed that its inactive now.
> >
> >
> >
> > Basically, I want to capture below message for testing from syslog
> >
> >
> >
> >
> --6+7+8+9+0+1+2+3-
> >
> > IEF403I USR54LST - STARTED - TIME=07.54.54
> >
> > 635022  OTHWLD   0 0 0 0
> >
> > IEF404I USR54LST - ENDED - TIME=07.55.23
> >
> > -USR54LST ENDED.  NAME- TOTAL TCB CPU TIME=  .04
> >
> >  TOTAL ELAPSED TIME=.4 SUBSYS=JES2
> >
> > $HASP395 USR54LST ENDED
> >
> >
> >
> > For this I coded automation table as below.
> >
> >
> >
> > IF MSGID = 'IEF403I' & TEXT = 'USR54LST'  & TEXT = MTXT THEN
> >
> > EXEC(CMD('FDIREXXO' MTXT)) NETLOG(Y) SYSLOG(Y);
> >
> >
> >
> > And in FDIREXXO rexx looks as below.
> >
> >
> >
> > /*  REXX */
> >
> >  TRACE I
> >
> >  ARG MTXT
> >
> >  PARSE VAR MTXT MSGID DSET
> >
> >  DSET = STRIP(DSET)
> >
> >  MTXT = DSET
> >
> >  SAY 'DATASET NAME IS' DSET
> >
> >  MVS "SEND '"MTXT"' USER(USR54) NOW"
> >
> >
> >
> > Basically I want to capture  “USR54LST - STARTED - TIME=07.54.54” string
> > and display to operator once we see MSGID = IEF403I  and TEXT =USR54LST
> in
> > syslog.
> >
> >
> >
> > But I don’t see any message related to this even in netview log
> (netloga) .
> > This indicate that we are unable to trap this message and nothing getting
> > displayed to operator.
> >
> >
> >
> > Can you please help me correcting this.
> >
> >
> > On Tue, May 15, 2018 at 4:17 AM, Steve Horein <steve.hor...@gmail.com>
> > wrote:
> >
> > >  First suggestion: Read and understand the documents found at the links
> > > provided earlier:
> > >
> > > Specifics to NetView Rexx can be found here:
> > > https://www.ibm.com/support/knowledgecenter/SSZJDU_6.2.1/
> > > com.ibm.itnetviewforzos.doc_6.2.1/dqgmst.htm
> > >
> > > Specifics to NetView Automation can be found here:
> > > https://www.ibm.com/support/knowledgecenter/SSZJDU_6.2.1/
> > > com.ibm.itnetviewforzos.doc_6.2.1/dqamst.htm
> > >
> > > Next suggestion, join the Tivoli NetView Yahoo group:
> > > https://groups.yahoo.com/neo/groups/NetView/info
> > >
> > > There is a complimentary System Automation Yahoo group as well (but SA
> > > hasn't entered the conversation):
> > > https://groups.yahoo.com/neo/groups/SAUsers/info
> > >
> > >
> > > Now, about your post...
> > >
> > > The Automation Table (AT) entry will likely not fire due to the second
> > > condition looking for literal text "END OF":
> > >
> > > IF MSGID = 'IEF878I'
> > > &  TEXT = 'END OF'
> > > &  TEXT = MTXT
> > > THEN
> > >   EXEC(CMD('FDIREXX' MTXT))
> > >   NETLOG(Y) SYSLOG(Y)
> > > ;
> > >
> > > The test as written is looking for the entirety of the TEXT value to be
> > > 'END OF' and nothing more.
> > > This is impossi

Re: Netview Submit JCL

2018-05-15 Thread saurabh khandelwal
GITEM counts the MSGID as word 0)
>
> I don't believe your final message to the user will be as expected either.
> After parsing MSGTXT to obtain DSET, you set the variable name MSGTX to the
> value of DSET, and (attempt) to pass that to the user.
>
> Due to the initial opening quote is double quote, everything inside is
> interpreted by Rexx as a literal, including the presumed variable 'MSGTX',
> until a closing double quote is encountered.
> To correct that, you need to place a double quote after the first single
> quote to expose the variable to Rexx, followed by a double quote to resume
> literal processing, followed by single quote and the remainder of the
> string:
>
> MVS "SEND '"MSGTX"' USER(OP117) NOW"
>
> (double, single, double,, double, single, double)
>
> However, since MSGTX was set to DSET, which was set to the literal
> following 'TO ' in the IEF878I  message, it is more than likely DSET will
> be a null value, which I believe will return a SEND syntax error should all
> the above be "corrected".
>
> I'll give you this one:
> To make FDIREXX more flexible relating to the target of the SEND command,
> PIPE EDIT can be used to extract the ID of the job "owner":
>
> 'PIPE EDIT AUTHUSER 1',
> '|VAR USERID'
>
> I encourage you to take the time and READ the documentation provided by the
> vendor. They provide it for a reason.
> You will undoubtedly encounter discrepancies between documentation and
> reality from time to time, but most vendors have support portals or
> feedback forms that you use to identify such discrepancies.
>
>
>
> On Mon, May 14, 2018 at 11:29 AM, saurabh khandelwal <
> venkatkulkarn...@gmail.com> wrote:
>
> > Hello Lucas,
> >
> > This code worked for me
> >
> > but I had to remove Address TSO from this rexx code to make it work .
> >
> > MVS  "SEND 'FD FILE HAS BEEN RECEIVED' USER(USR54) NOW"
> >
> > I am really thankful to you and other group member to help me to solve
> this
> > issue.
> >
> > Now, I setup my netview auto table
> >
> > IF MSGID = 'IEF878I' & TEXT = 'END OF' & TEXT = MTXT THEN
> > EXEC(CMD('FDIREXX' MTXT)) NETLOG(Y) SYSLOG(Y);
> > So, basically i am trying to trap the message like below from
> > IEF878I END OF IEF877E FOR OP117603 STEP1 GO DLMTOKEN
> >
> > full message Message is
> >
> >   ICH70001I OP117 LAST ACCESS AT 13:13:42 ON MONDAY, MAY 14, $HASP373
> > OP117603 STARTED - INIT A - CLASS A - SYS IEF403I OP117603 - STARTED -
> > TIME=13.18.16 IEF244I OP117603 STEP1 GO - UNABLE TO ALLOCATE 1 UNIT(S)
> 049
> > AT LEAST 1 OFFLINE UNIT(S) NEEDED. IEF877E OP117603 NEEDS 1 UNIT(S) 050
> FOR
> > STEP1 GO DLMTOKEN FOR VOLUME BFL603 OFFLINE 0FBF : IEF878I END OF IEF877E
> > FOR OP117603 STEP1 GO DLMTOKEN and now I am getting output in netview as
> > below 3:59:36 C BR NETLOGA 4:01:11 " IEF877E OP117603 NEEDS 1 UNIT(S)
> > 4:01:11 " FOR STEP1 GO DLMTOKEN 4:01:11 " FOR VOLUME BFL603 4:01:11 "
> > OFFLINE 4:01:11 " 0FBF 4:01:11 " : 4:01:11 E IEF878I END OF IEF877E FOR
> > OP117603 STEP1 GO DLMTOKEN But now, my aim is to display this whole
> message
> > to operator using send command upon getting msgid IEF878I and text  "END
> > OF"
> > Now, I coded rexx like below.
> >
> > ARG MSGTXT PARSE VAR MSGTXT MSGID 'TO 'DSET DSET = STRIP(DSET)
> > MSGTX = DSET
> > SAY 'DATASET NAME IS' DSET MVS "SEND 'MSGTX ' USER(OP117) NOW"
> > But I am unable to see this message on my tso screen after this event
> > trigger.
> >
> > Can anybody help.
> >
> > On Mon, May 14, 2018 at 11:11 AM, Lucas Rosalen <rosalen.lu...@gmail.com
> >
> > wrote:
> >
> > > Hi Venkat,
> > >
> > > Could you try with the following code?
> > >
> > > ==
> > > /* REXX */
> > >
> > >  SAY 'HELLO WORLD!'
> > >
> > >  "SEND 'FD FILE HAS BEEN RECEIVED' USER(USR54) NOW"
> > >
> > > EXIT
> > > ==
> > >
> > >
> > > 
> > > ---
> > > *Lucas Rosalen*
> > > rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
> > > http://br.linkedin.com/in/lrosalen
> > >
> > >
> > > 2018-05-14 9:28 GMT+02:00 Werner Kuehnel <werner.kueh...@mannheimer.de
> >:
> > &g

Re: Netview Submit JCL

2018-05-14 Thread saurabh khandelwal
Hello Lucas,

This code worked for me

but I had to remove Address TSO from this rexx code to make it work .

MVS  "SEND 'FD FILE HAS BEEN RECEIVED' USER(USR54) NOW"

I am really thankful to you and other group member to help me to solve this
issue.

Now, I setup my netview auto table

IF MSGID = 'IEF878I' & TEXT = 'END OF' & TEXT = MTXT THEN
EXEC(CMD('FDIREXX' MTXT)) NETLOG(Y) SYSLOG(Y);
So, basically i am trying to trap the message like below from
IEF878I END OF IEF877E FOR OP117603 STEP1 GO DLMTOKEN

full message Message is

  ICH70001I OP117 LAST ACCESS AT 13:13:42 ON MONDAY, MAY 14, $HASP373
OP117603 STARTED - INIT A - CLASS A - SYS IEF403I OP117603 - STARTED -
TIME=13.18.16 IEF244I OP117603 STEP1 GO - UNABLE TO ALLOCATE 1 UNIT(S) 049
AT LEAST 1 OFFLINE UNIT(S) NEEDED. IEF877E OP117603 NEEDS 1 UNIT(S) 050 FOR
STEP1 GO DLMTOKEN FOR VOLUME BFL603 OFFLINE 0FBF : IEF878I END OF IEF877E
FOR OP117603 STEP1 GO DLMTOKEN and now I am getting output in netview as
below 3:59:36 C BR NETLOGA 4:01:11 " IEF877E OP117603 NEEDS 1 UNIT(S)
4:01:11 " FOR STEP1 GO DLMTOKEN 4:01:11 " FOR VOLUME BFL603 4:01:11 "
OFFLINE 4:01:11 " 0FBF 4:01:11 " : 4:01:11 E IEF878I END OF IEF877E FOR
OP117603 STEP1 GO DLMTOKEN But now, my aim is to display this whole message
to operator using send command upon getting msgid IEF878I and text  "END OF"
Now, I coded rexx like below.

ARG MSGTXT PARSE VAR MSGTXT MSGID 'TO 'DSET DSET = STRIP(DSET)
MSGTX = DSET
SAY 'DATASET NAME IS' DSET MVS "SEND 'MSGTX ' USER(OP117) NOW"
But I am unable to see this message on my tso screen after this event
trigger.

Can anybody help.

On Mon, May 14, 2018 at 11:11 AM, Lucas Rosalen 
wrote:

> Hi Venkat,
>
> Could you try with the following code?
>
> ==
> /* REXX */
>
>  SAY 'HELLO WORLD!'
>
>  "SEND 'FD FILE HAS BEEN RECEIVED' USER(USR54) NOW"
>
> EXIT
> ==
>
>
> 
> ---
> *Lucas Rosalen*
> rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
> http://br.linkedin.com/in/lrosalen
>
>
> 2018-05-14 9:28 GMT+02:00 Werner Kuehnel :
>
> > Hello Venkat,
> > this is how it works at our site:
> >
> > /*/
> > /*  FUNCTION: submits job*/
> > /*/
> > 'SUBMIT NETV.CNM01.USER.CLIST(JCLMBR)'
> > EXIT
> >
> > Just one apostrophe at the beginning and one at the end. No ADDRESS TSO.
> > Member JCLMBR contains the JCL.
> >
> > Hth,
> > Werner
> >
> > -Ursprüngliche Nachricht-
> > Von: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Im
> > Auftrag von venkat kulkarni
> > Gesendet: Montag, 14. Mai 2018 06:27
> > An: IBM-MAIN@LISTSERV.UA.EDU
> > Betreff: Re: Netview Submit JCL
> >
> > Hello,
> >
> > This command didn't worked for me and getting same issue.
> >
> > On Sun, May 13, 2018, 11:21 PM Lucas Rosalen 
> > wrote:
> >
> > > Hi Venkat,
> > >
> > > What about using the syntax below?
> > >
> > > "MVS SEND 'your_message' USER(user) NOW"
> > >
> > >
> > >
> > > 
> > ---
> > > *Lucas Rosalen*
> > > rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
> > > http://br.linkedin.com/in/lrosalen
> > >
> > >
> > > 2018-05-13 20:50 GMT+02:00 Steve Horein :
> > >
> > > > And the man ate fish for a day
> > > >
> > > > On Sun, May 13, 2018 at 12:06 PM, venkat kulkarni <
> > > > venkatkulkarn...@gmail.com> wrote:
> > > >
> > > > > Hello Lucas,
> > > > >
> > > > > Your solution worked for me
> > > > >
> > > > > "SUBMIT 'USR1.REXX.CNTL(REXXJCL)'" .
> > > > >
> > > > > Now, I am trying to issue tso send command using this rexx  as
> below
> > > > using
> > > > > netview but i am getting below errror
> > > > >
> > > > >
> > > > > /*  REXX */
> > > > >
> > > > >  ADDRESS TSO
> > > > >
> > > > >  SAY 'HELLO WORLD!'
> > > > >
> > > > >  "SEND ''FD FILE HAS BEEN RECEIVED' USER(USR54) NOW'"
> > > > >
> > > > >
> > > > >
> > > > > Error
> > > > >
> > > > > EF404I USR54 LC - ENDED - TIME=14.29.07
> > > > >
> > > > > HELLO WORLD!
> > > > >
> > > > >  4 *-* "SEND ''FDI FILE HAS BEEN RECEIVED' USER( USR54 )
> > > > >
> > > > >+++ RC(-3) +++
> > > > >
> > > > >
> > > > >
> > > > > I am unable to find correct syntax for this. I didnt find anything
> in
> > > > > manual . Can you please help.
> > > > >
> > > > >
> > > > >
> > > > > On Sat, May 12, 2018 at 7:14 PM, Lucas Rosalen <
> > > rosalen.lu...@gmail.com>
> > > > > wrote:
> > > > >
> > > > > > Try changing FDIREXX script to the following:
> > > > > >
> > > > > > /* REXX */
> > > > > >
> > > > > > "SUBMIT 

Netview Login issue

2018-05-05 Thread saurabh khandelwal
Hello Group,

We recently installed netview but i am unable to login. Can you please help
in setting up vtam, so that i can login to netview.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SSL on tso

2017-04-05 Thread saurabh khandelwal
Hello ,

Thanks for suggestion. To avoid all mistakes, I freshly created key
database in mainframe and generated self signed certificate and then make
it trusted and set key default.

Then I downloaded using ASCII and renamed with .Cert and tried putting it
to PCOmm database and getting below error.

The validity period doesn't include today or does not fall within its
issuer's validity period.

But I also cross checked my certificate information on Mainframe and shows

Effective date : 2017/04/05
Expiration date : 2018/04/05

I am not sure why I am getting this issue .

Please suggest.

On 04-Apr-2017 11:53 PM, "Cieri, Anthony" <aci...@seic.com> wrote:

>
> It has been awhile since I tried this, but as I recall, there are
> a couple of task that needed to be done in the gskkyman utility
>
> 1)  Set your self signed certificate to TRUST status
> 2)  Make your self signed certificate the Default cert for the
> key database
> 3)  Create a database password file  (i.e. keytdatabase.sth)
>
> Hth
> Tony
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of saurabh khandelwal
> Sent: Tuesday, April 04, 2017 12:06 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: SSL on tso
>
> Hello group,
>
> Till now we completed below steps to enable sal for tso.
> 1) open port 992 firewall
> 2) using gskkyman utility, created database and self signed certificate
> for the user under which tn3270 address space running.
> 3)made additional entry of SSL port 992 in tn3270 profile with key
> database entry.
> 4) obey the new configuration .
> 5) downloaded certificate from mainframe to desktop in ASCII and renamed
> the file with extension of .cer
> 6) from pcom certificate managment utility, I created database and
> uploaded the same certificate which we just downloaded into correct path
> mentioned in the certificate managment utility.
> 7) tried enabling port 992 on pcom and enabled security and TLS option and
> use option to connect.
>
> But after doing all this I was getting error of "420". Which says remote
> client rejection..
>
> Can anybody help me to suggest if I an missing anything here to make this
> connectivity work.
>
> Thanks for help
>
> On 31-Mar-2017 1:33 AM, "Andrew Rowley" <and...@blackhillsoftware.com>
> wrote:
>
> On 31/03/2017 6:48 AM, Mark Pace wrote:
>
> > Also note that one of the hard parts of SSL with PCOMM is self-signed
> > certs.  You need to send a copy of the public key to each user of
> > PCOMM and import the certificate.  If you're using a better TN3270
> > client, like Vista TN3270, you won't have this problem.  At least that
> > what I remember when I wandered down that rabbit hole about 5 years ago.
> >
> The better way to do this is with a properly signed certificate. You can
> even get certificates free through Lets Encrypt (although that has its own
> controversies). The main problem is a severe lack of documentation on how
> to install a real certificate vs. creating your own CA and signing your own.
>
> I'm not sure that I would describe a client that doesn't have the problem
> as "better" since it means that the client is not defending itself against
> man-in-the-middle attacks (though I do use and like Vista myself).
>
> --
> Andrew Rowley
> Black Hill Software
> +61 413 302 386
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SSL on tso

2017-04-03 Thread saurabh khandelwal
Hello group,

Till now we completed below steps to enable sal for tso.
1) open port 992 firewall
2) using gskkyman utility, created database and self signed certificate for
the user under which tn3270 address space running.
3)made additional entry of SSL port 992 in tn3270 profile with key database
entry.
4) obey the new configuration .
5) downloaded certificate from mainframe to desktop in ASCII and renamed
the file with extension of .cer
6) from pcom certificate managment utility, I created database and uploaded
the same certificate which we just downloaded into correct path mentioned
in the certificate managment utility.
7) tried enabling port 992 on pcom and enabled security and TLS option and
use option to connect.

But after doing all this I was getting error of "420". Which says remote
client rejection..

Can anybody help me to suggest if I an missing anything here to make this
connectivity work.

Thanks for help

On 31-Mar-2017 1:33 AM, "Andrew Rowley" 
wrote:

On 31/03/2017 6:48 AM, Mark Pace wrote:

> Also note that one of the hard parts of SSL with PCOMM is self-signed
> certs.  You need to send a copy of the public key to each user of PCOMM and
> import the certificate.  If you're using a better TN3270 client, like Vista
> TN3270, you won't have this problem.  At least that what I remember when I
> wandered down that rabbit hole about 5 years ago.
>
The better way to do this is with a properly signed certificate. You can
even get certificates free through Lets Encrypt (although that has its own
controversies). The main problem is a severe lack of documentation on how
to install a real certificate vs. creating your own CA and signing your own.

I'm not sure that I would describe a client that doesn't have the problem
as "better" since it means that the client is not defending itself against
man-in-the-middle attacks (though I do use and like Vista myself).

-- 
Andrew Rowley
Black Hill Software
+61 413 302 386


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: SSL on tso

2017-03-21 Thread saurabh khandelwal
Yes, I m referring to IBM pcom . For secure two session we would like to
use 992 port.
I did google it for archived data but couldn't find steps to implement this
new change in the system




On 20-Mar-2017 3:17 PM, "Elardus Engelbrecht" <
elardus.engelbre...@sita.co.za> wrote:

saurabh khandelwal wrote:

>We have requirement to enable SSL for two access with ibm PCOOM emulator

Are you referring to IBM PCOM emulater? Just checking about your spelling.


>with port 992 for secure connection.

It depends on what your TCP/IP staff is using that port or any other port
for TSO logon.


>I tried looking at document and rebook but didn't find any implementation
steps.

Really? There are many books and discussion lists sitting worldwide about
this topic. Did you asked Mr. G. O. Ogle (Google) for it?


>Can anybody help to make this setup work.

Ask your TELNET server staff for assistance. Also ask your RACF staff for
assistance for setting up a Digital Certificate for TELNET server.

Just ensure you have a default TELNET non-SSL port in case you can't login
in the first place.

Good luck, this is a major project. (I and my colleagues have been there
and it was quite a journey, trust me.)

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


SSL on tso

2017-03-20 Thread saurabh khandelwal
Hello group,

We have requirement to enable SSL for two access with ibm PCOOM emulator
with port 992 for secure connection. I tried looking at document and rebook
but didn't find any implementation steps.

Can anybody help to make this setup work.

Regards
Saurabh

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: RES: SFTP on z/OS

2017-02-08 Thread saurabh khandelwal
But is there any way to resolve this issue without any third party product.

On Jan 31, 2017 3:33 PM, "Carlos Bodra - Pessoal" 
wrote:

> Check MDI product at luminex.com for fast and secure SFTP or FTP
>
> Carlos Bodra
> IBM System Certified System z
> São Paulo - Brazil
>
> -Mensagem original-
> De: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Em
> nome de venkat kulkarni
> Enviada em: domingo, 29 de janeiro de 2017 14:38
> Para: IBM-MAIN@LISTSERV.UA.EDU
> Assunto: SFTP on z/OS
>
> Hello Group,
>
>
>
> We tested SFTP on our test z/OS system to Test AIX box and we are able to
> transfer data between these host. But now, I am trying in production system
> with below detail.
>
>
>
> 1) Our aim is to convert all our FTP jobs into SFTP.
>
> 2) We are using $universe as scheduler for submitting these FTP jobs on
> time to time.
>
> 3) We using user called "STCSYS" all these jobs.
>
> 4) But in FTP jobs, for every other host ( Ex AIX1, AIX2,AIX3 etc) we are
> using different user id password to login to target host and then start FTP
> process.
>
> 5) But in SFTP, it create TSO env using IKJEFT01 program and then run SFTP
> commands to transfer files between systems.
>
>
>
> Example of SFTP Job, we using
>
>
>
>
>
> //SFTPSFT JOB (7330),MSGCLASS=X,MSGLEVEL=(1,1),CLASS=P,
>
> //  NOTIFY=
>
> //STEP1   EXEC PGM=IKJEFT01,REGION=0M
>
> //SYSEXEC  DD   DISP=SHR,DSN=SYS1.SBPXEXEC
>
> //SYSTSIN   DD DSN=SFTPSFT.TEST.JCL(FTPTST1),DISP=SHR
>
> //OUTPUT DD SYSOUT=*
>
> //SYSTSPRT DD SYSOUT=*
>
> /*
>
>
>
> EDIT   SFTPSFT.TEST.JCL(FTPTST1) - 01.02
>
> Command ===>
>
> ** * Top of Data 
>
> 000800 OPUT 'SFTPSFT.SFTP.TEST(SFTP1)'  '/u/SFTPSFT/vp12'
>
> 000900 OSHELL { echo 'lcd /u/stcsys' ; +
>
> 001000  echo 'ascii'; +
>
> 001100  echo 'cd /home/ftp4rpt/';  +
>
> 001200  echo 'mput test.txt'; } | +
>
> 001300sftp -v ftprpt@10.22.22.220
>
> 001400 /*
>
>
>
>
>
> So, now I have stcsys user id created on mainframe with all
>
>
>
> # cd .ssh
>
> # ls -al
>
> total 96
>
> drwx--   2 MEAS OMVSGRP 8192 Jan 24 08:23 .
>
> drwxr-xr-x   3 MEAS OMVSGRP 8192 Jan 24 08:22 ..
>
> -rw---   1 MEAS OMVSGRP  791 Jan 24 08:36 authorized_keys
>
> -rw---   1 MEAS OMVSGRP 1675 Jan 24 08:23 id_rsa
>
> -rw-r--r--   1 MEAS OMVSGRP  396 Jan 24 08:25 id_rsa.pub
>
> -rw-r--r--   1 MEAS OMVSGRP  697 Jan 29 10:26 known_hosts
>
> # pwd
>
> /u/stcsys/.ssh
>
>
>
>
> and in AIX1 side, I have ftprpt user defined and
>
>
>
> $ cd /home/ftprpt /.ssh
>
> $ ls -al
>
> total 48
>
> drwx--2 ftprpt staff   256 Jan 13 15:37 .
>
> drwxr-xr-x3 ftprpt staff  4096 Jan 15 12:15 ..
>
> -rw-r--r--1 ftprptstaff   791 Jan 15 12:12 authorized_keys
>
> -rw-r--r--1 ftprpt staff   395 Jan 13 15:37
> authorized_keys.old
>
> -rw---1 ftprpt staff  1675 Dec 11 14:25 id_rsa
>
> -rw-r--r--1 ftprpt staff   394 Dec 11 14:25 id_rsa.pub
>
> -rw-r--r--1 ftprpt staff   352 Jan 15 10:31 known_hosts
>
> $
>
>
>
>
>
>
>
> and we exchanged rsa.pub key in authorized_keys file and exchanged
> ECDSA.pub key in  known_hosts file but while running Job, I am getting
> below issue.
>
>
>
> OpenSSH_6.4, OpenSSL 1.0.1c 10 May 2012
>
>
> debug1: Reading configuration data /etc/ssh/ssh_config
>
>
> debug1: Reading configuration data /etc/ssh/zos_ssh_config
>
>
> debug1: zsshSmfSetConnSmfStatus: SMF status is 0
>
>
> debug1: Connecting to 10.22.22.220 Ý10.22.22.220¨ port 22.
>
>
> debug1: Connection established.
>
>
> debug1: cipher_init: none from source OpenSSL
>
>
> debug1: cipher_init: none from source OpenSSL
>
>
> debug1: permanently_set_uid: 0/1000
>
>
> debug1: identity file /u/stcsys/.ssh/id_rsa type 1
>
>
> debug1: identity file /u/stcsys/.ssh/id_rsa-cert type -1
>
>
> debug1: Enabling compatibility mode for protocol 2.0
>
>
> debug1: Local version string SSH-2.0-OpenSSH_6.4
>
>
> debug1: Remote protocol version 2.0, remote software version OpenSSH_6.0
>
>
> debug1: match: OpenSSH_6.0 pat OpenSSH*
>
>
> FOTS1061 key_read: uudecode E2VjZHNhLXNoYTItbmlzdHAyNTYIbm
> lzdHAyNTYAAAB
>
>  failed
>
>
> debug1: SSH2_MSG_KEXINIT sent
>
>
> debug1: SSH2_MSG_KEXINIT received
>
>
> debug1: mac_setup_by_alg: hmac-sha1 from source OpenSSL
>
>
> debug1: kex: server->client aes128-ctr hmac-sha1 none
>
>
> debug1: mac_setup_by_alg: hmac-sha1 from source OpenSSL
>
>
> debug1: kex: client->server aes128-ctr hmac-sha1 none
>
>
> debug1: SSH2_MSG_KEX_DH_GEX_REQUEST(1024<2048<8192) sent
>
>
> debug1: expecting SSH2_MSG_KEX_DH_GEX_GROUP
>
>
> debug1: SSH2_MSG_KEX_DH_GEX_INIT sent
>
>
> debug1: expecting SSH2_MSG_KEX_DH_GEX_REPLY
>
>
> debug1: Server host key: RSA ce:14:d1:2f:b2:d1:7c:83:12:9a:
> 16:1e:31:9d:b6:b7
>
>
> FOTS1061 key_read: uudecode E2VjZHNhLXNoYTItbmlzdHAyNTYIbm
> lzdHAyNTYAAAB
>
>  failed
>
>
> 

Address space

2016-11-14 Thread saurabh khandelwal
Hello group,
In our shop, In sdsf I can see many jobs running with owner and some of
them running without owner.

I am unable to find difference in this. Can anybody help me to understand
this process.

Regards

On Nov 14, 2016 20:02, "Farley, Peter x23353" 
wrote:

I went to the usual page that I start my z/OS publication research today,
and the link to the z/OS V2.1 page points instead to the V1.13 pages:

Bookmark is:

http://www.ibm.com/systems/z/os/zos/bkserv/

Starting page reached by that link is:

http://www-03.ibm.com/systems/z/os/zos/library/bkserv/index.html

z/OS V2.1 link under the heading "Search z/OS information in IBM Knowledge
Center:" points here:

https://www-01.ibm.com/support/knowledgecenter/
SSLTBW_1.13.0/com.ibm.zos.r13/en/Homepage.html

Can someone from IBM who monitors this list please get that link on the web
page fixed?

Peter


This message and any attachments are intended only for the use of the
addressee and may contain information that is privileged and confidential.
If the reader of the message is not the intended recipient or an authorized
representative of the intended recipient, you are hereby notified that any
dissemination of this communication is strictly prohibited. If you have
received this communication in error, please notify us immediately by
e-mail and delete the message and any attachments from your system.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS 2.1 toleration PTFs

2014-01-09 Thread saurabh khandelwal
http://www-01.ibm.com/support/docview.wss?uid=isg1OA36207


On Thu, Jan 9, 2014 at 4:47 PM, Richards, Robert B. robert.richa...@opm.gov
 wrote:

 Adding a link that provides this information:

 http://public.dhe.ibm.com/common/ssi/ecm/en/zsq03064usen/ZSQ03064USEN.PDF


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
 Behalf Of Richards, Robert B.
 Sent: Thursday, January 09, 2014 6:09 AM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: Re: z/OS 2.1 toleration PTFs

 Good catch! You are right!

 The OP must get off of any z/OS 1.11 systems first. Migrating it to 1.12
 would probably be the least painful.


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
 Behalf Of ITURIEL DO NASCIMENTO NETO
 Sent: Thursday, January 09, 2014 5:57 AM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: RES: z/OS 2.1 toleration PTFs

 Hi,

 I don't know if z/OS 1.11 can coexist in the same Sysplex with z/OS 2.1.


 Atenciosamente / Regards / Saludos

 Ituriel do Nascimento Neto
 BANCO BRADESCO S.A.
 4250 / DPCD Engenharia de Software
 Sistemas Operacionais Mainframes
 Tel: +55 11 3684-2177 R: 42177 3-1402
 Fax: +55 11 3684-4427



 Agora é BRA. BRA de Brasil. BRA de Bradesco.
 Patrocinador oficial dos Jogos Olímpicos e Paralímpicos Rio 2016.


 AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s)
 pessoa(s) a quem é dirigida, podendo conter informação confidencial e/ou
 legalmente privilegiada. Se você não for destinatário desta mensagem, desde
 já fica notificado de abster-se a divulgar, copiar, distribuir, examinar
 ou, de qualquer forma, utilizar a informação contida nesta mensagem, por
 ser ilegal. Caso você tenha recebido esta mensagem por engano, pedimos que
 nos retorne este E-Mail, promovendo, desde logo, a eliminação do seu
 conteúdo em sua base de dados, registros ou sistema de controle. Fica
 desprovida de eficácia e validade a mensagem que contiver vínculos
 obrigacionais, expedida por quem não detenha poderes de representação.
 LEGAL ADVICEbr...This message is exclusively destined for the people to
 whom it is directed, and it can bear private and/or legally exceptional
 information. If you are not addressee of this message, since now you are
 advised to not release, copy, distribute, check or, otherwise, use the
 information contained in this message, because it is illegal. If you
 received this message by mistake, we ask you to return this email, making
 possible, as soon as possible, the elimination of its contents of your
 database, registrations or controls system. The message that bears any
 mandatory links, issued by someone who has no representation powers, shall
 be null or void.

 --
 For IBM-MAIN subscribe / signoff / archive access instructions, send email
 to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

 --
 For IBM-MAIN subscribe / signoff / archive access instructions, send email
 to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
Thanks  Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS IPL Issue

2013-10-22 Thread saurabh khandelwal
Hello R.S. ,
 Yes, comment line was only issue for this problem. It
would be really great to see,if any tool can help on syntax checker for
parmlib member.

Regards
Saurabh



On Tue, Oct 22, 2013 at 11:53 AM, R.S. r.skoru...@bremultibank.com.plwrote:

 W dniu 2013-10-22 05:44, saurabh khandelwal pisze:

  Hello,
  Yes, I have specified CLPA in IEASYSxx . But as Radoslaw
 mentioned, I think comment line can not be part of LPALAT member  . So ,
 this could only be a issue.

  Excuse me: COULD BE???
 Haven't you tested it yet?
 That's really simple: IPL with the syntax error in LPALST, and IPL without
 the error.



 BTW: I wish I had a syntax checker tool for evey parmlib (and IPLPARM)
 member, at least for some subset of them. That of course won't preclude all
 the mistakes - one can still put wrong libriaries or omit needed ones, etc.
 etc. But the syntax would be fine then.


 --
 Radoslaw Skorupka
 Lodz, Poland






 --
 Tre   tej wiadomo ci mo e zawiera  informacje prawnie chronione Banku
 przeznaczone wy  cznie do u ytku s u bowego adresata. Odbiorc  mo e by
  jedynie jej adresat z wy  czeniem dost pu osób trzecich. Je eli nie jeste
  adresatem niniejszej wiadomo ci lub pracownikiem upowa nionym do jej
 przekazania adresatowi, informujemy,  e jej rozpowszechnianie, kopiowanie,
 rozprowadzanie lub inne dzia anie o podobnym charakterze jest prawnie
 zabronione i mo e by  karalne. Je eli otrzyma e  t  wiadomo   omy kowo,
 prosimy niezw ocznie zawiadomi  nadawc  wysy aj c odpowied  oraz trwale
 usun   t  wiadomo   w  czaj c w to wszelkie jej kopie wydrukowane lub
 zapisane na dysku.

 This e-mail may contain legally privileged information of the Bank and is
 intended solely for business use of the addressee. This e-mail may only be
 received by the addressee and may not be disclosed to any third parties. If
 you are not the intended addressee of this e-mail or the employee
 authorised to forward it to the addressee, be advised that any
 dissemination, copying, distribution or any other similar activity is
 legally prohibited and may be punishable. If you received this e-mail by
 mistake please advise the sender immediately by using the reply facility in
 your e-mail software and delete permanently this e-mail including any
 copies of it either printed or saved to hard drive.
 BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00,
 fax +48 (22) 829 00 33, www.brebank.pl, e-mail: i...@brebank.pl
 S d Rejonowy dla m. st. Warszawy XII Wydzia  Gospodarczy Krajowego
 Rejestru S dowego, nr rejestru przedsi biorców KRS 025237, NIP:
 526-021-50-88. Wed ug stanu na dzie  01.01.2013 r. kapita  zak adowy BRE
 Banku SA (w ca o ci wp acony) wynosi 168.555.904 z otych.


 --**--**--
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
Thanks  Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS IPL Issue

2013-10-21 Thread saurabh khandelwal
Hello,
   In my LPALST member, while adding dataset for CICS 5.1 , rather
then removing entry for older CICS 4.2, I simply commented CICS 4.2 dataset
line like below.

/* SYS1.CICS41.SDFHLPA,


And added CICS 5.1 dataset SYS1.CICS51.SDFHLPA. I think, this is only
reason for this 064 wait code.  But at last problem resolved. Thanks for
all help.

Regards
Saurabh


On Sun, Oct 20, 2013 at 6:30 PM, Peter Relson rel...@us.ibm.com wrote:

 Problem has been resolved. The issue was with
 syntax issue in LPALST parmlib member .

 Can you please explain exactly what the issue was? A syntax error in
 LPALST will not ordinarily result in a program check WAIT 064 unless it
 meant that your LPALST did not have a data set that the system requires
 during IPL.

 Peter Relson
 z/OS Core Technology Design

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
Thanks  Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS IPL Issue

2013-10-21 Thread saurabh khandelwal
Hello,
Yes, I have specified CLPA in IEASYSxx . But as Radoslaw
mentioned, I think comment line can not be part of LPALAT member  . So ,
this could only be a issue.


Regards
Saurabh


On Mon, Oct 21, 2013 at 4:24 PM, Roger Steyn roger.st...@yahoo.com wrote:

 Hello,

 Was CLPA specified in IEASYSxx when you IPL'd first time ? .If not , that
 could lead to a wait 064

 If not , I am wondering how you got a wait 064 for syntax error in
 LPALSTxx .





 On Monday, October 21, 2013 3:25 PM, saurabh khandelwal 
 sourabhkhandelwal...@gmail.com wrote:

 Hello,
In my LPALST member, while adding dataset for CICS 5.1 , rather
 then removing entry for older CICS 4.2, I simply commented CICS 4.2 dataset
 line like below.

 /* SYS1.CICS41.SDFHLPA,


 And added CICS 5.1 dataset SYS1.CICS51.SDFHLPA. I think, this is only
 reason for this 064 wait code.  But at last problem resolved. Thanks for
 all help.

 Regards
 Saurabh


 On Sun, Oct 20, 2013 at 6:30 PM, Peter Relson rel...@us.ibm.com wrote:

  Problem has been resolved. The issue was with
  syntax issue in LPALST parmlib member .
 
  Can you please explain exactly what the issue was? A syntax error in
  LPALST will not ordinarily result in a program check WAIT 064 unless it
  meant that your LPALST did not have a data set that the system requires
  during IPL.
 
  Peter Relson
  z/OS Core Technology Design
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
 



 --
 Thanks  Regards
 Saurabh Khandelwal


 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
Thanks  Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS IPL Issue

2013-10-19 Thread saurabh khandelwal
Hello All,
  Problem has been resolved. The issue was with syntax issue in
LPALST parmlib member . I corrected that syntax and re IPL'd system again.

Thanks for all help.

Regards
Saurabh


On Sat, Oct 19, 2013 at 5:21 PM, Doug Henry doug_he...@usbank.com wrote:

 On Fri, 18 Oct 2013 23:38:27 -0700, Ed Jaffe edja...@phoenixsoftware.com
 wrote:

 On 10/18/2013 10:53 PM, saurabh khandelwal wrote:
  Does it mean that operating  system is able to load successfully in the
  initial level but after that because of memory its crashing.
 
 Yes. SAD is your friend...
 
 One thing you can look at before the SAD is do you specify a nuclst. In
 ours we have a Cics Module (we are CICS 4.2) for
 DFHHPSVC meaning that we have to find that CICS module in SYS1.NUCLEUS.

 Maybe this has changed for CICS 5.1 ?

 Doug


 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
Thanks  Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


z/OS IPL Issue

2013-10-18 Thread saurabh khandelwal
Hello Group,
   We are running z/OS 1.13 system and I installed CICS T/S
5.1 . So before starting first time CICS, I was ipling my z/OS system to
take all new changes.

But while loading LPAR from HMC, I get success message on load screen but I
don't see anything in operating system message screen . When I tried
checking Hardware message, I have got below PSW code
there 000280009064.

I am not getting any clue to solve this issue. Kindly advise .

-- 
Thanks  Regards
Saurabh

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS IPL Issue

2013-10-18 Thread saurabh khandelwal
Hello,
 I had checked for this IEA304W  this message but, I couldn't find
it . The message I am getting on HMC hardware message is
Central processor (CP) 0 is in a nonrestartable stopped state due to a
System Control Program (SCP) initiated reset of the I/O interface for
partition PROD01. The disabled wait program status word (PSW) is
000280009064.

When I am trying to load LPAR, I am getting success message but after that
I don't get to see anything on operating system message scree and LPAR
color become RED.

Does it mean that operating  system is able to load successfully in the
initial level but after that because of memory its crashing.

I don't have INITSQA entry in my LOADXX member but in IEASYS member we have
specified SQA=(1792K,50M)..

Do I need to make INITSQA  entry in LOADXX member to solve this issue, If
yes, then how much I need to specify.

Please suggest.

Regards
Saurabh


On Sat, Oct 19, 2013 at 11:15 AM, Ed Jaffe edja...@phoenixsoftware.comwrote:

 On 10/18/2013 10:15 PM, saurabh khandelwal wrote:

 But while loading LPAR from HMC, I get success message on load screen but
 I
 don't see anything in operating system message screen . When I tried
 checking Hardware message, I have got below PSW code
 there 0002800090**64.

 I am not getting any clue to solve this issue. Kindly advise .


 z/OS MVS System Codes
 A program check occurred. Accompanying message IEA304W further
 explains this wait state and entry code. If the message does not
 appear on the console, you can find the message in the wait state
 message area (WSMA).
 /z/OS MVS System Codes

 --
 Edward E Jaffe
 Phoenix Software International, Inc
 831 Parkview Drive North
 El Segundo, CA 90245
 http://www.phoenixsoftware.**com/ http://www.phoenixsoftware.com/

 --**--**--
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
Thanks  Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


  1   2   >