The Pre-class Assignment

You have been selected to do the pre-class assignment for the Introduction to Telon Online class based on the belief that you have had no prior Telon experience. Although this is an introductory course, many of your fellow students have already been asked to try to use Telon, with the result that they have asked for this class. To give you a similar taste of Telon, we suggest you do this exercise before the class starts. If you feel you have been chosen in error, please contact the person who sent this to you.

To write and test Telon programs, you must be able to do various installation-specific tasks: enter the TDF, compile a Telon program, bind a DB2 package, and test the program with xpediter. This document gives the installation-specific instructions for these activities. The more detailed instructions from CASE Integrators apply to Telon in any environment.

 

To get into the TDF

From the main menu, option 4(ISPF)

Sign on with userid at99to____ and password at99to___

TEAM NUMBER ______ This one-digit number will be represented as a # throughout this document, the preclass exercise, and the class itself.

From ISPF menu, option 8 (ISPFX)

From ISPFX, option TELON

From TELON, option 1 (TDF)

VSAMQ=TECHV.EDUC.TELON

Allocate PDS=N

Export Dsname=TELON.EXPRTPDS

DB2 interface=N

Press Enter

 

Within the TDF

Because this organization uses a 4-character header, when you create or mention a program, you will need to use a header of TRT# and an ID of UP or DI. This applies on page 25, 29, 49, and 51. Also, because this organization uses non-standard naming conventions, in the CICS environment you must set your TRANID to 'T#UP', otherwise it will default to TLON, and the input side of your program will not execute.

 

To compile a program

From the TELON menu, choose option 4 (CICS compile)

Fill in the following parameters:

On the 1st screen:

            source input=1

            TDF=TECHV.EDUC.TELON

            HEAD/ID=TRT#UP (where # is your team number, given above)

On the 2nd screen:

            COMPOPT=3

            OPTIONS=YYYNN

On the 3rd screen:

            COPYLIB1='TECH.SCP.TELON.V23.SOURCECC'

            DB2sub=DBT1

            dclgen LIB='TECH.EDUC.THEMIS.CLASS.SETUP'

            DBRMLIB='TECH.EDUC.TELON.DBRMLIB'

            MEMBER=TRT#CTUP

            CICS TEST REGION='NET.XPED.CICS.EDUC.SLF'

On the 4th screen:

SYSLMOD='TECH.EDUC.TELON.USER.LOAD'

SYSLIB 1='TECH.SCP.TELON.V23.LOAD'= SYSLIB 2

On the 5th screen:

S (submit)

and verify that the JCL looks like:

//AT99TO?? JOB (3,3572),'TELON JCL',

// CLASS=N,MSGCLASS=S,MSGLEVEL=(1,1),

// NOTIFY=AT99TO?

//*

After submission, press PF3 twice to return to the Telon menu.

 

To look at your compile listing

Press PF2 to split the screen, and type A. (the period is required) to get to IOF. In IOF, make sure the JOBNAMES parameter is blank and press enter. This will list your RUNNING and OUTPUT JOBS. Find the OUTPUT JOB with the last character you gave the compile you want to look at, and type an 'S' to the left of that line. This will display a list of jobsteps. PF8 past this, and you will find a list of print datasets which you can browse (with an S) to check that everything ran OK.

The compile procedure does everything you need for testing, except for binding your package. To do this, from ispf type 8.db2test, then 1, then 5, then 4.

Collection-id = userid

Member = trt#ctup

To make your package useable in CICS, you must grant access to PUBLIC: From ISPFX, choose DB2TEST, then A (DB2 ADMIN), then DBT1, then 1, then K (with your userid as owner), then GR on line TRT#CTUP, then Y beside BIND and EXECUTE and PUBLIC by TO.

 

Testing your program with XPEDITER

This organization does not use the Telon Test facility, so we must test our programs with Xpediter.

From the main menu, type B2 (the name of the CICS region), and sign on with the id and password above.

Erase EOF the screen and type XPED

Choose option 2, then L

Type your program name, TRT#CTUP: your source code will be displayed.

Type a 'B' to the left of the first executable statement, which should be 'GO TO SQL-INIT-END.' This will set a breakpoint, causing execution to pause as soon as the program gains control.

Press PF3 three times

Leave 'END SESSION' at 'NO', and press enter. You should be back at the blank CICS screen.

Type T#UP Your program listing should display, paused at the breakpoint.

Set another breakpoint just after 'PERFORM Q-100-CICS-INIT'. Type GO to continue to that breakpoint.

Find XFER-EMPL-ID in the data division and set its value to 123456.

Find XFER-TODAYS-DATE and set its value to a valid date like 991231.

Type GO. Your screen should show up. Type over some of the data and see whether the fields are validated in the way you expect. If the validation is successful, the record should be updated, and the program will try to transfer to TRT1CTDI. Since you have not written this yet, this will fail unless there is a copy of this program from a previous class.

Home Page
Telon Consulting
Telon Training

Class Outline
Class Schedule
Online Structure Charts
Installation checklist for class
Office Locations and Contact information