Re: [sqlwin] SalReportView ou SalReportPrint

[Anderson Martins]

Title: P�gina normal sem t�tulo

Bom dia,   Provavelmente o ponteiro para a childtable est� sendo setado na primeira linha durante algum evento anterior ao SAM_ReportFetchNext, talvez o SAM_ReportStart. Ao entrar no SAM_ReportFetchNext, a linha setada j� � a primeira, por�m, o ponteiro est� sendo movido para a pr�xima linha, isto �, 2.� linha e s� no final deste evento, quando � executado o "Return TRUE", � que os dados das 'input variables' s�o atualizados no Report. N�o sei como est� sua l�gica para o caminhamento dentro da ChildTable, mas vc pode usar este exemplo para evitar este problema:     !!CB!! 173 On SAM_ReportFetchNext  If SalTblFindNextRow(tblRecibo,nLinha,0,0)   Call SalTblSetContext(tblRecibo,nLinha)   Return TRUE  Else   Return FALSE � s� setar a vari�vel nLinha = TBL_MinRow antes do evento SAM_ReportFetchNext. N�o � necess�rio mais nada al�m do SalReportView ou Print para que funcione.   Espero ter ajudado.     Anderson Martins Gomes da Silva 024-3344-3575 com. 024-9831-7924 cel. ----- Original Message ----- From: Ubirajara Mattos To: [EMAIL PROTECTED] Sent: Friday, November 16, 2001 8:56 PM Subject: [sqlwin] SalReportView ou SalReportPrint Galera, aonde est� o erro da instru��o abaixo? Call SalReportView( dlgHistManut2, hWndNULL, 'c:\\fefacel\\jm2002\\Hist002.qrp', 'dlgHistManut2.tblContas.colData, dlgHistManut2.tblContas.colDiscriminacao,  dlgHistManut2.tblContas.colValor', 'iiDtContVencto, iiStDiscrimina, iiNrValorConta', lNrErro ) Isto est� no clique de um bot�o no meu dialog. Eu populo uma tabela dentro deste dialog e nela eu vejo todos os dados que desejo. Mas na hora de imprimir o primeiro registro n�o � impresso! Algume sabe como resolver isso? Por que ele pula um registro (sempre o primeiro)? SAM CREATE DA MINHA TABELA On SAM_Create  Set lNrContador = 1  Call SalTblPopulate( dlgHistManut2.tblContas, gshLeitura,  "    Select             cont_cd, cont_dt_vencto, cont_ch_descricao, cont_nr_valor, cont_cd_status     Into :colCont_cd, :colData, :colDiscriminacao, :colValor, :colStatus    From  ceucel.T_FIN_Conta    Where     cont_cd_status = 0    ORDER BY cont_dt_vencto  ASC",    TBL_FillAll )  Call SalWaitCursor( FALSE )  Set lNrContador = lNrContador + 1 Agrade�o � todos! Bira