Histórico da Página

...

Informações

El Punto de Entrada PEEMIREC recibe como parámetro la opción de tipo Caracter, mediante el cual se tienen disponibles las siguientes opciones:

Si opción es "E", se permite la modificación del Nodo de cfdi:Emisor, tomando en cuenta los siguientes atributos que se puede agregar al arreglo:

[1] - Valor para el atributo Rfc
[2] - Valor para el atributo Nombre
[3] - Valor para el atributo RegimenFiscal

Si opción es "R", se permite la modificación del Nodo de cfdi:Receptor, tomando en cuenta los siguientes atributos que puede agregar al arreglo:

[1] - Valor para el atributo Rfc
[2] - Valor para el atributo Nombre
[3] - Valor para el atributo RegimenFiscalReceptor
[4] - Valor para el atributo DomicilioFiscalReceptor
[5] - Valor para el atributo UsoCFDI
[6] - Valor para el atributo ResidenciaFiscal (aplica para complemento de comercio exterior el cual se toma del campo YA_CCESAT usando el código informado en el campo F2_RESIDE)
[7] - Valor para el atributo NumRegIdTrib (aplica para complemento de comercio exterior el cual se toma del campo AI0_IDFIS)

Ejemplo de uso

Bloco de código

title	PEEMIREC
linenumbers	true

User Function PEEMIREC()
    Local cArea   := GetArea()
    Local cOpcion := PARAMIXB[1] // E - Emisor o R - Receptor
    Local aEmiRec := {} // Arreglo dinámico que contiene la información del Emisor o Receptor.
    /* Atributos que se puede agregar para ser modificados en el XML para Emisor y Receptor
    [1] - RFC
    [2] - Nombre
    [3] - RegimenFiscal
    [4] - DomicilioFiscal Solo Receptor
    [5] - UsoCFDI Solo Receptor  */
    If cOpcion =='E'                
        aAdd(aEmiRec, {"RFC", ""} )
        aAdd(aEmiRec, {"Nombre", CFDCarEsp(Alltrim(SM0->M0_NOMECOM))} )
        aAdd(aEmiRec, {"RegimenFiscal", "601"} )  
    EndIf
    If cOpcion =='R' .And. Alltrim(cEspecie) $ "NF"      
        aAdd(aEmiRec, {"RFC", CFDCarEsp(AllTrim(SA1->A1_CGC))} ) 
    EndIf
 
Return aEmiRec

...

Árvore de páginas

Versões comparadas

Versão antiga 35

Nova versão Atual

Chave