OT - recibo por honorarios electronico ---convertir ??

176 views
Skip to first unread message

Miguel Canchas

unread,
Feb 27, 2014, 5:51:39 PM2/27/14
to publice...@googlegroups.com

Son archivos de PERU.

 

Señores alguno ya trabajo con recibos por honorarios electrónicos…

 

Me enviaron un XML y quieren visualizarlo en Word(o sea que se vea bonito), es posible esto ¿?

 

Junto con el correo viene el archivo  XML y en el cuerpo del correo viene esto :

 

 

 

CIR DEL RECIBO POR HONORARIOS ELECTRONICOS E001 – 1

 

RUC y nombre del emisor:

Sssssssss

Fecha :

Sdsafafafsffa

Número de operación:

Sdfdsfdsfdsfrdsf

Tipo y número de documento del usuario del servicio:

Sdfdsfdsfdfdsfdsfd

Nombre o Razón Social del usuario del servicio:

Sdfdfdfdfdsfdfd

Descripción o tipo de servicio prestado:

Sdfdsfdsfdfdfds

Observación:

Sdfdsdsfdfdfdfdsf

Inciso:

Sdfdfdsfdsfds

Monto neto expresado en letras :

Sdfsdfdsfdfdfdfd

Monto total de honorarios:

Sdfdsdfds

Retención (10%) IR:

Adssdsadsdsd

Total neto recibido:

Adasdsadsadsadsads

 

 

Abri los archivos en Word y Excel…. Me pide un archivo xsl…????

 

 

Gracias por su ayuda….

 

MK

 

MALKASOFT ADPI: http://www.developervfp.blogspot.com/

unread,
Feb 27, 2014, 7:18:20 PM2/27/14
to publice...@googlegroups.com, mcan...@ximesa.com
Hola conviértelo a cursor Convierte texto XML en un cursor o tabla de Visual FoxPro.
XMLTOCURSOR(XMLSource eExpression | cXMLFile [, cCursorName [, nFlags ]])

Parámetros

eExpression
Especifica el texto XML o una expresión que producen datos XML válidos. Este parámetro puede ser una variable de memoria de Visual FoxPro, el contenido de un campo memo o el valor devuelto por una solicitud HTTP. También puede especificar el valor devuelto por una llamada a un método SOAP, XML de XMLDOM o una secuencia ADO. XMLCURSOR( ) genera un error si no se encuentra XMLSource o si el análisis de eExpression no produce datos XML válidos.
cXMLFile
Especifica el nombre y opcionalmente, ruta de un archivo físico XML que reside en el equipo local o tiene acceso a través de la red. Si no se especifica una ruta, Visual FoxPro busca el archivo XML en la ruta de FoxPro.
cCursorName
Especifica el nombre del cursor que contendrá el resultado. Si no se especifica o pasa una cadena vacía ("") para cCursorName, Visual FoxPro devuelve el resultado a XMLRESULT. El cursor se crea en el área de trabajo actual, a menos que ya se esté utilizando. En este caso, el cursor se escribe en un área de trabajo que no se esté utilizando.

Cuando nFlags se establece como 8192 y si cCursorName contiene datos, Visual FoxPro agrega a la tabla o cursor existente los datos que se están importando desde el archivo XML. La tabla o cursor debe estar abierto o en uso. Si cCursorName es una cadena vacía (""), Visual FoxPro importa XML en la tabla o cursor que esté abierto en el área de trabajo actual.



Saludos; 



Ing. Russvell Jesus Soto Gamarra 

Blog: http://developervfp.blogspot.mx/

Canal YouTube: http://www.youtube.com/rycjesusrj

Framework Multi-conexion v6.0 trabaja cualquier base de datos

(SQLServer, MySQL, Firebird, MariaDB, PostgreSQL, Oracle y etc.) 

http://www.youtube.com/watch?v=PCCZvCaet74

 

Miguel Canchas

unread,
Feb 27, 2014, 7:29:18 PM2/27/14
to MALKASOFT ADPI: http://www.developervfp.blogspot.com/, publice...@googlegroups.com

Ya lo hice y no funka, sale un error

 

 

MK

image001.png

MALKASOFT ADPI: http://www.developervfp.blogspot.com/

unread,
Feb 27, 2014, 7:45:37 PM2/27/14
to publice...@googlegroups.com, mcan...@ximesa.com
ahi tienes otra forma de leer los archivos.
xmldoc=CREATEOBJECT('MSXML2.DOMdocument')
xmldoc.LOAD("Test.xml")
oRootNode = xdoc.documentElement
cRootTagName = oRootNode.tagName
olNodes = xdoc.selectNodes("//factura")
?olNodes
FOR i = 0 TO olNodes.LENGTH - 1
FOR j = 0 TO olNodes.ITEM(i).ATTRIBUTES.LENGTH - 1
AtrName = olNodes.ITEM(i).ATTRIBUTES.ITEM(j).nodeName
AtrValues = olNodes.ITEM(i).ATTRIBUTES.ITEM(j).TEXT
?AtrValues
ENDFOR    
ENDFOR
Reply all
Reply to author
Forward
0 new messages