It is much easier to write code in XBrowse than WBrowse. The above code
can be written as
for XBrowse.
We get better and more reliable results by using the command facilities provided by xBrowse commands.
REDEFINE LISTBOX oLbxA ;
FIELDS aDetalle[oLbxA:nAt, 2], ;
aDetalle[oLbxA:nAt, 3], ;
STR(aDetalle[oLbxA:nAt, 4],12,3), ;
STR(aDetalle[oLbxA:nAt, 5],12,3), ;
STR(aDetalle[oLbxA:nAt, 6],12,3) ;
HEADERS "Producto", ;
"Unidad", ;
"Cantidad", ;
"Precio", ;
"Sub Total"can be written as
REDEFINE XBROWSE oLbxA ;
COLUMNS 2, 3, 4, 5, 6 ;
HEADERS 'Producto','Unidad','Candidad','Precio','Sub Total' ;
OF oLbxA ARRAY aDetallefor XBrowse.
We get better and more reliable results by using the command facilities provided by xBrowse commands.
Regards
G. N. Rao.
Hyderabad, India
G. N. Rao.
Hyderabad, India
