[Tiny-cobol-users] Left and Right keys

[Hudson R. <hud...@so...>]

Hi all,

The left and right keys of my program are not working anymore. I've never had problems whith them but now I have... anyone knows why?

Am I wrong in something?

Could anyone help me?

I attached my program in this e-mail.

       identification division.
       program-id. tecla00.
       author. Hudson Reis.

       environment division.
       configuration section.
       special-names.
       	   crt status is Tecla.

       data division.
       working-storage section.
       77  Tecla                   pic 9(004)  value zeros.
       77  Var                     pic X(001)  value spaces.
       77  Esc                     pic 9(004)  value 0027. 
       
       screen section.
       
       procedure division.
       Inicio.
           initialize Var Tecla.

       Meio.
           accept Var line 10 position 50 auto
           if  Tecla equal Esc
           then
               go to Fim
           end-if
      *    display "01 Tecla-" Tecla " pic 9(004) value " Tecla 
      *	   no advancing
	   display "01 Tecla-" Tecla " pic 9(004) value " Tecla
	   line 05 position 05 no advancing
      *     display "01 Tecla-"          line 10 position 10
      *	    display Tecla                line 10 position 19
      *	    display "pic 9(004) value"   line 10 position 24
      *	    display Tecla                line 10 position 41
           go to Meio.
       
       Fim. 
           stop run.

Thanks
Hudson