帮我看看这个包PACKAGER错在哪里？


CREATE OR REPLACE PACKAGE INT_CHEMDANGERPackage AS
TYPE T_CURSOR IS REF CURSOR; --Get INT_CHEMDANGER Declaration---
PROCEDURE GetINT_CHEMDANGER (
p_CHEMDANGERID IN NUMBER,
cur_INT_CHEMDANGER OUT T_CURSOR
);

--Get All INT_CHEMDANGERs Declaration---
PROCEDURE ListAllINT_CHEMDANGERs (cur_INT_CHEMDANGER OUT T_CURSOR);

--Update INT_CHEMDANGER Declaration---
PROCEDURE UpdateINT_CHEMDANGER (
p_CHEMDANGERID IN NUMBER,
p_CHEMDANGERCLASS IN VARCHAR2,
p_CHINESENAME IN VARCHAR2,
p_ENGLISHNAME IN VARCHAR2,
p_OTHERNAME IN VARCHAR2,
p_CONSULTTREATMENT IN VARCHAR2,
p_CONSULTMATTER IN VARCHAR2,
p_EDITFLAG IN CHAR,
p_ODOR IN VARCHAR2,
p_COLOR IN VARCHAR2,
p_FATALNESS IN VARCHAR2,
p_STATE IN VARCHAR2,
p_BURNINGRESULT IN VARCHAR2,
p_DEPOSITEANDPACK IN VARCHAR2,
p_TABOO IN VARCHAR2,
p_TOSKIN IN VARCHAR2,
p_TOEYES IN VARCHAR2,
p_TOBREATHPATH IN VARCHAR2,
p_ASPHYXIASYMPTOM IN VARCHAR2,
p_CENTRENERVESYS IN VARCHAR2,
p_BREATHSYS IN VARCHAR2,
p_CYCLESYS IN VARCHAR2,
p_DIGESTIVESYS IN VARCHAR2,
p_LD50 IN VARCHAR2,
p_LC50 IN VARCHAR2,
p_APPENDFILE IN VARCHAR2
);

--Delete INT_CHEMDANGER Declaration---
PROCEDURE DeleteINT_CHEMDANGER (
p_CHEMDANGERID IN NUMBER
);

--Insert INT_CHEMDANGER Declaration---
PROCEDURE InsertINT_CHEMDANGER (
p_CHEMDANGERID IN NUMBER,
p_CHEMDANGERCLASS IN VARCHAR2,
p_CHINESENAME IN VARCHAR2,
p_ENGLISHNAME IN VARCHAR2,
p_OTHERNAME IN VARCHAR2,
p_CONSULTTREATMENT IN VARCHAR2,
p_CONSULTMATTER IN VARCHAR2,
p_EDITFLAG IN CHAR,
p_ODOR IN VARCHAR2,
p_COLOR IN VARCHAR2,
p_FATALNESS IN VARCHAR2,
p_STATE IN VARCHAR2,
p_BURNINGRESULT IN VARCHAR2,
p_DEPOSITEANDPACK IN VARCHAR2,
p_TABOO IN VARCHAR2,
p_TOSKIN IN VARCHAR2,
p_TOEYES IN VARCHAR2,
p_TOBREATHPATH IN VARCHAR2,
p_ASPHYXIASYMPTOM IN VARCHAR2,
p_CENTRENERVESYS IN VARCHAR2,
p_BREATHSYS IN VARCHAR2,
p_CYCLESYS IN VARCHAR2,
p_DIGESTIVESYS IN VARCHAR2,
p_LD50 IN VARCHAR2,
p_LC50 IN VARCHAR2,
p_APPENDFILE IN VARCHAR2
  );

END INT_CHEMDANGERPackage;
/*
--create sequence if we need it-----
CREATE SEQUENCE INT_CHEMDANGER_SEQ
    MINVALUE 1
    NOMAXVALUE
    START WITH  1
    INCREMENT BY  1
    NOCACHE;
*/
CREATE OR REPLACE PACKAGE BODY INT_CHEMDANGERPackage AS --Get INT_CHEMDANGER Body---
PROCEDURE GetINT_CHEMDANGER (
p_CHEMDANGERID IN NUMBER,
cur_INT_CHEMDANGER OUT T_CURSOR
)
IS
BEGIN
    OPEN cur_INT_CHEMDANGER FOR
    SELECT * FROM INT_CHEMDANGER 
WHERE
CHEMDANGERID = p_CHEMDANGERID
;
END GetINT_CHEMDANGER;

--Get INT_CHEMDANGER List Body---
PROCEDURE ListAllINT_CHEMDANGERs (cur_INT_CHEMDANGER OUT T_CURSOR)
IS
BEGIN
    OPEN cur_INT_CHEMDANGER FOR
    SELECT * FROM INT_CHEMDANGER ;
END ListAllINT_CHEMDANGERs;

--Update INT_CHEMDANGER Body---
PROCEDURE UpdateINT_CHEMDANGER (
p_CHEMDANGERID IN NUMBER,
p_CHEMDANGERCLASS IN VARCHAR2,
p_CHINESENAME IN VARCHAR2,
p_ENGLISHNAME IN VARCHAR2,
p_OTHERNAME IN VARCHAR2,
p_CONSULTTREATMENT IN VARCHAR2,
p_CONSULTMATTER IN VARCHAR2,
p_EDITFLAG IN CHAR,
p_ODOR IN VARCHAR2,
p_COLOR IN VARCHAR2,
p_FATALNESS IN VARCHAR2,
p_STATE IN VARCHAR2,
p_BURNINGRESULT IN VARCHAR2,
p_DEPOSITEANDPACK IN VARCHAR2,
p_TABOO IN VARCHAR2,
p_TOSKIN IN VARCHAR2,
p_TOEYES IN VARCHAR2,
p_TOBREATHPATH IN VARCHAR2,
p_ASPHYXIASYMPTOM IN VARCHAR2,
p_CENTRENERVESYS IN VARCHAR2,
p_BREATHSYS IN VARCHAR2,
p_CYCLESYS IN VARCHAR2,
p_DIGESTIVESYS IN VARCHAR2,
p_LD50 IN VARCHAR2,
p_LC50 IN VARCHAR2,
p_APPENDFILE IN VARCHAR2
)
IS
BEGIN
    UPDATE INT_CHEMDANGER
    SET
