The CALL statement calls a procedure.
This statement can be embedded in an application program or issued interactively. It is an executable statement that can be dynamically prepared.
The privileges held by the authorization ID of the statement must include at least one of the following:
For information on the system authorities corresponding to SQL privileges, see Corresponding System Authorities When Checking Privileges to a Function or Procedure.
>>-CALL--+-procedure-name-+-------------------------------------> '-variable-------' >--+----------------------------------------------------------+->< +-(--+------------------------------------------------+--)-+ | | .-,------------------------------------------. | | | | V | | | | '---+-variable-------------------------------+-+-' | | +-constant-------------------------------+ | | +-NULL-----------------------------------+ | | +-special-register-----------------------+ | | +-DLVALUE--(--arguments--)---------------+ | | '-cast-function-name--(--+-variable-+--)-' | | '-constant-' | +-SQL-descriptors------------------------------------------+ '-USING DESCRIPTOR--descriptor-name------------------------' SQL-descriptors: |--+------------------------------------------------------------+--> | .-SQL-. .-LOCAL--. | '-INTO--+-----+--DESCRIPTOR--+--------+--SQL-descriptor-name-' '-GLOBAL-' >--+------------------------------------------------------------------+--| | (1) | | .-SQL------. .-LOCAL--. | '-USING--+----------+--DESCRIPTOR--+--------+--SQL-descriptor-name-' '-GLOBAL-'
If a variable is specified:
If the procedure name is unqualified, it is implicitly qualified based on the path and number of parameters. For more information see Qualification of unqualified object names.
If the procedure-name identifies a procedure that was defined by a DECLARE PROCEDURE statement, and the current server is a DB2 UDB for iSeries server, then:
Otherwise:
If the current server is a DB2 UDB for iSeries, the attributes of the parameters will be the same as the attributes of the arguments specified on the CALL statement. 59
Each parameter defined (using a CREATE PROCEDURE or DECLARE PROCEDURE statement) as OUT or INOUT must be specified as a variable.
The number of arguments specified must be the same as the number of parameters of a procedure defined at the current server with the specified procedure-name.
The application requester assumes all parameters that are variables are INOUT parameters except for Java, where it is assumed all parameters that are variables are IN unless the mode is explicitly specified in the variable reference. All parameters that are not variables are assumed to be input parameters. The actual attributes of the parameters are determined by the current server.
For an explanation of constant and variable, see Constants and References to host variables. For a description of special-register, see Special registers. NULL specifies the null value.
Before the CALL statement is processed, you must set the following fields in the SQLDA. (The rules for REXX are different. For more information, see the Embedded SQL Programming book.)
The SQLDA must have enough storage to contain all SQLVAR occurrences. Therefore, the value in SQLDABC must be greater than or equal to 16 + SQLN*(80), where 80 is the length of an SQLVAR occurrence. If LOBs or distinct types are specified, there must be two SQLVAR entries for each parameter marker and SQLN must be set to two times the number of parameter markers.
SQLD must be set to a value greater than or equal to zero and less than or equal to SQLN. It must be the same as the number of parameters in the CALL statement. The nth variable described by the SQLDA corresponds to the nth parameter marker in the prepared statement. (For a description of an SQLDA, see Appendix D. SQLDA (SQL descriptor area).)
Note that RPG/400® does not provide the function for setting pointers. Because the SQLDA uses pointers to locate the appropriate variables, you have to set these pointers outside your RPG/400 application.
Parameter assignments: When the CALL statement is executed, the value of each of its parameters is assigned (using storage assignment rules) to the corresponding parameter of the procedure. Control is passed to the procedure according to the calling conventions of the host language. When execution of the procedure is complete, the value of each parameter of the procedure is assigned (using retrieval assignment rules) to the corresponding parameter of the CALL statement defined as OUT or INOUT. For details on the assignment rules, see Assignments and comparisons.
Cursors and prepared statements in procedures: All cursors opened in the called procedure that are not result set cursors are closed and all statements prepared in the called procedure are destroyed when the procedure ends.
Result sets from procedures: Result sets are only returned when a procedure is directly called or a nested RETURN TO CLIENT procedure is indirectly called from one of the following interfaces:
There are three ways to return result sets from a procedure:
When a result set is returned using an open cursor, the rows are returned starting with the current cursor position.
Locks in procedures: All locks that have been acquired in the called procedure are retained until the end of the unit of work.
Errors from procedures: A procedure can return errors (or warnings) using the SQLSTATE like other SQL statements. Applications should be aware of the possible SQLSTATEs that can be expected when invoking a procedure. The possible SQLSTATEs depend on how the procedure is coded. Procedures may also return SQLSTATEs such as those that begin with '38' or '39' if the database manager encounters problems executing the procedure. Applications should therefore be prepared to handle any error SQLSTATE that may result from issuing a CALL statement.
Nesting CALL statements: A program that is executing as a procedure, a user-defined function, or a trigger can issue a CALL statement. When a procedure, user-defined function, or trigger calls a procedure, user-defined function, or trigger, the call is considered to be nested. There is no limit on how many levels procedures and functions can be nested, but triggers can only be nested up to 200 levels deep.
If a procedure returns any query result sets, the result sets are returned to the caller of the procedure. If the SQL CALL statement is nested, the result sets are visible only to the program that is at the previous nesting level. For example, if a client program calls procedure PROCA, which in turn calls procedure PROCB. Only PROCA can access any result sets that PROCB returns; the client program has no access to the query result sets.
When an SQL or an external procedure is called, an attribute is set for SQL data-access that was defined when the procedure was created. The possible values for the attribute are:
NONE CONTAINS READS MODIFIES
If a second procedure is invoked within the execution of the current procedure, an error is issued if:
REXX procedures: If the external procedure to be called is a REXX procedure, then the procedure must be declared using the CREATE PROCEDURE or DECLARE PROCEDURE statement.
Variables cannot be used in the CALL statement within a REXX procedure. Instead, the CALL must be the object of a PREPARE and EXECUTE using parameter markers.
Multiple SQL descriptors on CALL: If SQL descriptors are specified on CALL and a procedure has IN or INOUT parameters and OUT or INOUT parameters, two descriptors must be specified. The number of variables that must be allocated in the SQL descriptors depends on how the SQL descriptor attributes are set and the number of each type of parameter.
This is the recommended technique for specifying multiple SQL descriptors on a CALL statement.
If multiple SQL descriptors are specified, the DATA or INDICATOR items associated with any INOUT parameters in the input SQL descriptor may also be modified when the procedure is called. Thus, a SET DESCRIPTOR may be necessary to reset the DATA and INDICATOR items for such an input SQL descriptor prior to its use in another SQL statement.
Example 1: Call procedure PGM1 and pass two parameters.
CALL PGM1 (:hv1,:hv2)
Example 2: In C, invoke a procedure called SALARY_PROCED using the SQLDA named INOUT_SQLDA.
struct sqlda *INOUT_SQLDA; /* Setup code for SQLDA variables goes here */ CALL SALARY_PROC USING DESCRIPTOR :*INOUT_SQLDA;
Example 3: A Java procedure is defined in the database using the following statement:
CREATE PROCEDURE PARTS_ON_HAND (IN PARTNUM INTEGER, OUT COST DECIMAL(7,2), OUT QUANTITY INTEGER) LANGUAGE JAVA PARAMETER STYLE JAVA EXTERNAL NAME 'parts!onhand';
A Java application calls this procedure on the connection context 'ctx' using the following code fragment:
...
int variable1;
BigDecimal variable2;
Integer variable3;
...
#sql [ctx] {CALL PARTS_ON_HAND(:IN variable1, :OUT variable2, :OUT variable3)};
...
This application code fragment will invoke the Java method onhand in class parts since the procedure-name specified on the CALL statement is found in the database and has the external name 'parts!onhand'.