Ponto-de-Entrada: LJ720VLFIN - Validações na finalização do processo de troca/devolução
| Versões: | Microsiga Protheus 12 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
Descrição:
Ponto de Entrada que permite efetuar validações no momento da finalização do processo de troca/devolução de mercadorias.
Programa Fonte
LOJA720.PRW
Sintaxe
LJ720VLFIN - Validações na finalização do processo de troca/devolução ( [ lCompCR ], [ nFormaDev ], [ nTpProc ], [ nNfOrig ], [ lFormul ], [ aRecSD2 ],[cTpEspecie] ) --> xRet
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência |
| lCompCR | Lógico | Indica se irá compensar o valor da NCC gerada com o título da nota fiscal original. | |||
| nFormaDev | Numérico | Define a forma de devolução ao cliente, sendo: 1- Dinheiro 2- NCC | |||
| nTpProc | Numérico | Tipo do processo, sendo: 1- Troca 2- Devolução | |||
| nNfOrig | Numérico | Opção selecionada, sendo: 1-Com NF de origem 2-Sem NF de origem | |||
| lFormul | Lógico | Indica se utilizará formulário próprio para a Nota Fiscal de Entrada. | |||
| aRecSD2 | Array | Array que contém o Recno() do produto da tabela SD2 (Itens de Venda da NF), com ele é possível obter informações da nota. | |||
cTpEspecie | Caractere | Espécie do Documento de Entrada ( documento que está sendo devolvido). |
Retorno
xRet
- (logico)
- Retorno lógico:
True (.T.) = Finaliza
False (.F.) = Não finaliza
Exemplo:
User Function LJ720VLFIN ()
// PARAMIXB[1] lCompCr
// PARAMIXB[2] nFormaDev
// PARAMIXB[3] nTpProc
// PARAMIXB[4] nNfOrig
// PARAMIXB[5] lFormul
// PARAMIXB[6] aRecSD2
// PARAMIXB[7] cEspecie
Local xRet
Local lExemplo := PARAMIXB[1]
If lExemplo
xRet := .F. // Não executará a finalização da troca\devolução
EndIf
Return xRet