Árvore de páginas

Versões comparadas

Chave

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

...

02. EXEMPLO DE UTILIZAÇÃO

Ponto de Entrada CTB231PR

Bloco de código
languagejs
titleCT030BUTCTB231PR
//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      := ""  

If nOper = 1
    cMsg    := "A função chamadora é a de saldo inicial"
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 

...