Cursortypevalues: array [tcursortype] of toleenum = (AdopenusPecified, AdopenForward, AdoPENKEYSET, AdoPENDYNAMIC, AdOpenStatic);
AA: Array [0..2] of string = ('Jobid', 'Name', 'DDD');
