1633: ---------------------------------------------------
1634: SQLSTMT := 'BEGIN JG_GLOBE_UTIL_PKG.PROCESS_PO_GLOBE_EVENT(:P_DOCUMENT_TYPE,:P_LEVEL_TYPE,:P_LEVEL_ID); END;';
1635:
1636: -- CREATE THE SQL STATEMENT
1637: L_CURSOR := DBMS_SQL.OPEN_CURSOR;
1638:
1639: -- PARSE THE SQL STATEMENT
1640: DBMS_SQL.PARSE (L_CURSOR, SQLSTMT, DBMS_SQL.NATIVE);
1641:
1636: -- CREATE THE SQL STATEMENT
1637: L_CURSOR := DBMS_SQL.OPEN_CURSOR;
1638:
1639: -- PARSE THE SQL STATEMENT
1640: DBMS_SQL.PARSE (L_CURSOR, SQLSTMT, DBMS_SQL.NATIVE);
1641:
1642: -- DEFINE THE VARIABLES
1643: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_DOCUMENT_TYPE', DOCUMENT_TYPE);
1644: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_LEVEL_TYPE', LEVEL_TYPE);
1639: -- PARSE THE SQL STATEMENT
1640: DBMS_SQL.PARSE (L_CURSOR, SQLSTMT, DBMS_SQL.NATIVE);
1641:
1642: -- DEFINE THE VARIABLES
1643: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_DOCUMENT_TYPE', DOCUMENT_TYPE);
1644: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_LEVEL_TYPE', LEVEL_TYPE);
1645: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_LEVEL_ID', LEVEL_ID);
1646:
1647: L_EXECUTE := DBMS_SQL.EXECUTE(L_CURSOR);
1640: DBMS_SQL.PARSE (L_CURSOR, SQLSTMT, DBMS_SQL.NATIVE);
1641:
1642: -- DEFINE THE VARIABLES
1643: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_DOCUMENT_TYPE', DOCUMENT_TYPE);
1644: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_LEVEL_TYPE', LEVEL_TYPE);
1645: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_LEVEL_ID', LEVEL_ID);
1646:
1647: L_EXECUTE := DBMS_SQL.EXECUTE(L_CURSOR);
1648: -- CLOSE THE CURSOR
1641:
1642: -- DEFINE THE VARIABLES
1643: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_DOCUMENT_TYPE', DOCUMENT_TYPE);
1644: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_LEVEL_TYPE', LEVEL_TYPE);
1645: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_LEVEL_ID', LEVEL_ID);
1646:
1647: L_EXECUTE := DBMS_SQL.EXECUTE(L_CURSOR);
1648: -- CLOSE THE CURSOR
1649: DBMS_SQL.CLOSE_CURSOR(L_CURSOR);
1643: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_DOCUMENT_TYPE', DOCUMENT_TYPE);
1644: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_LEVEL_TYPE', LEVEL_TYPE);
1645: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_LEVEL_ID', LEVEL_ID);
1646:
1647: L_EXECUTE := DBMS_SQL.EXECUTE(L_CURSOR);
1648: -- CLOSE THE CURSOR
1649: DBMS_SQL.CLOSE_CURSOR(L_CURSOR);
1650:
1651: D_POSITION := 010;
1645: DBMS_SQL.BIND_VARIABLE(L_CURSOR, ':P_LEVEL_ID', LEVEL_ID);
1646:
1647: L_EXECUTE := DBMS_SQL.EXECUTE(L_CURSOR);
1648: -- CLOSE THE CURSOR
1649: DBMS_SQL.CLOSE_CURSOR(L_CURSOR);
1650:
1651: D_POSITION := 010;
1652: IF (PO_LOG.D_PROC) THEN
1653: PO_LOG.PROC_END(D_MODULE);