Example ACL to do a 'D STOR' command and write the results to the TPX log

Products

• TPX - Session Management

Issue/Introduction

When the D STOR or D STORXA command is issued from TPXOPER, this is not written to the TPXLOG.

Is there a way to get this information written to the log?

 

 

Environment

Release : 5.4

Resolution

Here is a sample ACL to issue a ' D STOR' and write the results to the TPX LOG. This would be stored in an ACLLIB that

is part of the TPX proc. For example purposes the member is called ACLSTOR.

*********************************************************************
* ACLPGM TO ISSUE A D STOR COMMAND TO DISPLAY BELOW 16MB STORAGE    *
* AND PLACE THE OUTPUT INTO THE TPX LOG                             *
*
*********************************************************************
       OPTION    FLOW,OFF  *** DEBUG **                              
       OPTION    TERM,ON   *** DEBUG **                              
*                                                                    
START  KEY 'D STOR'                                                  
       WAIT 2                                                        
PRT    COMMAND 'P TPXOPER LOG'                                       
       SEARCH 'BOTTOM OF DATA'                                       
       BRANCH EQ,LASTPAGE                                            
       PF 8                                                          
       BRANCH ANY,PRT                                                
LASTPAGE STOP        

--------------------------

To invoke the ACL, from TPXOPER issue:

<cmd char>S Aclpgm <cmd key>

/S ACLSTOR <PF12>