Use of Telon Modules ADLAATX, ADRASTG*

Products

• Telon Application Generator

Issue/Introduction

Please advise if these modules need to be included or  copied from release 4.1 to 5.1, and how they are used as in what is their purpose?

ADRASTG*  and   ADLAATX

 

Environment

Telon Application Generator - Release : 5.1

Resolution

Here is the information, starting with ADRASTG*:

Name     Prompt        Alias-of
_________ ADRASTG            
_________ ADRASTG1                ADRASTG 
_________ ADRASTG2                ADRASTG
CAWLSRC(ADRASTG)
CAWLSRC(ADLAATR)

So, ADRASTG has these aliases: ADRASTG1 and ADRASTG2.

The source contains the following descriptions/information:

THIS ROUTINE HAS TWO ENTRY POINTS TO PERFORM TWO SEPARATE 
FUNCTIONS REQUIRED FOR AUTOMATIC STORAGE IN THE COBOL GENERATOR. 
ENTRY 1:  ADRASTG1 - RECEIVES THE ADDRESS OF THE BEGINNING OF     
                       A COBOL DATA ITEM AND THE END OF A COBOL     
                       DATA ITEM AND RETURNS THE LENGTH OF THE     
                       DATA ITEM.                                                                                                    

ENTRY 2:  ADRASTG2 - RECEIVES THE LENGTH AND ADDRESS OF THE       
                       COMMAREA PASSED TO A COBOL PROGRAM AND MOVES
                       THE COMMAREA TO A SECOND AREA PASSED.        

ADLAATX is definitely for abnormal termination 3 for CICS abend handling and is an alias as well:

Name             Alias-of
ADLAATI       ADLAATR
ADLAATR           
ADLAATX      ADLAATR
ADLAAT0      ADLAATR
ADLAAT1      ADLAATR
ADLAAT2      ADLAATR

This is for 31-bit abnormal termination processing.

THIS PROGRAM HAS BEEN WRITTEN TO BE REENTRANT TO SATISFY COBOL II 
      REENTRANCY REQUIREMENTS.                                          

   TO RELINK THIS MODULE, USE THE FOLLOWING LINK CARDS: 
      MODE AMODE(31),RMODE(ANY)                                     
      ENTRY ADLAATR                                                  
      ALIAS ADLAATI,ADLAATX,ADLAAT0,ADLAAT1,ADLAAT2                
      NAME  ADLAATR(R)                                               

   AND THE FOLLOWING LINK PARMS:       
      NCAL,RENT,REUS,AMODE=31,RMODE=ANY                            

Please note:
It is not recommended to take 4.1 modules into release 5.1.  These modules are delivered with your 5.1 libraries and are not to be customized or modified.