Input Array issue (1.2.27 and 1.2.28)

Luis Carlos Díaz Otero <[email protected]>
Newsgroups gmane.comp.lang.4gl.aubit.general
Message-ID <[email protected]>
Hi all; happy new year for everyone.

With 1.2.25 version i have no problem with an input array with a decimal field, but with 1.2.27 and 1.2.28 the same program only accepts one (and only one) digit in the field.

The form:

DATABASE FORMONLY
SCREEN
{

    D A T O S     P A R A    C O S T E O     D E L      G A S     F A C T U R A D O
    \g-------------------------------------------------------------------------------\g
  Ciclo de facturacion al cual se aplica el presente costeo ................... [cic ]
  ---------> COSTEO CONTABLE DEL CONSUMO DE LA FACTURACION NUMERO [ultima] <---------
  Fecha con la cual quedarán contabilizados los comprobantes (dd/mm/aaaa) [fecha     ]
\gp--------------------------------------------------------------------------------------------q\g
\g|\g   MUNICIPIO             \g|\g        C   U   E    N   T   A                     \g|\gCOSTO/M3      \g|\g
\g|\g[mu ][muninombre        ]\g|\g[cuenta    ] [cuenombre                           ]\g|\g[costo       ]\g|\g
\g|\g[mu ][muninombre        ]\g|\g[cuenta    ] [cuenombre                           ]\g|\g[costo       ]\g|\g
\g|\g[mu ][muninombre        ]\g|\g[cuenta    ] [cuenombre                           ]\g|\g[costo       ]\g|\g
\g|\g[mu ][muninombre        ]\g|\g[cuenta    ] [cuenombre                           ]\g|\g[costo       ]\g|\g
\g|\g[mu ][muninombre        ]\g|\g[cuenta    ] [cuenombre                           ]\g|\g[costo       ]\g|\g
\g|\g[mu ][muninombre        ]\g|\g[cuenta    ] [cuenombre                           ]\g|\g[costo       ]\g|\g
\g|\g[mu ][muninombre        ]\g|\g[cuenta    ] [cuenombre                           ]\g|\g[costo       ]\g|\g
\g|\g[mu ][muninombre        ]\g|\g[cuenta    ] [cuenombre                           ]\g|\g[costo       ]\g|\g
\g|\g[mu ][muninombre        ]\g|\g[cuenta    ] [cuenombre                           ]\g|\g[costo       ]\g|\g
\g|\g[mu ][muninombre        ]\g|\g[cuenta    ] [cuenombre                           ]\g|\g[costo       ]\g|\g
\gb--------------------------------------------------------------------------------------------d\g
Número de factura en proceso [codigo     ]           Registro [van     ] de [de       ]
}
END
ATTRIBUTES
cic       = FORMONLY.elciclo TYPE SMALLINT;
fecha     = FORMONLY.movfecha TYPE DATE,FORMAT="dd/mm/yyyy",PICTURE="##/##/####";
ultima    = FORMONLY.ultima;
mu        = FORMONLY.municodigo,UPSHIFT,NOENTRY;
muninombre= FORMONLY.muninombre,NOENTRY;
cuenta    = FORMONLY.cuecodigo,NOENTRY;
cuenombre = FORMONLY.cuenombre,NOENTRY;
costo     = FORMONLY.costo TYPE DECIMAL(12,2);
codigo    = FORMONLY.datnumfactur;
van       = FORMONLY.van;
de        = FORMONLY.de;
INSTRUCTIONS
SCREEN RECORD lineas[10] (municodigo THRU costo);


----------------------------------------------------------------------------------------------------

As you can see the only input field in the array, is FORMONLY.costo and is defined as DECIMAL(12,2), also in the program

In the program i have: 
DEFINE

       arremunici ARRAY[100] OF RECORD
         municodigo LIKE com_municipios.municodigo,   ## CHAR(3)
         muninombre LIKE com_municipios.muninombre,   ## CHAR(30)
         cuecodigo  LIKE con_cuentas.cuecodigo,       ## CHAR(20)
         cuenombre  LIKE con_cuentas.cuenombre,       ## CHAR(50)
         costo      DECIMAL(12,2)
       END RECORD,
...
...
...

INPUT ARRAY arremunici WITHOUT DEFAULTS FROM lineas.* ATTRIBUTE(BOLD,CURRENT ROW DISPLAY="GREEN,BOLD,REVERSE")

...
...
...

If i try to put for example 9785.52  it is correct in Aubit4gl 1.2.25, 9785.52 is accepted and the cursor moves to the rigth as i am hitting the keys, but in 1.2.27 or 1.2.28 only one digit is accepted into the field and the cursor remains at the left side of the field, when i move to the next record of the array only the last digit pressed was entered as data.



 
Cordial saludo: 

Luis Carlos Díaz Otero


________________________________

Hay 10 clases de personas en el mundo: las que saben de números binarios y las que no

________________________________

Asesoramos y acompañamos su presentación de tareas y trabajos de matemáticas:
http://www.facebook.com/pages/Asesorias-Matematicas/142808622433724?created

------------------------------------------------------------------------------
Ridiculously easy VDI. With Citrix VDI-in-a-Box, you don't need a complex
infrastructure or vast IT resources to deliver seamless, secure access to
virtual desktops. With this all-in-one solution, easily deploy virtual 
desktops for less than the cost of PCs and save 60% on VDI infrastructure 
costs. Try it free! http://p.sf.net/sfu/Citrix-VDIinabox

_______________________________________________
Aubit4gl-discuss mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.