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)> 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)> 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)> 0; return 'N'
endcase
return ""
function FWAdoFieldStruct (ORS, n)
....
nType: = oField: Type
if nType == adBoolean
cType: = 'L'
nLen: = 1
elseif nType == adGUID <------
cType: = 'C'
nLen: = 36
...
thank you
Manfred
Can you implement ADO type 'adGUID' for ADS 12?
Can you implement ADO type 'adGUID' for ADS 12?
Manfred Groß
- nageswaragunupudi
- Posts: 8017
- Joined: Sun Nov 19, 2006 5:22 am
- Location: India
- Contact:
Re: Can you implement ADO type 'adGUID' for ADS 12?
Thanks
We implemented your suggestion for the next release.
We implemented your suggestion for the next release.
Regards
G. N. Rao.
Hyderabad, India
G. N. Rao.
Hyderabad, India