// {% LoadHrb( 'lib/tweb/tweb.hrb' ) %}
#include {% TWebInclude() %}
function main()
local o, oCol, oBrw
local aRows := {}
local cLoren := "Lorem Ipsum is simply dummy text of the printing and typesetting industry."
Aadd( aRows, { 'id' => 'A1', 'name' => 'Charly Aubia' , 'married' => .T., 'qty' => 12, 'date' => '2020-01-01', 'memory' => 'Hola' } )
Aadd( aRows, { 'id' => 'ZZ', 'name' => 'Only name defined !'})
Aadd( aRows, { 'id' => 'A2', 'name' => 'Maria de la O', 'married' => .F., 'qty' => 7, 'date' => '2020-01-02', 'memory' => cLoren } )
Aadd( aRows, { 'id' => 'A3', 'name' => 'John Kocinsky', 'married' => .F., 'qty' => 23, 'date' => '2020-01-03', 'memory' => '' } )
Aadd( aRows, { 'id' => 'A4', 'name' => 'Anne Clark' , 'married' => .T., 'qty' =>100, 'date' => '2020-01-04', 'memory' => 'Test memory' } )
Aadd( aRows, { 'id' => 'A5', 'name' => 'Daniel Clark' , 'married' => .T., 'qty' => 0, 'date' => '2020-01-05', 'memory' => 'Ep!' } )
Aadd( aRows, { 'id' => 'A6', 'name' => 'Rod Steward' , 'married' => .F., 'qty' => 98, 'date' => '2020-01-06', 'memory' => 'Baby Jean' } )
Aadd( aRows, { 'id' => 'A7', 'name' => 'Ally McPerson', 'married' => .F., 'qty' => 72, 'date' => '2020-01-07', 'memory' => '' } )
Aadd( aRows, { 'id' => 'A8', 'name' => 'Bruce Polest' , 'married' => .F., 'qty' => 13, 'date' => '2020-01-08', 'memory' => 'Memory...' } )
Aadd( aRows, { 'id' => 'A9', 'name' => 'James Stewart', 'married' => .T., 'qty' => 84, 'date' => '2020-01-09', 'memory' => '' } )
Aadd( aRows, { 'id' => 'A10','name' => 'Sens Lange' , 'married' => .F., 'qty' => 53, 'date' => '2020-01-10', 'memory' => '' } )
DEFINE WEB oWeb TITLE 'xBrowse' TABLES INIT
DEFINE FORM o
HTML o INLINE '<h3>Basic xBrowse</h3><hr>'
INIT FORM o
DEFINE BROWSE ID 'ringo' DATA aRows OF o
END FORM o
retu nil