Exibir origem

import.css=/download/attachments/327912/newLayout.css

Ponto-de-Entrada: TMKVPA

Abrangências:	Microsiga Protheus 10
Versões:	Microsiga Protheus 10
Compatível Países:	Todos
Sistemas Operacionais:	Todos
Compatível às Bases de Dados:	Todas TotvsDbAccess
Idiomas:	Espanhol , Inglês

Descrição:

O ponto de entrada TMKVPA é executado na substituição da tela de condição de pagamento. O objetivo é substituir a rotina de condição do pagamento do sistema. Esse ponto foi mantido apenas para compatibilização de versão (o uso dever ser avaliado pela equipe suporte autorizada pela TOTVS).

Programa Fonte

TMKA273C.PRW

Sintaxe

TMKVPA ( < aValores> , < aObj> , < aItens> , < cCodPagto> , < oCodPagto> , < cDescPagto> , < oDescPagto> , < cCodTransp> , < oCodTransp> , < cTransp> , < oTransp> , < cCob> , < oCob> , < cEnt> , < oEnt> , < cCidadeC> , < oCidadeC> , < cCepC> , < oCepC> , < cUfc> , < oUfc> , < cBairroE> , < oBairroE> , < cBairroC> , < oBairroC> , < cCidadeE> , < oCidadeE> , < cCepE> , < oCepE> , < cUfe> , < oUfe> , < nLiquido> , < oLiquido> , < nTxJuros> , < oTxJuros> , < nTxDescon> , < oTxDescon> , < aParcelas> , < oParcelas> , < nEntrada> , < oEntrada> , < nFinanciado> , < oFinanciado> , < nNumParcelas> , < oNumParcelas> , < nVlJur> , < nOpc> , < cNumTlv> , < cCliente> , < cLoja> , < cCodCont> , < CCodOper> , < cCliAnt> , < lTLVReg> ) --> lReturn

Parâmetros:

Nome

Tipo

Descrição

Default

Obrigatório

Referência

aValores

Array of Record

Array com os valores dos campos totais

X

aObj

Array of Record

Array com os objetos dos campos totais

X

aItens

Array of Record

Dados complementares da parcela

X

cCodPagto

Caracter

Variável para a condição de pagamento

X

oCodPagto

Objeto

Objeto da condição de pagamento

X

cDescPagto

Caracter

Descrição da condição de pagamento

X

oDescPagto

Objeto

Objeto para a descrição de pagamento

X

cCodTransp

Caracter

Variável para o objeto do código da transportadora

X

oCodTransp

Objeto

Objeto do código da transportadora

X

cTransp

Caracter

Variável para o objeto da descrição da transportadora

X

oTransp

Objeto

Objeto da descrição da transportadora

X

cCob

Caracter

Variável para o objeto do endereço de cobrança

X

oCob

Objeto

Objeto do endereço de cobrança

X

cEnt

Caracter

Variável para o objeto do endereço de entrega

X

oEnt

Objeto

Objeto para o endereço de entrega

X

cCidadeC

Caracter

Variável para o objeto da cidade de cobrança

X

oCidadeC

Objeto

Objeto para a cidade de cobrança

X

cCepC

Caracter

Variável para o objeto do CEP de cobrança

X

oCepC

Objeto

Objeto para o CEP de Cobrança

X

cUfc

Caracter

Variável para o objeto do estado de cobrança

X

oUfc

Objeto

Objeto do estado de cobrança

X

cBairroE

Caracter

Variável para o objeto do bairro de entrega

X

oBairroE

Objeto

Objeto do bairro de entrega

X

cBairroC

Caracter

Variável para o objeto do bairro de cobrança

X

oBairroC

Objeto

Objeto para o bairro de cobrança

X

cCidadeE

Caracter

Variável para o objeto da cidade de entrega

X

oCidadeE

Objeto

Objeto da cidade de entrega

X

cCepE

Caracter

Variável para o objeto do CEP de entrega

X

oCepE

Objeto

Objeto do CEP de entrega

X

cUfe

Caracter

Variável para o objeto do estado de entrega

X

oUfe

Objeto

Objeto do estado de entrega

X

nLiquido

Numérico

Variável para o objeto do valor líquido

X

oLiquido

Objeto

Objeto do valor líquido

X

nTxJuros

Numérico

Variável para o objeto do valor percentual dos juros da condição

X

oTxJuros

Objeto

Objeto do valor percentual dos juros da condição

X

nTxDescon

Caracter

Variável para o objeto do valor percentual do desconto da condição

X

oTxDescon

Objeto

Objeto do desconto da condição

X

aParcelas

Caracter

Array com o valor das parcelas e a forma de pagamento

X

oParcelas

Objeto

Objeto para o valor das parcelas

X

nEntrada

Numérico

Variável para o objeto do valor da entrada

X

oEntrada

Objeto

Objeto do valor da entrada

X

nFinanciado

Caracter

Valor financiado de acordo com a condição

X

oFinanciado

Objeto

Objeto do valor financiado de acordo com a condição

X

nNumParcelas

Numérico

Variável para o objeto do total de parcelas

X

oNumParcelas

Objeto

Objeto para o total de parcelas

X

nVlJur

Numérico

Variável para o objeto do valor dos juros da condição de pagamento

X

nOpc

Numérico

Opção de menu selecionada

X

cNumTlv

Caracter

Número do atendimento do televendas

X

cCliente

Caracter

Código do cliente

X

cLoja

Caracter

Loja do cliente

X

cCodCont

Caracter

Código do contato

X

CCodOper

Caracter

Código do operador

X

cCliAnt

Array of Record

Codigo do Cliente + Loja

X

lTLVReg

Array of Record

Controle de validacao da regra de negócios.

X

Retorno

lReturn

Retorno lógico.

Exemplos

#INCLUDE "PROTHEUS.CH"User Function TMKVPA(	aValores		,aObj			,aItens			,cCodPagto		,;						oCodPagto		,cDescPagto		,oDescPagto	,	cCodTransp		,;						oCodTransp		,cTransp		,oTransp		,cCob			,;						oCob			,cEnt			,oEnt			,cCidadeC		,;						oCidadeC		,cCepC			,oCepC			,cUfC			,;						oUfC			,cBairroE		,oBairroE		,cBairroC		,;						oBairroC		,cCidadeE		,oCidadeE		,cCepE			,;						oCepE			,cUfE			,oUfE			,nLiquido		,;						oLiquido		,nTxJuros		,oTxJuros		,nTxDescon		,;						oTxDescon		,aParcelas		,oParcelas		,nEntrada		,;						oEntrada		,nFinanciado	,oFinanciado	,nNumParcelas	,;						oNumParcelas	,nVlJur			,nOpc			,cNumTlv		,;						cCliente		,cLoja			,cCodCont		,cCodOper		,;						cCliAnt        ,lTLVReg)Local lRet := .T.	Return lRet