I did set it to zero Sent from my iPhone
> On Jun 24, 2014, at 1:51 PM, Micheal Butz <[email protected]> wrote: > > The first explanation fits my scenario > My program is in the AUTHPGM section of IKJTSOxx > > the command profile nowtpmsg > Is unauthorized command but so > What does that mean because my > Program is in the authcmd/PGM > I cann't invoke a command that's not authorized > > > Sent from my iPhone > >> On Jun 24, 2014, at 11:42 AM, Binyamin Dissen <[email protected]> >> wrote: >> >> Look at the manual: >> >> 60(3C) One of the following occurred: >> v An authorized program or command requested that an unauthorized >> function be invoked. >> v An authorized program or command invoked the TSO/E service >> facility, but indicated that the requested function be invoked from an >> unauthorized environment. An authorized program must set the >> internal processing options flag (byte two of parameter one) to zero. >> >> On Tue, 24 Jun 2014 11:27:39 -0400 MichealButz <[email protected]> >> wrote: >> >> :>Hi, >> :> >> :> >> :> >> :>I know I get beat up for not doing my leg work but I researched this as >> best >> :>I could >> :> >> :> >> :> >> :>I am trying to invoke a “PROFILE NOWTPMSG” >> :> >> :> >> :> >> :>And keep on getting a X’3C’ in the reason code parameter register 15 has a >> :>X’14’ the return code parameter is -1 X’FFFFFFFF’ >> :> >> :> >> :> >> :>The following is my parameter list >> :> >> :> >> :> >> :>FLAGS DS 0F FULLWORD OF FLAGS >> :> >> :>RESFLAGS DC H'0000' ESTABLISH AUTHOIZED >> :> >> :>ABFLAGS DC X'00' PRODUCE A DUMP IF F >> :> >> :>FNCFLAGS DC X'05' INVOKE A TSO/E CMD, >> :> >> :>CMDBUF DC C'PROFILE NOWTPMSG' COMMAND BUFFER >> :> >> :>BUFLEN DC A(L'CMDBUF) LENGTH OF COMMAND BUF >> :> >> :>RETCOD DS F FUNCTION RETURN CODE >> :> >> :>RSNCOD DS F FUNCTION REASON CODE >> :> >> :>ABNCODE DS F FUNCTION ABEND CODE >> :> >> :> >> :> >> :>Here is my call >> :> >> :> >> :> >> :> L R15,CVTPTR >> :> >> :> L R15,CVTTV(,R15) >> :> >> :> L R15,TSVTASF-TSVT(,R15) >> :> >> :> CALL (15),(FLAGS,CMDBUF,BUFLEN,RETCOD,RSNCOD,ABNCODE),VL >> :> >> :>* >> :> >> :> 3C reason code says the following >> :> >> :> >> :> >> :> One of the following occurred: >> >> :> >> :> ° An authorized program or command requested that an >> :>unauthorized function be invoked. >> :> >> :> ° An authorized program or command invoked the TSO/E >> :>service facility, but indicated that the requested function be >> :>invoked from an unauthorized environment. >> :> >> :> An authorized program must set the internal >> :>processing options flag (byte two of parameter one) to zero. >> :> >> :> >> :> >> :>Thanks >> >> :> >> :> >> :>---------------------------------------------------------------------- >> :>For IBM-MAIN subscribe / signoff / archive access instructions, >> :>send email to [email protected] with the message: INFO IBM-MAIN >> >> -- >> Binyamin Dissen <[email protected]> >> http://www.dissensoftware.com >> >> Director, Dissen Software, Bar & Grill - Israel >> >> >> Should you use the mailblocks package and expect a response from me, >> you should preauthorize the dissensoftware.com domain. >> >> I very rarely bother responding to challenge/response systems, >> especially those from irresponsible companies. >> >> ---------------------------------------------------------------------- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to [email protected] with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
