Histórico da Página
ÍNDICE
- Visão Geral;
- Parâmetros;
- Retorno;
- Exemplo de utilização;
01. VISÃO GERAL
...
O ponto de entrada AF251GRV possibilita efetuar alterações após a gravação de Aquisição por Transferência (ATFA251).
Informações |
---|
...
| ||
Este ponto de entrada é executado antes da efetivação do lançamento contábil. |
...
Exemplos
No Ponto de Entrada AF251GRV são enviados dois parâmetros, o primeiro contém as informações do aCols(linha dos ativos) posicionado na transação, o segundo contém a informação da ação executada que pode ser:
0 - Transfere
1 - Detalhar
2 - Agrupar
3 - Canc. Transf
...
02. PARÂMETROS
Parâmetro | Tipo | Descrição | Obrigatório |
---|---|---|---|
PARAMIXB[1] | Array | Linha posicionada do aCols | Sim |
PARAMIXB[2] | Caractere | Numero da opção executada | Sim |
Informações | ||
---|---|---|
| ||
A variável aCols possui o escopo Private e é declarada na função principal (ATFA251), assim, pode ser utilizada no Ponto de Entrada AF251GRV. |
03. RETORNO
Exemplo de utilização:
Este ponto de entrada não possuí retorno.
04. EXEMPLO
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE |
...
"PROTHEUS.CH" |
...
/* |
...
Ponto de entrada antes da efetivação do lançamento contábil |
...
Parâmetros: |
...
PARAMIXB[1] //Linha posicionada do aCols |
...
PARAMIXB[2] //Opcao executada: "0" = Transfere / "1" = Detalhar / "2" = Agrupar / "3" = Canc. Transf. |
...
*/ |
...
User Function AF251GRV()
...
User Function AF251GRV() Local aColsAux := PARAMIXB[1] Local cOpcao := PARAMIXB[2] Local nLinha := aScan(aCols, {|x| |
...
x[1] == |
...
aColsAux[1]}) |
...
// |
...
Opcao executada If cOpcao == "0" |
...
Conout(" |
...
Executada opcao Transfere") |
...
ElseIf cOpcao == "1" |
...
Conout(" |
...
Executada opcao Detalhar") |
...
ElseIf cOpcao == "2" |
...
Conout(" |
...
Executada opcao Agrupar") |
...
ElseIf cOpcao == "3" |
...
Conout(" |
...
Executada opcao Cancelar Transferencia") |
...
EndIf |
...
Conout(" |
...
Linha posicionada no aCols: " + |
...
CValToChar(nLinha)) // |
...
Linha posicionada Conout(" |
...
Return Nil
...
Idioma
...
Português(Brasil)
...
Versões
...
Microsiga_Protheus12
...
Sistemas Operacionais Suportados
...
Todos
...
Compatível com as Bases de Dados
...
Todas
...
Parâmetros
...
PARAMIXB[1] //Linha posicionada do aCols
PARAMIXB[2] //Opcao executada
...
Retorno
...
Nil
...
Programa Fonte
...
Ponto de Entrada AF251GRV Executado")
Return Nil |