Try it as EXEC PGM= in JCL.

On Mon, 30 Jun 2025 03:25:41 +0000 Joseph Reichman
<[email protected]> wrote:

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

--
Binyamin Dissen <[email protected]>
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to