Getting additional characters ("IM") since selecting environment as IMS
search cancel

Getting additional characters ("IM") since selecting environment as IMS

book

Article ID: 14612

calendar_today

Updated On:

Products

Telon Application Generator

Issue/Introduction

The generated names have 'IM' embedded.  Why is this happening with IMS exported sources?

 

Environment

Telon Application Generator, release 5.1

Resolution

This is happening because of the defaults in the PGMNAMES macro. 

You can change the following; 

&PGMDHDR SETC '&SHEADER.IM' PROGRAM HEADER IMS DRIVER 

&PGMIHDR SETC '&SHEADER.IM' PROGRAM HEADER IMS DYNAMIC

to 

&PGMDHDR SETC '&SHEADER' PROGRAM HEADER IMS DRIVER 

&PGMIHDR SETC '&SHEADER' PROGRAM HEADER IMS DYNAMIC

Additional Information

This is happening because of the defaults in the PGMNAMES macro. 

.* THIS MACRO AS DELIVERED USES A 2-CHARACTER HEADER AND 

.* 4-CHARACTER SCREEN ID, BUT ANY COMBINATION ADDING UP TO NO 

.* MORE THAN 8 CHARACTERS MAY BE USED. (NOTE: THE MAXIMUM 

.* TOTAL ALLOWED FOR HEADER AND ID IS 6 CHARACTERS.) 

.* COBOL 

.* PROGRAM/CONTROL BLOCK GENERATED NAME GENERATED NAME 

.* BATCH PROGRAM HH.BP.NNNN HH.B.NNNN 

.* TSO PROGRAM HH.TM.NNNN HH.T.NNNN 

.* IMS DRIVER HH.IM.NNNN HH.I.NNNN 

.* IMS PROGRAM - DYNAMIC HH.IM.NNNN HH.I.NNNN 

.* IMS PROGRAM - STATIC HH.SM.NNNN HH.S.NNNN 

 

 

.********************************************************************** 

.* STEP 3A - SET HEADER NAME FOR COBOL PROGRAMS 

.* DETERMINE WHAT (IF ANY) CHARACTERS YOU WOULD LIKE TO BE 

.* PLACED BETWEEN THE HEADER AND ID OF YOUR PROGRAMS, BY TYPE. 

.********************************************************************** 

&PGMBHDR SETC '&SHEADER.BP' PROGRAM HEADER BATCH PROGRAM 

&PGMTHDR SETC '&SHEADER.TM' PROGRAM HEADER TSO TEST PROGRAM 

&PGMDHDR SETC '&SHEADER.IM' PROGRAM HEADER IMS DRIVER 

&PGMIHDR SETC '&SHEADER.IM' PROGRAM HEADER IMS DYNAMIC