Can you implement ADO type 'adGUID' for ADS 12?

Posts: 41

Joined: Sat Mar 09, 2013 08:17 AM

Can you implement ADO type 'adGUID' for ADS 12?
Posted: Tue Jun 07, 2016 07:23 AM

can you please expand adofuncs.prg to the type 'adGuid'?
ADS 12 has the new type Guid as database field.

Example:
function FieldTypeAdoToDbf (nType)

do case
case AScan ({} 8,128,129,130,200,201,202,203,204,205, nType)&gt; 0; return 'C'

->
case AScan ({} 8,72,128,129,130,200,201,202,203,204,205, nType)> 0; return 'C'

case AScan ({7, 133, 135}, nType)&gt; 0; return 'D'
case nType == 11; return 'L'
Case AScan ({2, 3, 4, 5, 6, 14, 16, 17, 18, 19, 20, 21, 131, 139}, nType)&gt; 0; return 'N'
endcase

return ""

function FWAdoFieldStruct (ORS, n)
....
nType: = oField: Type

if nType == adBoolean
   cType: = 'L'
   nLen: = 1
elseif nType == adGUID &lt;------
   cType: = 'C'
   nLen: = 36

...

thank you
Manfred

Manfred Groß

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Can you implement ADO type 'adGUID' for ADS 12?
Posted: Wed Jun 08, 2016 01:52 PM

Thanks
We implemented your suggestion for the next release.

Regards

G. N. Rao.

Hyderabad, India

Gross

Posts: 41

Joined: Sat Mar 09, 2013 08:17 AM

Re: Can you implement ADO type 'adGUID' for ADS 12?
Posted: Wed Jun 08, 2016 06:59 PM

Thanks

Manfred

Manfred Groß

FiveTech Support Forums

Continue the discussion