Histórico da Página

#include "protheus.ch" 

User Function PEXMLADIC()    
    Local cCRLF    := (chr(13)+chr(10))
    Local cXMLPE   := ""      
    If Alltrim(cEspecie) $ "NF|NCC"  
        cXMLPE += '    <cfdi:Addenda>' + cCRLF
        cXMLPE += '        <Addenda xmlns:Addenda="http://www.Addenda/" schemaLocation="http://www.addenda.xsd" version="1.0">' + cCRLF
        cXMLPE += '            <Addenda:Datos>' + cCRLF
        cXMLPE += '                <Addenda:Detalle>abc</Addenda:Detalle>' + cCRLF
        cXMLPE += '            </Addenda:Datos>' + cCRLF
        cXMLPE += '        </Addenda>' + cCRLF
        cXMLPE += '    </cfdi:Addenda>' + cCRLF
	EndIf 
 Return cXMLPE