Then you are invoking it as a command processor, so AUTHCMD is the relevant 
list in IKJTSOxx.  I would suggest using TSO's PARMLIB DISPLAY command
to verify that the AUTHCMD list includes your program.

  Beyond that, I would use SLIP SET,A=SVCD,C=047,ML=1,ID=D047,END
to obtain an SVC Dump of the 047 abend, and use IPCS SUMMARY FORMAT CURRENT 
EX(GL)    
to see the information formatted from the CDE to verify that the program is 
AC(1).  And look at the DEB for STEPLIB 
to verify that the DEBAPFIN bit is on.  If all of those things check out, look 
at TCBJLB in the TCBs below Started Task Control to see if you 
have somehow established an unauthorized TASKLIB for one of them, perhaps by 
using the TSOLIB command, or the old STEBLIB Field Developed Program,
or some other vendor product or tool from the CBT tape..

Jim Mulder       

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Joseph Reichman
Sent: Sunday, June 29, 2025 11:26 PM
To: [email protected]
Subject: Re: APF authorized TSO programs

I type it in at the tso ready prompt and hit enter Thanks

Get Outlook for iOS<https://aka.ms/o0ukef> ________________________________
From: IBM Mainframe Discussion List <[email protected]> on behalf of 
James Mulder <[email protected]>
Sent: Sunday, June 29, 2025 11:23:53 PM
To: [email protected] <[email protected]>
Subject: Re: APF authorized TSO programs

  What method are you using to initiate giving control to your program?

Jim Mulder

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Joseph Reichman
Sent: Sunday, June 29, 2025 9:30 PM
To: [email protected]
Subject: Re: APF authorized TSO programs

JUST CHECKED YES



                             Data Set Information Command ===>

Data Set Name  . . . : SYS1.CBT.LINKLIB

General Data                          Current Allocation
 Volume serial . . . : B3SYS1          Allocated cylinders : 180
 Device type . . . . : 3390            Allocated extents . : 1
 Organization  . . . : PO              Maximum dir. blocks : 899
 Record format . . . : U
 Record length . . . : 4
 Block size  . . . . : 27998          Current Utilization
 1st extent cylinders: 180             Used cylinders  . . : 163
 Secondary cylinders : 25              Used extents  . . . : 1
 Data set encryption : NO              Used dir. blocks  . : 459
                                       Number of members . : 2,791

                                      Dates
                                       Creation date . . . : 2024/11/15
                                       Referenced date . . : 2025/06/29
                                       Expiration date . . : ***None***

And by the way the ac = 1

BROWSE    SYS1.CBT.LINKLIB                              Row 0001554 of 0002791
Command ===>                                                  Scroll ===> PAGE
   Name     Prompt         Alias-of      Size       TTR      AC    AM     RM
. ISJR                                 000008F0    098A07    01     31    ANY

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Tony Harminc
Sent: Sunday, June 29, 2025 9:17 PM
To: [email protected]
Subject: Re: APF authorized TSO programs

On Sun, 29 Jun 2025 at 18:48, Joseph Reichman < 
[email protected]> wrote:

> Okay I will post all relevant information
>

Thank you!
[...]

> //STEPLIB  DD  DISP=SHR,DSN=SYS1.CBT.LINKLIB                  <--------
> the library
>
[...]

>                             APF Authorized Libraries
>
>          Data_set_name                                Volume  (Dynamic)
>    [...]
>         SYS1.CBT.LINKLIB                             B3SYS1         <----
> the library apf authorized
>

Are you sure the cataloged  SYS1.CBT.LINKLIB is on B3SYS1 ?

Tony H.

----------------------------------------------------------------------
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

----------------------------------------------------------------------
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

Reply via email to