Add copybook element receives ISPS118S message and abend C1X0011S CODE=S66D

Products

• Endevor

Issue/Introduction

When add copybook element in foreground, the following error is displayed:

ISPS118S SERVICE NOT INVOKED. A VALID ISPF ENVIRONMENT DOES NOT EXIST

Also the user found the message C1X0011S for a FILEMGR abend S66D when add the element using Endevor ISPF panel i.e.

16:50:41  C1X0012I  STEP COPY INVOKING PROGRAM FILEMGR
16:50:41  C1X0011S  STEP COPY PROGRAM FILEMGR ABENDED, CODE=S66D
16:50:41  C1G0129E  STEP COPY RC (S66D) EXCEEDS THE MAX RC (0004) FOR THE PROCESSOR STEP


The processor runs successfully under batch mode processing and the batch mode job log shows a processor that invokes IBM File Manager with the DSC (dataset copy) function:
*****
                     C1G0249I  //*******************************************************************   00005700                      
                     C1G0249I  //*    COPY THE MEMBER TO ENDEVOR OUTPUT LIB                            00010000                      
                     C1G0249I  //*******************************************************************   00005700                      
                     C1G0249I  //COPY     EXEC PGM=FILEMGR,MAXRC=4                                     00810000                      
                     C1G0249I  //STEPLIB  DD DISP=SHR,DSN=SYS1.FM.SFMNMOD1                             00820000                      
                     C1G0249I  //SYSPRINT DD DSN=&&FALIST,DISP=(OLD,PASS)                              00260018                      
                     C1G0249I  //DD01     DD DSN=&&ELMOUT,DISP=(OLD,PASS)                                                            
                     C1G0249I  //DD01O    DD DSN=&OUTLIB(&OUTMEM),DISP=SHR,                            00295018                      
                     C1G0249I  //            MONITOR=COMPONENTS,FOOTPRNT=CREATE                        00295018                      
                     C1G0249I  //SYSIN    DD *                                                         00331018                      
                     C1G0249I  $$FILEM DSC INPUT=DD01,OUTPUT=DD01O                                                                   
                     C1G0249I  //*                                                                     00879001           
*****

Cause

Message ISPS118S means that:

• A program running in TCB A has requested an ISPF service by calling the ISPLINK interface.
  
  
• TCB A is not the ISPTASK TCB (each ISPF screen runs on its own ISPTASK TCB).
  
  
• An ancestor of TCB A is indeed the ISPTASK TCB, but TCB A has not been created by the SELECT CMD service.
  
  
• Note: if none of the ancestors of TCB A were the ISPTASK TCB, then the message would be ISPS118L instead.

This will always happen if a program executed by a processor tries to call an ISPF service because the program runs in its own TCB which is not the ISPTASK TCB and is not known to ISPF (as it has been attached by Endevor without using the SELECT CMD service).

Resolution

The IBM File Manager for z/OS® User's Guide and Reference Version 16.1.0 explains that File Manager is an ISPF application which may also be executed outside ISPF (for example in a batch job). The File Manager 'functions' (DSC among them) can be invoked from either the panels or a batch job.

Chapter 13 "Introduction to programming with File Manager" describes 'pseudo batch' execution mode '/BATCH' to execute File Manager functions. This mode forces batch type processing even though running within a TSO/ISPF session.
This mode should prevent File Manager from using any TSO or ISPF services so it should potentially clear the reported errors.
Therefore to try to allow the processor to run in foreground coding the processor like this may be successful
//COPY     EXEC PGM=FILEMGR,PARM='/BATCH',MAXRC=4