Se más o menos como invocar un método COM de un server object. Lo que no se es como proceder con un COM property.
Tengo que pasar un valor a una propiedad, he intentado lo siguiente:
Código COBOL:
INVOKE COM "Create-Object" USING mail_driver RETURNING mail_server
INVOKE mail_server "LicenseCode" USING BY REFERENCE licencia
Y siempre me devuelve:
ERROR OCCURRED IN THE 'LICENSECODE' METHOD OF THE SPECIAL CLASS "*COM/*OLE". SCODE=0x80020003
Si intento con:
Código COBOL:
MOVE LicenseCode" TO METHOD-NAME
INVOKE mail_server METHOD-NAME USING BY REFERENCE licencia
Me devuelve un error type = 1.
1 : The COM system detected the error. To reference error details, execute
the GET-SCODE and GET-SCODE-TEXT methods. If another method
is executed, a null or 0 is returned.
He probado con el GET-SCODE y me devuelve un número pero el GET-SCODE-TEXT me devuelve un NULL y no me sirve de mucho.
¿Alguien me puede ayudar?
Gracias a tod@s y FELICES FIESTAS.