CHEMDANGERCLASS = p_CHEMDANGERCLASS,
CHINESENAME = p_CHINESENAME,
ENGLISHNAME = p_ENGLISHNAME,
OTHERNAME = p_OTHERNAME,
CONSULTTREATMENT = p_CONSULTTREATMENT,
CONSULTMATTER = p_CONSULTMATTER,
EDITFLAG = p_EDITFLAG,
ODOR = p_ODOR,
COLOR = p_COLOR,
FATALNESS = p_FATALNESS,
STATE = p_STATE,
BURNINGRESULT = p_BURNINGRESULT,
DEPOSITEANDPACK = p_DEPOSITEANDPACK,
TABOO = p_TABOO,
TOSKIN = p_TOSKIN,
TOEYES = p_TOEYES,
TOBREATHPATH = p_TOBREATHPATH,
ASPHYXIASYMPTOM = p_ASPHYXIASYMPTOM,
CENTRENERVESYS = p_CENTRENERVESYS,
BREATHSYS = p_BREATHSYS,
CYCLESYS = p_CYCLESYS,
DIGESTIVESYS = p_DIGESTIVESYS,
LD50 = p_LD50,
LC50 = p_LC50,
APPENDFILE = p_APPENDFILE
    WHERE
CHEMDANGERID = p_CHEMDANGERID 
;      
END UpdateINT_CHEMDANGER; --Delete INT_CHEMDANGER Body---
PROCEDURE DeleteINT_CHEMDANGER (
p_CHEMDANGERID IN NUMBER
)
IS
BEGIN
DELETE FROM INT_CHEMDANGER
WHERE 
CHEMDANGERID = p_CHEMDANGERID
;
END DeleteINT_CHEMDANGER;

--Insert INT_CHEMDANGER Body---
PROCEDURE InsertINT_CHEMDANGER (
p_CHEMDANGERID IN NUMBER,
p_CHEMDANGERCLASS IN VARCHAR2,
p_CHINESENAME IN VARCHAR2,
p_ENGLISHNAME IN VARCHAR2,
p_OTHERNAME IN VARCHAR2,
p_CONSULTTREATMENT IN VARCHAR2,
p_CONSULTMATTER IN VARCHAR2,
p_EDITFLAG IN CHAR,
p_ODOR IN VARCHAR2,
p_COLOR IN VARCHAR2,
p_FATALNESS IN VARCHAR2,
p_STATE IN VARCHAR2,
p_BURNINGRESULT IN VARCHAR2,
p_DEPOSITEANDPACK IN VARCHAR2,
p_TABOO IN VARCHAR2,
p_TOSKIN IN VARCHAR2,
p_TOEYES IN VARCHAR2,
p_TOBREATHPATH IN VARCHAR2,
p_ASPHYXIASYMPTOM IN VARCHAR2,
p_CENTRENERVESYS IN VARCHAR2,
p_BREATHSYS IN VARCHAR2,
p_CYCLESYS IN VARCHAR2,
p_DIGESTIVESYS IN VARCHAR2,
p_LD50 IN VARCHAR2,
p_LC50 IN VARCHAR2,
p_APPENDFILE IN VARCHAR2
)
AS
BEGIN
    INSERT INTO INT_CHEMDANGER (
CHEMDANGERID,
CHEMDANGERCLASS,
CHINESENAME,
ENGLISHNAME,
OTHERNAME,
CONSULTTREATMENT,
CONSULTMATTER,
EDITFLAG,
ODOR,
COLOR,
FATALNESS,
STATE,
BURNINGRESULT,
DEPOSITEANDPACK,
TABOO,
TOSKIN,
TOEYES,
TOBREATHPATH,
ASPHYXIASYMPTOM,
CENTRENERVESYS,
BREATHSYS,
CYCLESYS,
DIGESTIVESYS,
LD50,
LC50,
APPENDFILE
)
    VALUES (
INT_CHEMDANGER_SEQ.NEXTVAL,
p_CHEMDANGERCLASS,
p_CHINESENAME,
p_ENGLISHNAME,
p_OTHERNAME,
p_CONSULTTREATMENT,
p_CONSULTMATTER,
p_EDITFLAG,
p_ODOR,
p_COLOR,
p_FATALNESS,
p_STATE,
p_BURNINGRESULT,
p_DEPOSITEANDPACK,
p_TABOO,
p_TOSKIN,
p_TOEYES,
p_TOBREATHPATH,
p_ASPHYXIASYMPTOM,
p_CENTRENERVESYS,
p_BREATHSYS,
p_CYCLESYS,
p_DIGESTIVESYS,
p_LD50,
p_LC50,
p_APPENDFILE     );
SELECT INT_CHEMDANGER_SEQ.CURRVAL INTO p_CHEMDANGERID FROM DUAL;
END InsertINT_CHEMDANGER;

END INT_CHEMDANGERPackage;