Need help on TELON

sophia · Posted: Fri Nov 30, 2007 4:53 pm

Hello fellow mainframers,
Currently I'm investigating a program involving segment loop. when I try selecting an Item it won't transfer where it suppose to be transferred on the screen. Example if there are three item on the screen and I'll be selecting dog it should transfer on the right side of the screen
initially the screen is displaying the first item in the segment loop if I try to select "bug" it doesn't transfer. But if I hit other function keys that will tranfer it to another program or screen the selected item is trasferred I'm really confused why it is happening. It is my first time handling telon so maybe you can give me things to check. I reviewed the program and base on the code it should really transfer the data on the right side of the screen. looking forward to your advice

I created a sample screen so you can have a better view of my inquiry

*******************************************************
SELECT THE ANSWER=======> cat

Which among the animal is man's bestfriend?
_ A. CAT
_ B. DOG
_ C. BUG

f2=View the image of the animal F5 refresh f3=exit F6=info about the animal F7=Next question
*********************************************************

Best Regards,
Sophia Hagia

ashwinreddy · Posted: Fri Nov 30, 2007 7:25 pm

Hi

In the Interm after all sucessful validation of the selction option use the following code

IF ENTER-KEY

MOVE 'Screen Name' TO NEXT-PROGRAM-NAME
Move 'saved Value' TO XFER-AREA
SET DO-WRITE TO TRUE

END-IF

And also bit confused on your query,

1) As you have said you got only 1 item in your segloop and also said 3 items.

2) And do you want to transfer the program control to another program when the option dog is selected or want to position the cursor after selecting the option.

If you can explain me clearly i will try to help you.

Hope this helps

Cheers
Ashwin