Árvore de páginas

Versões comparadas

Chave

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



ÍNDICE

  1. Visão Geral;
  2. Parâmetros;
  3. Retorno;
  4. 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
titleObservação

Este ponto de entrada é executado antes da efetivação do lançamento contábil.

02. PARÂMETROS

Parâmetro

Tipo

Descrição

Obrigatório

PARAMIXB[1]ArrayLinha posicionada do aColsSim
PARAMIXB[2]CaractereNumero da opção executadaSim
Informações
titleObservação

 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

Este ponto de entrada não possuí retorno.

04. EXEMPLO


Bloco de código
languagejs
titleAF251GRV
linenumberstrue
#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()



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("Ponto de Entrada AF251GRV Executado")

Return Nil