Abrangências: | Microsiga Protheus 10 |
Versões: | Microsiga Protheus 10 |
Compatível Países: | Argentina |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Espanhol , Inglês |
Ponto de Entrada, exclusivo para a Argentina, executado em facturas e remitos de entrada, sempre ao passar pelos campos Cod. fornecedor / loja e província de entrega do cabeçalho, permitindo ao usuário decidir se a rotina alterará ou não automaticamente as províncias de entrega dos itens com a província de entrega do cabeçalho.
Chamado em duas funções:
1) AtuCliFor( ) - (Validação do campo F1_FORNECE / F1_LOJA - Atualiza o código do cliente ou fornecedor e da loja nos itens, quando passa pelo campo no cabeçalho), executado antes da atualização da província de entrega nos itens do aCols..
2) LocProvent() - (Validação para M->F1_PROVENT - província de entrega do cabeçalho), executado antes da atualização da província de entrega nos itens do aCols.
LOCXNF.PRW
LOCXPE55 - Altera provincia de entrega do cabeçalho ( [ ParamIxb[1] ], [ ParamIxb[2] ], [ ParamIxb[3] ] ) --> ExpL
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
ParamIxb[1] | Caracter | Contém o nome da variável de memória , indicando o campo posicionado no momento. | |||||||||||||||
ParamIxb[2] | Array of Record | Província de entrega anterior.Caso ParamIxb[1] seja igual a M->F1_PROVENT, M->F1_LOJA, M->F2_PROVENT ou M->F2_LOJA, então esse parâmetro será igual ao ParamIxb[3] (Província atual). | |||||||||||||||
ParamIxb[3] | Array of Record | Província de entrega do fornecedor (ou atual), que será atualizada nos itens do aCols, caso o Ponto de Entrada retorne .T. |
-
ExpL(logico)
- Deve retornar um valor lógico, sendo:.T. = atualiza os itens do aCols com a nova província do cabeçalho..F. = não atualiza.
A província de entrega informada no cabeçalho é inicialmente carregada do fornecedor e pode ser alterada para outra, assim como os itens da factura ou remito também podem ter províncias distintas em relação à do cabeçalho.
User Function LOCXPE55()Local cCampo := ParamIxb[1] // Variável do cabeçalho sendo editada Local cProvAnt := ParamIxb[2] // Provincia anterior do cabeçalho/proveedorLocal cProvAtu := ParamIxb[3] // Provincia atual do cabeçalho/proveedorLocal lRet := .T.If "_PROVENT"$cCampo .OR. "_FORNECE"$cCampo .OR. "_LOJA"$cCampo lRet := .F.EndIfReturn lRet
Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
Array of Record | Global | Não |