Ilustre Manuel Jorge,
Penso que o que segue lhe ajudará a resolver o seu problema:
Sample code
Code: Select all
Call SalListQueryText( lb1, SalListQuerySelection( lb1 ), sSearch )
Call SalMessageBox("Just a TEST using litteral FKB in the where
clause... it is OK","info",0)
Set sSelect = "SELECT employee_id, first_name, last_name, photo
FROM employee
INTO :dfsEMPLOYEE_ID, :dfsFIRST_NAME,
:dfsLAST_NAME, :lPhoto
WHERE employee_id = 'FKB' "
!!Bind position okay for this fetch. Here it works before the
SqlPrepareAndExecute call. Not calling
!!at all SqlSetLongBindDatatype() will fail in TD 5.1, not in
previous TD versions
Call SqlSetLongBindDatatype( 4,23 )
Call SqlPrepareAndExecute( hSql, sSelect )
If SqlFetchNext( hSql, nFetch )
Call SalPicSetString( pic1, PIC_FormatObject, lPhoto )
Call SalMessageBox("Now problem searching with BIND variable, you
selected to search photo of :" || sSearch,"info",0)
Set sSelect = 'SELECT employee_id, first_name, last_name, photo
FROM employee
INTO :dfsEMPLOYEE_ID, :dfsFIRST_NAME,
:dfsLAST_NAME, :lPhoto
WHERE employee_id = :sSearch '
!!You must call SqlSetLongBindDatatype for the fetch operation and
this needs to be done just before SqlFetchNext
!!In previous versions this was necessary for the select only
!!Calling SqlSetLongBindDatatype here, before the
SqlPrepareAndExecute() will not work
! Call SqlSetLongBindDatatype(4,23 )
Call SqlPrepareAndExecute( hSql, sSelect )
! Here it does. This is now as-designed
Call SqlSetLongBindDatatype(4,23 )
If SqlFetchNext( hSql, nFetch )
Call SalPicSetString( pic1, PIC_FormatObject, lPhoto )
Cumprimentos,
Josue Santana
From: mjorg...@hotmail.com
To: sqlwin@virtualand.net
Subject: [sqlwin] Reporte Builder 5.1
Date: Thu, 4 Jun 2009 07:08:40 +0000
Caros Ceturiões,
Uso atualmente o centura 5.1 e a minha dificuldade prende-se com o facto de não
poder
fazer impressão de campos TEXT (SQL SERVER), devo informar que com o 2.1 fazia
bem ...
pergunto ? alguém pode ajudar ?
Cumprimentos,
Jorge DC
_________________________________________________________________
Novo Internet Explorer 8. Baixe agora, é grátis!
http://brasil.microsoft.com.br/IE8/mergulhe/?utm_source=MSN%3BHotmail&utm_medium=Tagline&utm_campaign=IE8
