Perguntas Crystal Reports x Advpl

Boa noite....

Estou desenvolvendo relatorios pelo Crystal utilizando querys do SQL. Mas não sei como inserir parametros no crystal, para os usuarios selecionarem apenas os registros definidos no filtro.

Olá mmmadureira

Eu tenho um tutorial sobre isso, pois tive que ralar para fazer a minha integração funcionar.
Bom... sua dúvida é como inserir parâmetros, então segue a resposta:

1º No Crystal Reports defina o nome de cada parâmetro que você vai utilizar com o seguinte esquema:
MV_PAR01 (para o primeiro parâmetro) e siga essa sequência para o total de parâmetros que você vai utilizar, ou seja, MV_PAR01, MV_PAR02 e MV_PAR03 se você tiver 3 parâmetros.

2º No Protheus, via Configurador, cadastre as perguntas que irão ser apresentadas ao usuários, as quais pretendem satisfazer o parâmetros definidos. IMPORTANTE: crie as perguntas na mesma ordem dos parâmetros e, defina o nome do cadastro de perguntas com o mesmo nome do arquivo .RPT que vai utilizar. Assim vai ficar mais organizado.

3º Crie uma User Function (de preferência com o mesmo no do .RPT), qual irá realizar a chamada do relatório, bem como do cadastro de perguntas. Vide exemplo abaixo:

#Include 'Protheus.ch'
#Include 'Parmtype.ch'
User Function CR0001()

local cRpt := 'cr0001' //<cRpt> = Nome do relatório do Crystal Reports

IF !Pergunte('CR0001',.T.) //chamar a pergunta criada via configurador
RETURN
ENDIF

//O MV_PARXX deverá corresponder a sequência da pergunta criada
MV_PAR01 := UPPER(MV_PAR01)

cParams := MV_PAR01
//<cParams> = Parâmetros do relatório, separados por vírgula (,) ou ponto e vírgula (.

cOptions := "1;0;1;CR0001"

CallCrys( cRpt, cParams , cOptions, .t. , .t. , .t. , .f. ) //Essa função chama o relatório e passa os parâmetros

Return .T.


Acredito que com isso você conseguirá realizar o que precisa.

Se precisar de mais detalhes é só perguntar.

Forte abraço.

att,
Maicon Macedo
Analista de TI (Protheus nível iniciante)