Eliminate SIgn On Prompt in Crystal Reports

I am calling several Crystal Reports using an ActiveX Control from within LANSA and using an ODBC connection to the iSeries.  

Crystal Reports 8.5
CRViewer.8.0
The CR .dll is pdsodbc.dll.
The ODBC Driver is iSeries Access ODBC Driver v. 9.0 CWBODBC.DLL
iSeries is V5R3.
Windows XP
LANSA V 11.3

The problem is that when someone other than myself brings up the report, a signon is required.  It's the signon to the iSeries and it prompts with my user id.  There are several buttons to click on different reports and it does the same thing every time a report is opened.  There is one button that generates a pdf for each of the reports and every time the report is 'opened' to create the pdf a signon is required. Every time my user id is the default.  I can sign on from anywhere and if it's someone else's machine it prompts me only one time for the signon, and not at all from my laptop.  

I've tried going to the iSeries Navigator and ensuring the properties for the connection use the default user, which I enter as the user's 400 signon.  I've set up the ODBC Connection Options in ODBC Administrator to use the iSeries Navigator default and connection.  

What I see (and another programmer has the same issue with his user ID being the default) is that the user ID is somehow embedded in CR.  If I look at Set Location under Database in CR, the User ID is mine.

I've tried to include the pertinent pieces of code.

Please see the attached file for screen shots.

Start Free Trial

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:

DEFINE_COM CLASS(#CRYSTAL.IReport) NAME(#LbrRpt) REFERENCE(*DYNAMIC)
DEFINE_COM CLASS(#CRYSTAL.iParameterFieldDefinition) NAME(#ParmField) REFERENCE(*Dynamic)
DEFINE_COM CLASS(#CRYSTAL.ParameterValue) NAME(#RptParms) REFERENCE(*Dynamic)
DEFINE_COM CLASS(#CRYSTAL.Application) NAME(#CRY05) REFERENCE(*DYNAMIC)
DEFINE_COM CLASS(#CRYSTAL.IExportOptions) NAME(#MYEXPORT) REFERENCE(*DYNAMIC)
DEFINE_COM CLASS(#CRSTLVWR.CRViewer) NAME(#CRSTLVWR) DISPLAYPOSITION(1) HEIGHT(569) LEFT(0) PARENT(#COM_OWNER) TABPOSITION(1) TOP(40) WIDTH(1241)
*******************
SET_REF COM(#CRY05) TO(*CREATE_AS #CRYSTAL.application)
SET_REF COM(#LbrRpt) TO(*CREATE_AS #CRYSTAL.Report)
*******************
INVOKE METHOD(#CRY05.openreport) PFILENAME('I:\BNE Application Menus\Crystal Reports\Labor Reports\Labor Percentage Report.rpt') OPENREPORT_RETVAL(#LbrRpt)
 
INVOKE METHOD(#LbrRpt.ParameterFields.GetItemByName) NAME('Concept') GETITEMBYNAME_RETVAL(#ParmField)
 
INVOKE METHOD(#ParmField.AddCurrentValue) CURRENTVALUE('H')
 
INVOKE METHOD(#LbrRpt.ParameterFields.GetItemByName) NAME('PeriodDate') GETITEMBYNAME_RETVAL(#ParmField)
 
INVOKE METHOD(#ParmField.AddCurrentValue) CURRENTVALUE(#TMPYRMO)
 
SET COM(#CRSTLVWR) REPORTSOURCE(#LbrRpt)
INVOKE METHOD(#CRSTLVWR.viewreport)
*******************