usar TEXT INTO cArch..... ENDTEXT

usar TEXT INTO cArch..... ENDTEXT

Postby noe aburto » Tue Oct 06, 2020 2:00 am

Saludos.

Con un problema, nececito crear un archivo XML y uso

TEXT INTO x
Code: Select all  Expand view

<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:wsa="http://www.w3.org/2005/08/addressing" xmlns:fordID="urn:ford/star/security/v1.0" xmlns:tran="http://www.starstandards.org/webservices/2005/10/transport" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
  <soap:Header>
    <Security soap:mustUnderstand="1" xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd" xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" xmlns="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd">
ENDTEXT
TEXT INTO x
        </tran:content>
      </tran:payload>
    </tran:ProcessMessage>
  </soap:Body>
</soap:Envelope>
ENDTEXT
 


Como podre ir creando un archivo con varios TEXT INTO...ENDTEXT

ALGUIEN QUE ME PUEDA AYUDAR CON ESTA INSTRUCCION: TEXT INTO... y sus alternativas
Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com
User avatar
noe aburto
 
Posts: 418
Joined: Wed Nov 26, 2008 6:33 pm
Location: Morelia, Mich. Mexico.

Re: usar TEXT INTO cArch..... ENDTEXT

Postby cnavarro » Tue Oct 06, 2020 3:28 am

Primero:
TEXT INTO <v>


y después ya
TEXT INTO <v> ADDITIVE
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
 
Posts: 6520
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: usar TEXT INTO cArch..... ENDTEXT

Postby hmpaquito » Thu Jul 29, 2021 9:10 am

En mi caso uso abundantemente el TEXT INTO para crear archivos .xml

Lo hago insertando cadenas_macro

ejemplo:

Code: Select all  Expand view
TEXT INTO c
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:wsa="http://www.w3.org/2005/08/addressing" xmlns:fordID="urn:ford/star/security/v1.0" xmlns:tran="http://www.starstandards.org/webservices/2005/10/transport" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
  <soap:Header>
    <Security soap:mustUnderstand="1" xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd" xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" xmlns="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd">
%CADENA_2%
END

c:= StrTran(c, "%CADENA_2%", "un ejemplo")
 

Y asi con todo. Solo cuando el modelo del .xml cambia mucho podria ser necesario definir otro .xml alternativo
hmpaquito
 
Posts: 1482
Joined: Thu Oct 30, 2008 2:37 pm

Re: usar TEXT INTO cArch..... ENDTEXT

Postby cnavarro » Fri Jul 30, 2021 2:00 am

Yo uso la misma técnica en Mod-Harbour
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
 
Posts: 6520
Joined: Wed Feb 15, 2012 8:25 pm
Location: España


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot], wilsongamboa and 56 guests