ISFCALLS failing to populate token. stem! Suddenly!



IBM's Command List programming language & Restructured Extended Executor

ISFCALLS failing to populate token. stem! Suddenly!

Postby Steve Coalbran » Mon Oct 15, 2018 5:25 pm

I was using ISFCALLS within a batch ISPF/REXX procedure.
It was working quite happily until recently when it started to not populate the token. stem!
Despite giving a return code of 0.
I would have expected this to be caused only by:
RC Description
01 Host command environment query failed, environment not added
02 Host command environment add failed
TRACE output...
  199 *-*    token. = 0                                  
       >>>      "0"                                      
   200 *-*    RC = ISFCALLS("ON")                        
       >>>      "0"                                      
   201 *-*    SAY "RC="RC                                
       >>>      "RC=0"                                    
RC=0                                                      
   202 *-*    DO t = 0 TO token.0                        
       >>>      "0"                                      
       >>>      "0"                                      
   203 *-*     SAY token.t                                
       >>>       "0"                                      
0                                                        
   204 *-*    END                                        
   202 *-*    DO t = 0 TO token.0                        
   205 *-*    IF( token.0>0 )                            
       >>>      "0"                                      
   294 *-*    ELSE                                        
   295 *-*     CALL ABEXIT 8,"NO TOKENS SET BY ISFCALLS."
       >>>       "8"                                      
       >>>       "NO TOKENS SET BY ISFCALLS."            
   484 *-*      ABEXIT:                                  
       *-*      PROCEDURE                                
       *-*      TRACE "O"                                
NO TOKENS SET BY ISFCALLS.                                
ISPD117                                                  
The initially invoked CLIST ended with a return code = 8                        
******************************** BOTTOM OF DATA ********************************


All suggestions why this should suddenly happen would be welcome! ;)
Steve
User avatar
Steve Coalbran
 
Posts: 138
Joined: Wed Apr 06, 2011 11:49 am
Location: Stockholm, Sweden
Has thanked: 13 times
Been thanked: 1 time

Re: ISFCALLS failing to populate token. stem! Suddenly!

Postby enrico-sorichetti » Mon Oct 15, 2018 8:03 pm

nowhere in the docs is told that ISFCALLS should populate something

quoting the manual
Using SDSF with REXX requires that you add a host command environment prior to any other SDSF host environment commands. The host command environment is what allows you to use Address SDSF on the ISFEXEC and ISFACT commands. You add the host command environment with the ISFCALLS() function.

nothing will passed back apart the return code
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2965
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 160 times

Re: ISFCALLS failing to populate token. stem! Suddenly!

Postby Steve Coalbran » Mon Oct 15, 2018 8:55 pm

Yes. But ISFCALLS() should create the token. stem.
It certainly used to. I listed it in previous executions, it produced 2060 separate tokens.
The token.1 is used toass to an ISFACT...
ADDRESS SDSF "ISFACT ST TOKEN('"token.1"') PARM(NP XDC) "

I realize I had the statement in the wrong order!
The ISFCALLS should be followed by a ISFEXEC! It is this that sets the token. stem.
However now when I issue the ISFACT...
SDSF OUTPUT DISPLAY PFTPJOBF JOB09992  DSID   103 LINE 209     COLUMNS 02- 81  
 COMMAND INPUT ===>                                            SCROLL ===> CSR  
   218 *-*      CALL ISF 00,"ISFACT ST TOKEN('"token.1"') PARM(NP XDC) "        
       >>>        "00"                                                          
       >>>        "ISFACT ST TOKEN('3T0VNDMqE5KVd/f3c/PxQO1z9+PP89xA3M1qA7omBLcn
