Q: How do I export a complete Telon program and create a BMS map from the Telon source?

Products

• Telon Application Generator

Issue/Introduction

Creating BMS Mapping from Telon source.

How do you create BMS mapping source code from a Telon program that resides in the Telon Design Facility?

Environment

Telon CICS Environment

Resolution

1. Bring up the Telon Design Facility.

2. From the TDF Main Menu, select option 4.

TELON DESIGN FACILITY MAIN MENU ***** ******

3. From the Online program definition menu, type in your program, and be sure to

   use ENVIRON     CICS

ONLINE PROGRAM DEFINITION MENU ****** 

4. This will bring you to the Update screen definition.

TRCC2A.SD UPDATE SCREEN DEFINITION ** **

5. From this panel, put an X by ENV CICS. This will bring up the UPDATE CICS ENVIRONMENT

TRCC2A.SD UPDATE CICS ENVIRONMENT *** 

6. Put a Y by BMS, and the name you want to call the BMSMAP (I used MARILYN)

7. Then PF3 out to the Main Menu.

8. On the TDF MAIN MENU, type in a U at the FUNCTION

9. This will bring you to the Utilities Menu.

   Type in XR for the Function, key in a C for ENVIRONMENT, and also a Y for ENV FORMAT

   This Panel will export your Telon Screen Definition to the PDS that is allocated in your TDF clist. The low level qualified would be EXPRTPDS, mine is CSAP.REL51.EXPRTPDS 

10. You will get the message of;

UTILITIES MENU ********************** ************************ MEMBER REPLACED  

11. The member is Exported and replaced in your EXPRTPDS.

12. Next take your proc that will do the following (Target Environment CICS is needed);

000006 //*************   TELON GENERATE, COMPILE, AND LINK JOB              

000007 //*************       TARGET ENVIRONMENT: CICS    

At the bottom of the proc are the OPTIONS that can be generated.

//*************************************************

//*            0 -- ASM COMPILE LINK BMS PSB       

//*            1 -- ASM COMPILE LINK BMS           

//*            2 -- ASM COMPILE LINK PSB           

//*            3 -- ASM COMPILE LINK   (DEFAULT)   

//*            4 -- ASM COMPILE                    

//*            5 -- ASM BMS PSB                    

//*            6 -- ASM BMS                        

//*            7 -- ASM PSB                        

//*            8 -- ASM  

To generate BMS source you would want one of the options 0,1,5, or 6.

 

For simplicity I choose OPTION 6. Make the following changes to the proc.

//            OPTION=6,                           PERFORMANCE OPTIONS

//            BMSSRC='CSAP.userid.SOURCE',      BMS DEST SOURCE LIB 

//            BMSMEM='TESTBMS',                   BMS MEMBER NAME    

 

13. The output of this job generated the following steps:

14. Here is the BMS source that Telon generated, ready to be assembled. Notice the name MARILYN that we used in the TDF.

 BROWSE    CSAP.userid.SOURCE(TESTBMS)            Line 000

 Command ===>                                               

********************************* Top of Data **************

PRINT NOGEN                                        

MAPSET  

DFHMSD TYPE=&SYSPARM,MODE=INOUT,TIOAPFX=YES,CTRL=FREEKB,LANG=COBOL

MARILYN  DFHMDI SIZE=(24,80)                                             

DFHMDF  POS=(01,001),LENGTH=1,ATTRB=ASKIP          

DATE     DFHMDF  POS=(01,002),LENGTH=8,ATTRB=(ASKIP,NORM)              

DFHMDF  POS=(01,019),LENGTH=9,ATTRB=(ASKIP,NORM),                 

INITIAL='T E L O N'                                     

DFHMDF  POS=(01,031),LENGTH=11,ATTRB=(ASKIP,NORM),                

INITIAL='S A M P L E'                                   

DFHMDF  POS=(01,045),LENGTH=15,ATTRB=(ASKIP,NORM),                

INITIAL='S O L U T I O N'                               

DFHMDF  POS=(02,028),LENGTH=8,ATTRB=(ASKIP,NORM),                 

INITIAL='EMPLOYEE'                           

TITLE    DFHMDF  POS=(02,037),LENGTH=6,ATTRB=(ASKIP,NORM)   

 

 

Additional Information

Attached is a complete summary for Telon and BMS mapping including Panel prints.