Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Produto:

TOTVS Varejo Lojas

Linha de Produto:

Linha Protheus

Segmento:

Varejo

Módulo:SIGALOJA - Controle de Lojas
Função:Venda Assistida
País:Brasil
Ticket:Não há.
Issue:DVARLOJ1-6961

02. SITUAÇÃO/REQUISITO

Houve a necessidade de avaliar a gravação do token em todos os serviços, para não atualizar o token caso esteja valido.

Identificado tratamento de exceção na gravação da mensagem tratada para execauto na MHQ_MENSAG.

Criação de uma função que retornará o numero do documento com base na serie, já existe uma função utilizada no SIGALOJA porem o dado é retornado em um parâmetro e por referencia, assim, impossibilitando o uso no layout.

03. SOLUÇÃO

Feito ajuste nos serviços no BUSCA, ENVIA e STATUSLIVE para atualizar apenas quando o token vencer.

Tratado a exceção na gravação da mensagem no campo MHQ_MENSAG.

Criado método para retornar o numero de documento com base na serie recebida pelo TOTVS VAREJO FRANQUIAS E REDES.

Layout de Publicação - Nota de Entrada
{
	"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": "&Iif(Val(self:oRegistro:_NumeroNotaFiscal:Text) == 0, self:getNumNota(self:oRegistro:_Serie:Text), 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": "&Iif(Val(self:oRegistro:_NumeroNotaFiscal:Text) == 0, self:getNumNota(self:oRegistro:_Serie:Text), 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"
		}
	]
}

04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS