FiveTech Software tech support forums

> Tengo el siguiente codigo , donde el cliente introduce el lector de codigo
> de barras y mete un codigo de 13 numeros
>
> mcodart=space(len(ticket->codart1))
> lSalvar:=.F.
> lCancelar:=.F.
> DEFINE DIALOG tic_diaCodigo FROM 40,20 TO 45,70
> SET FONT OF tic_diaCodigo TO tic_Font
>
> @0,0 say ...

@ 3, 1 LISTBOX alm_ListBox ;
FIELDS almacen->descrip,; // Campos que contendr
transform(almacen->preveneur,"99,999.99"),; // el TBrowse.
transform(almacen->preproeur,"99,999.99"),;
transform(almacen->preneteur,"99,999.99"),;
substr(almacen->nomprov,1,20),;
transform(almacen->stoact ...