Background: We are running Domino 4.6.6c on V4R4 of OS/400. We have an RPGLE program called SPTEST2. It is NOT registered as a stored procedure. The agent below works fine. The problem I am trying to solve is 'why does the library have to be equal to the user id?'. I created the user profile RON2 with the following command: CRTUSRPRF USRPRF(RON2) PASSWORD(TEST) GRPPRF(SSA) OWNER(*GRPPRF) Notice, no special job description to get a library list from or anything. Also when the user signs on to a 5250 session the library RON2 does not appear in their library list. Yet the program works if it exists in a library called RON2. And from the WRKRDBDIRE I have the following: Display Relational Database Detail Relational database . . . . . . : GDISYS Remote location: Remote location . . . . . . . : *LOCAL Text . . . . . . . . . . . . . . : Sub addusingstoredprocedure Dim session As New notessession Dim conn As New ODBCconnection Dim query As New ODBCquery Dim result As New ODBCResultSet Dim p1 As Integer Dim p2 As String Dim servername As String Dim n As Integer Dim tables As Variant Dim msg As String If session.isonserver Then servername="GDISYS" Else servername="GDISYS-RON" End If Msgbox "Connecting to " & servername If Not conn.connectto(servername,"RON2","TEST") Then Print "Could not connect to the AS/400 " & servername & "." Msgbox "Could not connect to the AS/400 " & servername & ". Try again later.",,"Error Connecting" Exit Sub End If tables = conn.ListProcedures() msg = "GDISYS contains the following stored procedures:" & Chr(10) If Ubound(tables) = 0 Then Messagebox "No procedures",, "Stored Procedures list" ' Exit Sub End If For n% = Lbound(tables) To Ubound(tables) msg = msg & Chr(10) & tables(n%) Next Msgbox msg Msgbox "Connected to " & servername +--- | This is the Domino/400 Mailing List! | To submit a new message, send your mail to DOMINO400@midrange.com. | To subscribe to this list send email to DOMINO400-SUB@midrange.com. | To unsubscribe from this list send email to DOMINO400-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: email@example.com +---
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.