Histórico da Página

//P_E**************************************************************************************
//P_E - Ponto de entrada utilizado para editar query da seleção dos dados de origem
//P_E - 01 parâmetro - recebe a query que já foi filtrada pela rotina padrão
//P_E - 02 parâmetro - recebe a indicação de qual função esta chamando o PE
//P_E - 				1 - chamada pela função de saldos iniciais
//P_E - 				2 - chamada pela função de processamento da consolidação
//P_E****************************************************************************************
 
User Function CTB231PR()

Local cSQLPE    := ParamIxb[1]
Local nOper     := ParamIxb[2] //Identificação da função que esta chamando, para que seja possível realizar as tratativas em separado.
Local cMsg     
cSQLPE := "" cSQLPE 
 
MsgAlert(+nOper+": Se 
If nOper = 1, significa que a
    cMsg    := "A função chamadora é a de saldo inicial, se 2"
Else
    cMsg    := "A função chamadora é a de processamento da aglutinação")  
 
Endif

//Atribuindo a variável da nova query a query oriunda do fonte principal.
cSQLPE := cSQLPE
 
//Retornando a query em branco, para garantir que não irá ocorrer erro.
//cSQLPE := " "

//Atribuindo novas informações a query 
//cSQLPE += "declare @dtlp1	char(8)"

Alert(cMsg)

Return cSQLPE