Árvore de páginas

Versões comparadas

Chave

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

...

Portuguese

Pagetitle
LJ720VLFIN - Validações na finalização do processo de trocadevolução
LJ720VLFIN - Validações na finalização do processo de trocadevolução

Ponto-de-Entrada: LJ720VLFIN - Validações na finalização do processo de troca/devolução


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


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:


NomeTipoDescriçãoDefaultObrigatórioReferência
lCompCRLógicoIndica se irá compensar o valor da NCC gerada com o título da nota fiscal original.


nFormaDev
Array of Record
NuméricoDefine a forma de devolução ao cliente, sendo:
1- Dinheiro
2- NCC



nTpProc
Array of Record
NuméricoTipo do processo, sendo:
1- Troca
2- Devolução



nNfOrig
Array of Record
NuméricoOpção selecionada, sendo:
1-Com NF de origem
2-Sem NF de origem



lFormul
Array of Record
LógicoIndica se utilizará formulário próprio para a Nota Fiscal de Entrada.


aRecSD2Array
of Record
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


CaractereEspé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: Exemplos

User

Function

LJ720VLFIN

(

lCompCR, nFormaDev, nTpProc, nNfOrig, lFormul, aRecSD2)

)
//

PARAMIXB[1]

lCompCr

lCompCr
//

PARAMIXB[2]

nFormaDev
//

PARAMIXB[3]

nTpProc
//

PARAMIXB[4]

nNfOrig
//

PARAMIXB[5]

lFormul


//

PARAMIXB[6]

aRecSD2Local xRetLocal lExemplo :=

aRecSD2
// PARAMIXB[7] cEspecie

Local xRet
Local lExemplo := PARAMIXB[1]

If

lExemplo


xRet

:=

.F.

//

Não

executará

a

finalização

da

troca\

devoluçãoEndIfReturn xRet

devolução

Variáveis

EndIf

Return xRet

NomeTipoEscopoPode AlterardescriçãoArray of RecordGlobalNão