Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Wiki Markup
||Descrição|| O ponto de entrada F050TMP1 permite efetuar o rateio customizado. Este ponto de entrada substituiu o uso dos pontos de entrada F050TMP2 e F050TMP3.  
||Observações|| O Ponto de Entrada está presente nas funções F050EscRat (definindo se é rateio ou pré-configurado) e CtbRatFin (rateio de Contas a Pagar no Contabilidade Gerencial(SIGACTB). Entre as variáveis que irão pelo parâmetro, a última variável nOpRat é muito importante na utilização correta para este Ponto. Ao executar pela função F050EscRat  a variável nOpRat contém 1 e  ao executar pela função CtbRatFin a variável nOpRat contém 2.

 
Caso o Ponto de entrada seja executado pela função F050EscRat e seja necessário abrir a tela de opções de rateio, ao incluir manualmente este deve retornar a posição 2, ou seja, um valor maior ou igual a 1. para que nao abra a tela, e retorne o valor zero na posição 2 do array de retorno é a função aRet .
Caso o ponto de entrada não for compilado, a tela de opção de rateio sempre é executada, caso a inclusão tenha sido manual.
 
Realizada alteracao do alias "TMP1" para "TMP" para a rotina de rateio.	
||Exemplos||#include "protheus.ch"
#include "rwmake.ch"
User Function F050TMP1()
Local nOrig := ParamIxb\[9\]
If nOrig == 2 //Chamada pela CTBRATFIN  	
Reclock("TMP",.T.)//Alteração do alias "TMP1" para "TMP" para a rotina de rateio	
CTJ_DEBITO:="1"                        	
CTJ_PERCEN:=100      	
CTJ_VALOR:=3000	
CTJ_HIST:="PONTO DE ENTRADA F050TMP1, ITEM001!"+TIME()  	
CTJ_FLAG:=.F.	
MSUNLOCK()
ElseIf nOrig == 1 //Chamada pela função F050ESCRAT	//Codigo customizado		
EndIf       
Return(\{\3000,1\}\) //\{\Valor do Rateio,Flag com a tela de opções do rateio}
||Preview|| 
||Veja também|| 
||\}\
||Idioma|| Português(Brasil)
||Versões|| Microsiga_Protheus10_e_Microsiga_Protheus11
||Sistemas Operacionais Suportados||Todos
||Compatível com as Bases de Dados||Todas
||Updates|| 
||Parâmetros|| ParamIxb	:= Array contendo a seguinte 
estrutura \[1\] = Tipo Digitado/Pré-configurado 
(numérico)\[2\] = Cód. Rateio 
(caracter)\[3\] = Programa/Rotina 
(caracter)\[4\] = Lançamento padrão 
(caracter)\[5\] = Conta débito 
(caracter)\[6\] = Conta crédito 
(caracter)\[7\] = Histórico 
(caracter)\[8\] = Rotina automática 
(lógico)  \[9\] = Origem se igual 1 - F050ESCRAT, se igual 2 - CTBRATFIN (numérico)
||Retorno|| aRet(array_of_record)
Retorno em forma de array no seguinte esquema:
aRet\[1\] = Valor de rateio customizado.
aRet\[2\] = Flag para abrir a tela de opções de rateio (maior que zero exibe tela de rateio).
||Eventos de chamada do Ponto de Entrada|| 
||Variáveis|| 
||Programa Fonte|| FINA050.PRX