Páginas filhas
  • PE01NFESEFAZ - Manipulação em dados do Grupo Detalhamento da Forma de Pagamento

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Ponto de Entrada

Linha de Produto:

Microsiga Protheus.

Segmento:

Serviços

Módulo:

SIGAFAT - Faturamento

Função:

NFESEFAZ

Situação/Requisito:

Solicitação para manipular o array 'aDetPag'  no  ponto de entrada PE01NFESEFAZ dentro da chamada do rdmake NFESEFAZ.PRW

Solução/Implementação:

Incluída a  posição aNfVincRur:= PARAMIXB[16] na documentação do a array aParam a fim Ajustado no ponto de entrada PE01NFESEFAZ para manipular o array 'aDetPag'. Através deste ponto é possível realizar manipulações nos dados aDetPag"Grupo Detalhamento da Forma de Pagamento Forma de pagamento, Valor do Pagamento e Troco.

Ponto de entrada em questão: PE01NFESEFAZ

Exemplo ponto de entrada:


#Include 'Protheus.ch'
User Function PE01NFESEFAZ()
Local aProd     := PARAMIXB[1]
Local cMensCli  := PARAMIXB[2]
Local cMensFis  := PARAMIXB[3]
Local aDest     := PARAMIXB[4] 
Local aNota     := PARAMIXB[5]
Local aInfoItem := PARAMIXB[6]
Local aDupl     := PARAMIXB[7]
Local aTransp   := PARAMIXB[8]
Local aEntrega  := PARAMIXB[9]
Local aRetirada := PARAMIXB[10]
Local aVeiculo  := PARAMIXB[11]
Local aReboque  := PARAMIXB[12]
Local aNfVincRur:= PARAMIXB[13]
Local aEspVol   := PARAMIXB[14]
Local aNfVinc   := PARAMIXB[15]
Local AdetPag   := PARAMIXB[16]
Local aRetorno  := {}
Local cMsg      := ""

aadd(aRetorno,aProd) 
aadd(aRetorno,cMensCli)
aadd(aRetorno,cMensFis)
aadd(aRetorno,aDest)
aadd(aRetorno,aNota)
aadd(aRetorno,aInfoItem)
aadd(aRetorno,aDupl)
aadd(aRetorno,aTransp)
aadd(aRetorno,aEntrega)
aadd(aRetorno,aRetirada)
aadd(aRetorno,aVeiculo)
aadd(aRetorno,aReboque)
aadd(aRetorno,aNfVincRur)
aadd(aRetorno,aEspVol)
aadd(aRetorno,aNfVinc)

// Ajuste na aDetPag
AdetPag  := {}

aadd(aDetPag,;
				{"14",;// Forma de pagamento
				 470.00,;// Valor do Pagamento
				0.00})//Troco
aadd(aDetPag,;
				{"01",;// Forma de pagamento
				550.00,;// Valor do Pagamento
				20.00})//Troco
				
aadd(aRetorno,aDetPag)
RETURN aRetorno

Return

Chamados relacionados:

DSERTSS1-6281

 Versão/Release:

12.1.17 e 11.80