[fpc-pascal] XML_XSD export was: Timezone information in adatasetdatetimefield?

[Ludo Brands]

Attached the patch with the changes against git.

Ludo

> I'm getting an "http://www.w3.org/2001/XMLSchema:element not 
> taken into account in this context" (freely translated from 
> French) error. Fixed this by adding <xs:sequence> between 
> <xs:complexType> and <xs:choice maxOccurs="unbounded" minOccurs="0"/>
> 
> One other comment on indices:
> 
> Line 244:
>             if Index.Name = '' then
>             begin
>               TDOMElement(FANode).SetAttribute('index-name',
>                 UTF8Decode('idx' + Index.Fields + 
> IntToStr(Index.ID)));
>               //Avoids risk for name collision by adding 
> collection id.
>             End
> 
> Index.Fields contains ; as a field delimiter. AFAIAK ; is an 
> invalid character in index names. Better do a 
> StringReplace(Index.Fields, ';', '_', [rfReplaceAll, rfIgnoreCase])
> 
> Ludo
> 


-------------- next part --------------
A non-text attachment was scrubbed...
Name: xmlxsd.diff
Type: application/octet-stream
Size: 1442 bytes
Desc: not available
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20110726/358f5519/attachment.obj>