Titulo variável e período

[PennoilTech_VB]

Caros,

estou com 2 (RESOLVI 1) problemas no Crystal e depois de muito ler e tentar resolver, decidi solicitar ajuda.

Foi solicitado a mim, que alterasse um relatório (Crystal 9) de um sistema (Visual Basic 6) que funciona aqui na empresa.

A alteração era que: o usuário pudesse determinar o periodo e que o período aparecesse no cabeçalho do relatório.

Na View (Oracle) que o relatório utiliza, tem um campo (Data), de onde selecionarei o período.

"{@Titulo} = " & strTitulo (PS.: acabei de encontrar o problema. Faltava sinalizar que era texto. Ficou assim: "{@Titulo} = '" & strTitulo & "' ")

Problemas:

1. Quando passo número para um campo "Formula Fields", que chamo de Título do Relatório, ele funciona, mas, se passo alfanumérico, nada feito. Retorna o erro "The remaining text does not appear to be part of the formula".

RESOLVIDO!

2. Quanto ao período: Tenho que passar um segunda condição além do período. Quando passo "{VW_CYCLETIME.ID_DOCUMENTO} <> 6" , funciona, mas quando passo:

" {VW_CYCLETIME.dt_liberacao_sap} >= #" & Format(txtFIM, "YYYY,MM,DD") & "# AND " &

" {VW_CYCLETIME.dt_liberacao_sap} <= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &

" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

Não funciona! Já tentei também:

" {VW_CYCLETIME.dt_liberacao_sap} >= DATE('" & Format(txtINI.Text, "dd/mm/yyyy") & "', 'DD/MM/YYYY') AND " &

" {VW_CYCLETIME.dt_liberacao_sap} <= DATE('" & Format(txtFIM, "dd/mm/yyyy") & "', 'DD/MM/YYYY')"

" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

e

" {VW_CYCLETIME.dt_liberacao_sap} >= DATE(" & Format(txtFIM, "YYYY,MM,DD") & ") AND " &

" {VW_CYCLETIME.dt_liberacao_sap} = Date(" & Format(txtFIM, "YYYY/MM/DD") & ") AND "

" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

e nada!!!

Obrigado,

Marco.

[kuroi]

1. Quando passo número para um campo "Formula Fields", que chamo de Título do Relatório, ele funciona, mas, se passo alfanumérico, nada feito. Retorna o erro "The remaining text does not appear to be part of the formula".

beleza q já resolveu, mas tem o campo especial Report Title q você podia usar q ficaria bem mais facil.

e com campo parametro tb ficaria mais facil.

2. Quanto ao período: Tenho que passar um segunda condição além do período. Quando passo "{VW_CYCLETIME.ID_DOCUMENTO} <> 6" , funciona, mas quando passo:

" {VW_CYCLETIME.dt_liberacao_sap} >= #" & Format(txtFIM, "YYYY,MM,DD") & "# AND " &

" {VW_CYCLETIME.dt_liberacao_sap} <= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &

" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

Não funciona! Já tentei também:

" {VW_CYCLETIME.dt_liberacao_sap} >= DATE('" & Format(txtINI.Text, "dd/mm/yyyy") & "', 'DD/MM/YYYY') AND " &

" {VW_CYCLETIME.dt_liberacao_sap} <= DATE('" & Format(txtFIM, "dd/mm/yyyy") & "', 'DD/MM/YYYY')"

" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

e

" {VW_CYCLETIME.dt_liberacao_sap} >= DATE(" & Format(txtFIM, "YYYY,MM,DD") & ") AND " &

" {VW_CYCLETIME.dt_liberacao_sap} = Date(" & Format(txtFIM, "YYYY/MM/DD") & ") AND "

" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

e nada!!!

não funciona mais o q acontece de errado?? qual a mensagem de erro q aparece??

tente esse:

" {VW_CYCLETIME.dt_liberacao_sap} >= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &
" {VW_CYCLETIME.dt_liberacao_sap} <= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &
" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "[/code]

se não for, então posta a mensagem de erro ai.
mas o campo dt_liberacao_sap é do tipo data ne??
se for string, então você teria q converter. tipo assim:
[code]" CDate({VW_CYCLETIME.dt_liberacao_sap}) >= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &
" CDate({VW_CYCLETIME.dt_liberacao_sap}) <= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &
" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

[Leandro_Pirozzi]

Estou de olho aqui, porque não consigo por período no meu relatório nem a pals.

hehhe...

[kuroi]

leandro você fala do otro tópico la??

então, é o marcio falou, o codigo dele deve funcionar. mas você não precisa converter pra datetime. pode converter so pra date e passar so a data, não precisa da hora.

veja ai o q você consegue, qualquer coisa poste la no tópico, beleza??

[PennoilTech_VB]

1. Quando passo número para um campo "Formula Fields", que chamo de Título do Relatório, ele funciona, mas, se passo alfanumérico, nada feito. Retorna o erro "The remaining text does not appear to be part of the formula".

beleza q já resolveu, mas tem o campo especial Report Title q você podia usar q ficaria bem mais facil.

e com campo parametro tb ficaria mais facil.

2. Quanto ao período: Tenho que passar um segunda condição além do período. Quando passo "{VW_CYCLETIME.ID_DOCUMENTO} <> 6" , funciona, mas quando passo:

" {VW_CYCLETIME.dt_liberacao_sap} >= #" & Format(txtFIM, "YYYY,MM,DD") & "# AND " &

" {VW_CYCLETIME.dt_liberacao_sap} <= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &

" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

Não funciona! Já tentei também:

" {VW_CYCLETIME.dt_liberacao_sap} >= DATE('" & Format(txtINI.Text, "dd/mm/yyyy") & "', 'DD/MM/YYYY') AND " &

" {VW_CYCLETIME.dt_liberacao_sap} <= DATE('" & Format(txtFIM, "dd/mm/yyyy") & "', 'DD/MM/YYYY')"

" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

e

" {VW_CYCLETIME.dt_liberacao_sap} >= DATE(" & Format(txtFIM, "YYYY,MM,DD") & ") AND " &

" {VW_CYCLETIME.dt_liberacao_sap} = Date(" & Format(txtFIM, "YYYY/MM/DD") & ") AND "

" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

e nada!!!

não funciona mais o q acontece de errado?? qual a mensagem de erro q aparece??

tente esse:

" {VW_CYCLETIME.dt_liberacao_sap} >= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &
" {VW_CYCLETIME.dt_liberacao_sap} <= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &
" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

se não for, então posta a mensagem de erro ai. mas o campo dt_liberacao_sap é do tipo data ne?? se for string, então você teria q converter. tipo assim:

" CDate({VW_CYCLETIME.dt_liberacao_sap}) >= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &
" CDate({VW_CYCLETIME.dt_liberacao_sap}) <= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &
" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

Cara VALEU MESMO!!! Vou tentar as outras formas no próximos relatórios; Quanto ao segundo problema, funcionou com a segunda forma:

" CDate({VW_CYCLETIME.dt_liberacao_sap}) >= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &
" CDate({VW_CYCLETIME.dt_liberacao_sap}) <= #" & Format(txtFIM, "YYYY/MM/DD") & "# AND " &
" {VW_CYCLETIME.ID_DOCUMENTO} <> 6 "

Brigadão!!!