CREATE OR REPLACE PACKAGE TOS_SP_AGENTMSTVERSSC
AS
TYPE AssocArrayChar_t IS TABLE OF CHAR INDEX BY BINARY_INTEGER;
TYPE CursorType IS REF CURSOR;
TYPE AssocArrayVarchar2_t IS TABLE OF VARCHAR2(1024) INDEX BY BINARY_INTEGER;
TYPE AssocArrayNVarchar2_t IS TABLE OF NVARCHAR2(1024) INDEX BY BINARY_INTEGER;
TYPE AssocArrayDate_t IS TABLE OF DATE INDEX BY BINARY_INTEGER;
PROCEDURE GET_AGENTMSTVERS(v_agent_classvers IN VARCHAR2, v_seq IN VARCHAR2, v_facility_type_id IN VARCHAR2, v_withdata IN VARCHAR2, RefCur_MasterBO OUT CursorType, v_totalCount OUT VARCHAR2);
PROCEDURE SET_AGENTMSTVERS(
V_AGENT_CLASS IN AssocArrayVarchar2_t,
V_NEW_AGENT_CLASS IN AssocArrayVarchar2_t,
V_SEQ IN AssocArrayVarchar2_t,
V_NEW_SEQ IN AssocArrayVarchar2_t,
V_CREATE_DTIME IN AssocArrayDate_t,
V_CREATE_STAFF_ID IN AssocArrayVarchar2_t,
V_CREATE_STAFF_NAME IN AssocArrayNVarchar2_t,
V_FACILITY_TYPE_ID IN AssocArrayVarchar2_t,
V_UN_AGENT_CLASS IN AssocArrayVarchar2_t,
V_UPDATE_DTIME IN AssocArrayDate_t,
V_UPDATE_STAFF_ID IN AssocArrayVarchar2_t,
V_UPDATE_STAFF_NAME IN AssocArrayNVarchar2_t,
V_ACTIONFLAG IN AssocArrayChar_t,
RegistrationType IN VARCHAR2,
ErrorInfo OUT CLOB,
SystemDate OUT DATE
) ;
END;
AS
TYPE AssocArrayChar_t IS TABLE OF CHAR INDEX BY BINARY_INTEGER;
TYPE CursorType IS REF CURSOR;
TYPE AssocArrayVarchar2_t IS TABLE OF VARCHAR2(1024) INDEX BY BINARY_INTEGER;
TYPE AssocArrayNVarchar2_t IS TABLE OF NVARCHAR2(1024) INDEX BY BINARY_INTEGER;
TYPE AssocArrayDate_t IS TABLE OF DATE INDEX BY BINARY_INTEGER;
PROCEDURE GET_AGENTMSTVERS(v_agent_classvers IN VARCHAR2, v_seq IN VARCHAR2, v_facility_type_id IN VARCHAR2, v_withdata IN VARCHAR2, RefCur_MasterBO OUT CursorType, v_totalCount OUT VARCHAR2);
PROCEDURE SET_AGENTMSTVERS(
V_AGENT_CLASS IN AssocArrayVarchar2_t,
V_NEW_AGENT_CLASS IN AssocArrayVarchar2_t,
V_SEQ IN AssocArrayVarchar2_t,
V_NEW_SEQ IN AssocArrayVarchar2_t,
V_CREATE_DTIME IN AssocArrayDate_t,
V_CREATE_STAFF_ID IN AssocArrayVarchar2_t,
V_CREATE_STAFF_NAME IN AssocArrayNVarchar2_t,
V_FACILITY_TYPE_ID IN AssocArrayVarchar2_t,
V_UN_AGENT_CLASS IN AssocArrayVarchar2_t,
V_UPDATE_DTIME IN AssocArrayDate_t,
V_UPDATE_STAFF_ID IN AssocArrayVarchar2_t,
V_UPDATE_STAFF_NAME IN AssocArrayNVarchar2_t,
V_ACTIONFLAG IN AssocArrayChar_t,
RegistrationType IN VARCHAR2,
ErrorInfo OUT CLOB,
SystemDate OUT DATE
) ;
END;
语法:
create type type_name as object (a number,b varchar2(10),member function c return date);
而这个存储过程中的index by binary_integer,请看http://hi.baidu.com/hanbingxiaoshi/item/96ec1b2e4102120c72863eae