Open Source Document Management System | OpenKM

PostPosted:**Tue Jun 08, 2010 6:03 pm**

Buenas! Cuando quiero recuperar las propiedades de un documento, me devuelve todas las propiedades correctamente, execto en dos casos:
- notes
- subscriptors

Ambos devuelven arrays (Array_Of_note = array of note; para el primero y Array_Of_string = array of string; para el segundo, todo esto en delphi 2010)
Vamos por partes:
- Si el documento posee alguna nota, el array correspondiente posee siempre 3 valores(aun teniendo solo 1 nota, por ejemplo), si no tiene ninguna devuelve 0 valores. A esos valores le intento obtener el texto y el autor y siempre contienen una cadena vacia.
- Y los subcriptors siempre me devuelve un array con 0 valores, tenga o no tenga subcriptors.

Código que utilizo:

Code: Select all

 
var
  documento: OKMDocument1.document;
  notas: OKMDocument1.Array_Of_note;
  nota: OKMDocument1.note;
  suscriptores: OKMDocument1.Array_Of_string;
begin
  documento := GetOKMDocument.getProperties(token, sDocumentSelected);
  mmoPropiedadesDocumento.Lines.Add( 'actualVersion: ' + documento.actualVersion.name_ ); //propiedad que recupera perfectamente

  notas := OKMDocument1.Array_Of_note( documento.notes); //recupero las notas

  if Length(notas) > 0 then
  begin
     for I := Low(notas) to High(notas) do //High(notas) siempre = 2, de 0 a 2 = 3 valores
      begin
          nota := OKMDocument1.note( notas[I] );
          mmoPropiedadesDocumento.Lines.Add( '   - ' + nota.user + '  ' + nota.text ); // nota.user y  nota.text siempre cadenas vacias
     end;
  end;

¿Alguna idea?

PostPosted:**Tue Jun 08, 2010 9:57 pm**

Puede que tengamos un bug en los WS. Lo miraremos ahora no te lo puedo asegurar.

PostPosted:**Wed Jun 09, 2010 11:03 am**

jllort wrote:Puede que tengamos un bug en los WS. Lo miraremos ahora no te lo puedo asegurar.

Tema resuelto, es problema a la hora de generar el WS automaticamente, lo he comprobado consumiendo el servicio en java y funciona perfectamente. Gracias por la ayuda.

PostPosted:**Thu Jun 10, 2010 10:41 am**

Re-abro el tema, investigando un poco vuestro wsdl de document me encuentro con esto:

Code: Select all

<xs:complexType name="document">
<xs:sequence>
<xs:element minOccurs="0" name="actualVersion" type="tns:version"/>
<xs:element minOccurs="0" name="author" type="xs:string"/>
<xs:element name="checkedOut" type="xs:boolean"/>
<xs:element name="convertibleToPdf" type="xs:boolean"/>
<xs:element name="convertibleToSwf" type="xs:boolean"/>
<xs:element minOccurs="0" name="created" type="xs:dateTime"/>
<xs:element minOccurs="0" name="keywords" type="xs:string"/>
<xs:element minOccurs="0" name="language" type="xs:string"/>
<xs:element minOccurs="0" name="lastModified" type="xs:dateTime"/>
<xs:element minOccurs="0" name="lockInfo" type="tns:lock"/>
<xs:element name="locked" type="xs:boolean"/>
<xs:element minOccurs="0" name="mimeType" type="xs:string"/>
<xs:element maxOccurs="unbounded" minOccurs="0" name="notes" nillable="true" type="tns:note"/>
<xs:element minOccurs="0" name="path" type="xs:string"/>
<xs:element name="permissions" type="xs:byte"/>
<xs:element name="subscribed" type="xs:boolean"/>
<xs:element maxOccurs="unbounded" minOccurs="0" name="subscriptors" nillable="true" type="xs:string"/>
<xs:element minOccurs="0" name="uuid" type="xs:string"/>
</xs:sequence>
</xs:complexType>

En la linea que nombra a:

Code: Select all

<xs:element maxOccurs="unbounded" minOccurs="0" name="notes" nillable="true" type="tns:note"/>

¿la propiedad type no deberia ser del tipo array de notes?

Haciendo mis pruebas a partir de:

Code: Select all

 tNote = Class(TRemotable)
    private
      sText: string;
      sAuthor: string;
    published
      property text: string read sText write sText;
      property author: string read sAuthor write sAuthor;
  end;

  tNotes = array of TNote;

  tDocumento = Class(TRemotable)
    private
      sName: string;
      sNotes: tNotes;
    published
      property name: string read sName write sName;
      property notas: tNotes read sNotes write sNotes;
  end;

Me genera este wsdl:

Code: Select all

<xs:complexType name="tDocumento">

<xs:sequence>
<xs:element name="name" type="xs:string"/>
<xs:element name="notas" type="ns1:tNotes"/>
</xs:sequence>
</xs:complexType>

<xs:complexType name="tNotes">
<xs:complexContent>
<xs:restriction base="soapenc:Array">
<xs:sequence/>
<xs:attribute ref="soapenc:arrayType" n1:arrayType="ns1:tNote[]"/>
</xs:restriction>
</xs:complexContent>
</xs:complexType>

<xs:complexType name="tNote">
<xs:sequence>
<xs:element name="text" type="xs:string"/>
<xs:element name="author" type="xs:string"/>
</xs:sequence>
</xs:complexType>

Gracias por la ayuda de antemano!

PostPosted:**Thu Jun 17, 2010 10:09 am**

solucionado completamente, el problema era derivado a la hora de crear el WS automaticamente, a delphi no le gusta esto:
<xs:element maxOccurs="unbounded" minOccurs="0" name="notes" nillable="true" type="tns:note"/>

Añadiendo la siguiente línea, está resuelto:
RemClassRegistry.RegisterSerializeOptions(Document, [xoInlineArrays]);

PostPosted:**Mon Jun 21, 2010 6:29 am**

El tema es que los web services los genera JBoss a partir de unas clases, y me temo que no funciona exactamente como le gustaría a algunas implementaciones cliente por lo que se presentan problemas como el que comentas. Si alguien quiere aportar alguna mejora en este sentido sería bienvenida.

Un saludo.

Open Source Document Management System | OpenKM

Error en propiedades de un documento

Error en propiedades de un documento

Re: Error en propiedades de un documento

Re: Error en propiedades de un documento

Re: Error en propiedades de un documento

Re: Error en propiedades de un documento

Re: Error en propiedades de un documento