Click to See Complete Forum and Search --> : Crystal Reports 8.5 - Suppress Statement Help


jeffsturgeon2002
March 26th, 2008, 11:40 AM
I am buidling a test order form in Crystal 8.5

In the form, I have embedded 30 signatures (tif files) on the page header a. Each signature (tif image) has a suppress statement built for the users distinct PVID #.

Example of one below:
(
{USRINFO.PVID}<> 1436454844000600
)

Essentially, each image should suppress if the PVID does not match, otherwise the one distinct signature should print. The only way I can seem to get the signature to print though is if I change the image suppress statement to:

(
not({USRINFO.PVID}<> 1436454844000600)
)

but when I do this, all the signatures bleed into the next and it does not suppress correctly.

I tried re-setting the page before on the Group USERINFO.PVID, but that doesnt seem to help either.

Section Expert:

Report Header
Page Header
Page Header a
Page Header b
Page Header c
Page Header d
Page Header e
Group Header #1: USERINFO.PVID -A
Group Header #2: ORDERS.CODE -A
Group Header #3: ORDERS.ORDERID -A
Group Header #4: ORDER_ENTRY_MODIFIERS.ORDERID-A
Details
Group Footer #4: ORDER_ENTRY_MODIFIERS.ORDERID-A
Group Footer #3: ORDERS.ORDERID -A
Group Header #3a: ORDERS.ORDERID -A
Group Header #3b: ORDERS.ORDERID -A
Group Header #2: ORDERS.CODE -A
Group Header #2a: ORDERS.CODE -A
Group Header #2b: ORDERS.CODE -A
Group Header #1: USERINFO.PVID -A
Page Footer
Report Footer

dglienna
March 26th, 2008, 11:52 AM
Try a SELECT CASE statement instead:

Dim crFormula As CRAXDRT.FormulaFieldDefinition
Dim crParam As CRAXDRT.ParameterFieldDefinition

crReport.DiscardSavedData

For Each crParam In crReport.ParameterFields
Select Case crParam.Name
Case "{?SortType}"
crParam.AddCurrentValue m_strSortType

End Select
Next crParam


For Each crFormula In crReport.FormulaFields
Select Case crFormula.Name
Case "{@StartDate}"
crFormula.Text = "DATE( 2001, 01, 01)"
Case "{@EndDate}"
crFormula.Text = "DATE( 2002, 03, 30)"
crFormula.Text = """All Offices"""
Case "{@DetailOrSummaryFlag}"
crFormula.Text = """" & m_strSummaryDetailFlag & """"
Case "{@Seperate}"
crFormula.Text = """FALSE"""
Case "{@SetShowWarning}"
crFormula.Text = """FALSE"""
Case Else
' do nothing
End Select
Next crFormula

jeffsturgeon2002
March 26th, 2008, 11:59 AM
dglienna -

Where would I enter this?

dglienna
March 26th, 2008, 01:31 PM
In the header. Just set the value equal to the image for the correct #

then, you could always print the one signature where you wanted it.

call it Sig$ or something

dglienna
March 26th, 2008, 01:33 PM
Something like this:


Select Case {USRINFO.PVID}
Case 1436454844000600
str = mypic(pvid)
case else
'
end select