Re: accept key F11

Mike Aubury <[email protected]> Wed, 12 Jul 2023 08:43:48 +0100
Newsgroups gmane.comp.lang.4gl.aubit.general
Message-ID <CAGAq4WHJuGhst1mgwsXqAouZ4ibqD=0nnKaiAjBPdagXjC7gLQ@mail.gmail.com>
--===============2343381519523716454==
Content-Type: multipart/alternative; boundary="000000000000f08a5d060045604e"

--000000000000f08a5d060045604e
Content-Type: text/plain; charset="UTF-8"

There's no environment variables you can set to do this - as you say - you
can do it by adjusting the code.

But - due to the wonders of Open Source Software - you can just adjust the
default..

lib/libaubit4gl/keys.c - around line 594 :

void
A4GL_init_stddbscr (void)
{
  static int inited = 0;
  if (inited)
    return;
  inited = 1;
#ifdef DEBUG
  A4GL_debug ("init_stddbscr - form_line");
#endif
  std_dbscr.mode = 0;
  std_dbscr.colour = 0;
  std_dbscr.border = 0;
  std_dbscr.inpattr = 0;
  std_dbscr.dispattr = 0;
  std_dbscr.nextkey = A4GLKEY_F (3);
  std_dbscr.prevkey = A4GLKEY_F (4);
*  std_dbscr.acckey = 27;*
  std_dbscr.helpkey = 23;


Replace that with something like :

*  std_dbscr.acckey = A4GLKEY_F (11);*

obviously recompile etc. and that should be the default for all programs..

On Wed, 12 Jul 2023 at 07:12, Michael Pope <[email protected]> wrote:

> We have multiple forms (about 1000) in our old informix code which don't
> declare an accept key and on the old system it used to be F11 by using a
> termcap file in the operating system to mimic an ESC key. I don't want
> to do this on the new system for obvious reasons, I also don't want to
> manually edit 1000 files.
>
> Is there a global environment variable or config option in Aubit4GL to
> set the 'accept key' to F11 instead of me editing every file and
> entering in the following;
>
>      OPTIONS
>      accept key F11
>
>
> from
>
> Michael
>
>
>
> _______________________________________________
> Aubit4gl-discuss mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
>

--000000000000f08a5d060045604e
Content-Type: text/html; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable

<div dir=3D"ltr">There&#39;s no environment variables you can set to do thi=
s - as you say - you can do it by adjusting the code.<div><br></div><div>Bu=
t - due to the wonders of Open Source Software - you can just adjust the de=
fault..</div><div><br></div><div>lib/libaubit4gl/keys.c - around line 594 :=
</div><div><br></div><div>void<br>A4GL_init_stddbscr (void)<br>{<br>=C2=A0 =
static int inited =3D 0;<br>=C2=A0 if (inited)<br>=C2=A0 =C2=A0 return;<br>=
=C2=A0 inited =3D 1;<br>#ifdef DEBUG<br>=C2=A0 A4GL_debug (&quot;init_stddb=
scr - form_line&quot;);<br>#endif<br>=C2=A0 std_dbscr.mode =3D 0;<br>=C2=A0=
 std_dbscr.colour =3D 0;<br>=C2=A0 std_dbscr.border =3D 0;<br>=C2=A0 std_db=
scr.inpattr =3D 0;<br>=C2=A0 std_dbscr.dispattr =3D 0;<br>=C2=A0 std_dbscr.=
nextkey =3D A4GLKEY_F (3);<br>=C2=A0 std_dbscr.prevkey =3D A4GLKEY_F (4);<b=
r><b>=C2=A0 std_dbscr.acckey =3D 27;</b><br>=C2=A0 std_dbscr.helpkey =3D 23=
;<br></div><div><br></div><div><br></div><div>Replace that with something l=
ike :=C2=A0</div><div><br><b>=C2=A0 std_dbscr.acckey =3D=C2=A0A4GLKEY_F (11=
);</b><br></div><div><b><br></b></div><div>obviously recompile etc. and tha=
t should be the default for all programs..</div></div><br><div class=3D"gma=
il_quote"><div dir=3D"ltr" class=3D"gmail_attr">On Wed, 12 Jul 2023 at 07:1=
2, Michael Pope &lt;<a href=3D"mailto:[email protected]">michael@dtcorp=
.com.au</a>&gt; wrote:<br></div><blockquote class=3D"gmail_quote" style=3D"=
margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-lef=
t:1ex">We have multiple forms (about 1000) in our old informix code which d=
on&#39;t <br>
declare an accept key and on the old system it used to be F11 by using a <b=
r>
termcap file in the operating system to mimic an ESC key. I don&#39;t want =
<br>
to do this on the new system for obvious reasons, I also don&#39;t want to =
<br>
manually edit 1000 files.<br>
<br>
Is there a global environment variable or config option in Aubit4GL to <br>
set the &#39;accept key&#39; to F11 instead of me editing every file and <b=
r>
entering in the following;<br>
<br>
=C2=A0=C2=A0=C2=A0=C2=A0 OPTIONS<br>
=C2=A0=C2=A0=C2=A0=C2=A0 accept key F11<br>
<br>
<br>
from<br>
<br>
Michael<br>
<br>
<br>
<br>
_______________________________________________<br>
Aubit4gl-discuss mailing list<br>
<a href=3D"mailto:[email protected]" target=3D"_blank"=
>[email protected]</a><br>
<a href=3D"https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss" r=
el=3D"noreferrer" target=3D"_blank">https://lists.sourceforge.net/lists/lis=
tinfo/aubit4gl-discuss</a><br>
</blockquote></div>

--000000000000f08a5d060045604e--


--===============2343381519523716454==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline


--===============2343381519523716454==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

_______________________________________________
Aubit4gl-discuss mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss

--===============2343381519523716454==--