DVARLOJ1-5526 DT Busca e Publica Nota Fiscal de Entrada (Devolução)

01. DADOS GERAIS

Linha de Produto:	Microsiga Protheus
Segmento:	Varejo
Módulo:	SigaLoja (Controle de Loja)
Função:	RmiBusObjLive RmiGrvMsgPubLiveObj
Ticket:	Não há.
Story:	DVARLOJ1-5526

02. SITUAÇÃO/REQUISITO

Buscar as Notas Fiscais de Entrada do tipo Devolução disponibilizadas no Live Connector e publica-las na tabela MHQ - Mensagens Publicas do Protheus.

03. SOLUÇÃO

Foi disponibilizado o processo NOTA DE ENTRADA do tipo Busca, que irá realizar as buscas das notas fiscais de entrada do tipo devolução.

O processo acimada deve ser ativo para o assinante Live a partir da rotina Assinantes x Processo (RMICADASSI), como demonstrado abaixo:

Configurar os campos definidos abaixo:

Campo: Configuração

{
	"url": "http://.../PracticoLive/LiveConnector/FacadeIntegracao.svc?wsdl",
	"operacao": "RecuperarNotaFiscalLC_Integracao_Xml",
	"tagretorno": "<LC_TicketNotaFiscal>",
	"SD1": "self:oRegistro:_Itens:_Lc_ItemNotaFiscal"
}

Campo: Layout Envio

&"<soapenv:Envelope xmlns:soapenv='http://schemas.xmlsoap.org/soap/envelope/' xmlns:liv='http://LiveConnector/'>
	<soapenv:Header/>
	<soapenv:Body>
		<liv:RecuperarNotaFiscalLC_Integracao_Xml>
			<liv:codigoSistemaSatelite>" + self:oConfAssin['sistemasatelite'] + "</liv:codigoSistemaSatelite>
			<liv:xmlIdentificacao><![CDATA[<?xml version='1.0'?><LC_Identificacao><Chave>" + self:cToken + "</Chave><CodigoSistemaSatelite>" + self:oConfAssin['sistemasatelite'] + "</CodigoSistemaSatelite></LC_Identificacao>]]>
			</liv:xmlIdentificacao>
		</liv:RecuperarNotaFiscalLC_Integracao_Xml>
	</soapenv:Body>
</soapenv:Envelope>"

Layout Publi

{
    "F1_FILIAL": "&self:DePara('SM0', self:oRegistro:_Destinatario:Text, 1, 0)",
    "F1_CHVNFE": "&self:oRegistro:_ChaveNFe:Text",
    "F1_EMISSAO": "&DtoS( CtoD( SubStr(self:oRegistro:_DataEmissao:Text, 1, 10) ) )",
    "F1_FORNECE": "&self:DePara('SA1', self:oRegistro:_Emitente:Text, 2, 0)",
    "F1_LOJA": "&SuperGetMv('MV_LOJPAD', .F., '01')",
    "F1_DOC": "&self:oRegistro:_NumeroNotaFiscal:Text",
    "F1_SERIE": "&self:oRegistro:_Serie:Text",
    "F1_COND": "001",
    "F1_VALMERC": "&self:oRegistro:_ValorLiquido:Text",
    "F1_VALBRUT": "&self:oRegistro:_ValorBruto:Text",
    "F1_TIPO": "D",
    "F1_FORMUL": "S",
    "F1_DESCONT": "&self:oRegistro:_ValorDesconto:Text",
    "F1_DTDIGIT": "&DtoS( CtoD( SubStr(self:oRegistro:_DataMovimento:Text, 1, 10) ) )",
    "F1_ESPECIE": "SPED",
    "F1_MSEXP": "&DtoS(Date())",
    "F1_HORA": "&SubStr(self:oRegistro:_DataMovimento:Text, 12, 8)",
    "SD1": [
        {
            "D1_FILIAL": "&self:DePara('SM0', self:oRegistro:_Destinatario:Text, 1, 0)",
            "D1_COD": "&self:DePara('SB1', self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_CodigoProduto:Text, 2, 0)",
            "D1_ITEM": "&Right( AllTrim(self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_NumeroItem:Text), TamSx3('D1_ITEM')[1])",
            "D1_FORNECE": "&self:DePara('SA1', self:oRegistro:_Emitente:Text, 2, 0)",
            "D1_LOJA": "&SuperGetMv('MV_LOJPAD', .F., '01')",
            "D1_QUANT": "&self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_Quantidade:Text",
            "D1_VUNIT": "&self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_PrecoUnitario:Text",
            "D1_TOTAL": "&self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_ValorTotalItem:Text",
            "D1_LOCAL": "&SuperGetMv('MV_LOCPAD', .F., '01')",
            "D1_DOC": "&self:oRegistro:_NumeroNotaFiscal:Text",
            "D1_UM": "&self:DePara('SAH', self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_UnidadeMedida:Text, 2, 0)",
            "D1_TES": "&SuperGetMv('MV_TESTROC', .F., '')",
            "D1_CF": "&StrTran(self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_OperacaoFiscal:Text, '.', '')",
            "D1_EMISSAO": "&DtoS( CtoD( SubStr(self:oRegistro:_DataEmissao:Text, 1, 10) ) )",
            "D1_DTDIGIT": "&DtoS( CtoD( SubStr(self:oRegistro:_DataEmissao:Text, 1, 10) ) )",
            "D1_TIPO": "D",
            "D1_FORMUL": "S",
            "D1_SERIE": "&self:oRegistro:_Serie:Text",
            "D1_TP": "&self:DePara('SAH', self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_UnidadeMedida:Text, 2, 0)",
            "D1_NFORI": "&self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_NumeroDoctoOrigem:Text",
            "D1_SERIORI": "&self:LayEstAuto('LG_SERIE', SubStr(self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_ChaveAcessoOrigem:Text, 21, 2), self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_SerieDoctoOrigem:Text, self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_SerieEquipamentoOrigem:Text,self:oRegistro:_Destinatario:Text)",
            "D1_ITEMORI": "&self:oRegistro:_Itens:_Lc_ItemNotaFiscal[nItem]:_ItemDoctoOrigem:Text"
        }
    ]
}

Com esta configuração ativa o Protheus ira executar o serviço RmiBusca e efetuar a busca das Notas de Entrada do tipo Devolução no Live Connector.

Encontrando as notas, elas serão publicadas na tabela MHQ - Publicação, para posterior Distribuição para os Assinantes deste processo.

Importante!

A regra para definir se a nota será publicada a partir do XML recebido do Live Connector será a seguinte:

tag <TipoNota> = "ENTRADA";
tag <TipoDocumento><LC_TipoDocumentoNotaFiscal><Descricao> deve conter a palavra "DEVOLUCAO" e a tag <IDDoctoOrigem> de estar preenchida.

04. DEMAIS INFORMAÇÕES

Dica!

Ative o serviço RMIBUSCA, para efetuar a busca das Notas de Entrada do tipo Devolução no Live Connector.

05. ASSUNTOS RELACIONADOS

Árvore de páginas