Calling a Procedure inside a Function

Question

How to call procedure within the function. please help

Answer 1

I called the procedure as u said but it is firing.. please help me out.. here is the code.
This code is to generate the SEquence ids.
*********** Procedure ***************
create or replace procedure ExecImmd
is
Begin
     EXECUTE IMMEDIATE 'DROP SEQUENCE emplseqid';
     EXECUTE IMMEDIATE 'CREATE SEQUENCE emplseqid START WITH 1001 INCREMENT BY 1';
END;
CREATE OR REPLACE FUNCTION GenCustId RETURN VARCHAR2
IS
VEMPID VARCHAR2(6);
ISEQID NUMBER(5);
P1 VARCHAR2(10);
P2 VARCHAR2(10);
BIND2 VARCHAR2(10);
BEGIN
     SELECT MAX(SUBSTR(EMPID,1,2)) INTO P1 FROM EMPL;     
     SELECT EMPLSEQID.NEXTVAL INTO ISEQID FROM DUAL;
     IF ASCII(SUBSTR(P1,2,1)) < ASCII('Z') THEN
          IF ISEQID <= 9999 THEN
          bind2 := SUBSTR(P1,1,2) || ISEQID;
          ELSE
          /* here i am calling a procedure.
          ExecImmd();
          SELECT EMPLSEQID.NEXTVAL INTO ISEQID FROM DUAL;
          bind2 := SUBSTR(P1,1,1) || CHR(ASCII(SUBSTR(P1,2,1))+1) || ISEQID;
          END IF;
     ELSE
          if p1 is null then
               bind2 := 'AA' || ISEQID;          
          else
               IF ISEQID <= 9999 THEN
               bind2 := SUBSTR(P1,1,2) || ISEQID;
               Else
               bind2 := CHR(ASCII(SUBSTR(P1,1,1))+1) || 'A' || ISEQID;          
               End If;
          End If;
     END IF;
     return bind2;
     END;