CJgQABAU3GZE3NxURNivOJYk=') PARM(NP XDC) "                                      
   373 *-*       ISF:                                                          
   374 *-*       /*-------------------------------------------------------------
   375 *-*       /* initialize and accept arguments                            
   376 *-*       /*-------------------------------------------------------------
   377 *-*       __tv = TRACE("C")                                              
   446 *-*        ADDRESS SDSF __cmd                                            
       >>>          "ISFACT ST TOKEN('3T0VNDMqE5KVd/f3c/PxQO1z9+PP89xA3M1qA7omBL
iaCJgQABAU3GZE3NxURNivOJYk=') PARM(NP XDC) "                                    
       +++ RC(8) +++                                                            
                                                                               
COMMAND: ISFACT ST TOKEN('3T0VNDMqE5KVd/f3c/PxQO1z9+PP89xA3M1qA7omBLcnAwQCt2PwTh
ZE3NxURNivOJYk=') PARM(NP XDC)                                                  
ENDED RC=8                                                                      
ISPD117                                                                        
The initially invoked CLIST ended with a return code = 8                        
******************************** BOTTOM OF DATA ********************************
Steve
User avatar
Steve Coalbran
 
Posts: 138
Joined: Wed Apr 06, 2011 11:49 am
Location: Stockholm, Sweden
Has thanked: 13 times
Been thanked: 1 time

Re: ISFCALLS failing to populate token. stem! Suddenly!

Postby enrico-sorichetti » Mon Oct 15, 2018 9:25 pm

lets close the topic the IBM way ... USER ERROR :ugeek:
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2965
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 160 times

Re: ISFCALLS failing to populate token. stem! Suddenly!

Postby Steve Coalbran » Tue Oct 16, 2018 10:00 am

enrico-sorichetti wrote:lets close the topic the IBM way ... USER ERROR :ugeek:

The first certainly was.
However I still don't understand the RC(8) on the ISFACT call.
The exact same logic has worked before.
Steve
User avatar
Steve Coalbran
 
Posts: 138
Joined: Wed Apr 06, 2011 11:49 am
Location: Stockholm, Sweden
Has thanked: 13 times
Been thanked: 1 time

Re: ISFCALLS failing to populate token. stem! Suddenly!

Postby enrico-sorichetti » Tue Oct 16, 2018 12:17 pm

nope ... the whole topic should be closed for that reason ...

the manual is clear

After the ISFACT host environment command completes, a return code is set in the REXX variable RC. The values are:

00
The request completed successfully.
04
The request completed successfully but not all functions were performed.
08
An incorrect or invalid parameter was specified for an option or command.
12
A syntax error occurred in parsing a host environment command.
16
The user is not authorized to invoke SDSF.
20
A request failed due to an environmental error.
24
Insufficient storage was available to complete a request.
Note that a return code of 0 indicates that SDSF successfully processed the ISFACT command. It does not indicate that specific functions were authorized or that commands were executed.
Check the ISFMSG and ISFMSG2 variables to determine if a request completed. See Messages for more information.
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2965
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 160 times

Re: ISFCALLS failing to populate token. stem! Suddenly!

Postby Steve Coalbran » Sat Oct 20, 2018 12:26 pm

OK, just one parting shot.
I did study the manual closely several times.
In fact I generally, right from the '70s, read the whole manual before I start and refer to it frequently.
I also looked up the error messages received and the function ISF sets the default message for any return code and uses that if ISFMSG is blank (as it was). :(

I should get myself an RTFM T-shirt actually, not a bad idea?!

This is also exactly the same syntax I have used before which has worked.

But I will consider the topic...
Closed
(the forum should perhaps consider adding a button/function for the 'poster' to [Close] a post? ;))
Steve
User avatar
Steve Coalbran
 
Posts: 138
Joined: Wed Apr 06, 2011 11:49 am
Location: Stockholm, Sweden
Has thanked: 13 times
Been thanked: 1 time

Re: ISFCALLS failing to populate token. stem! Suddenly!

Postby Terry Heinze » Mon Oct 22, 2018 7:55 pm

(the forum should perhaps consider adding a button/function for the 'poster' to [Close] a post? ;))

Closing a post would deprive others who are looking for an answer similar to ones already posted.
.... Terry
Terry Heinze
 
Posts: 236
Joined: Wed Dec 04, 2013 11:08 pm
Location: Richfield, MN, USA
Has thanked: 11 times
Been thanked: 11 times

Re: ISFCALLS failing to populate token. stem! Suddenly!

Postby enrico-sorichetti » Mon Oct 22, 2018 8:54 pm

Closing a post would deprive others who are looking for an answer similar to ones already posted.

NOPE ... the topic would still be visible,
the closest equivalent would be locking the topic, it would prevent further posts.
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort

These users thanked the author enrico-sorichetti for the post:
Terry Heinze (Tue Oct 23, 2018 12:12 am)
enrico-sorichetti
Global moderator
 
Posts: 2965
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 160 times


Return to CLIST & REXX

 


  • Related topics
    Replies
    Views
    Last post