DECLARE
P_CHASSIS_SEQ NUMBER;
P_MODEL_SEQ NUMBER;
LC_CURSOR LINE_CARD_PKG.CURSOR_TYPE;
P_LC_CURSOR LINE_CARD_PKG.CURSOR_TYPE;
BEGIN
P_CHASSIS_SEQ := 338;
P_MODEL_SEQ := 15;
P_LC_CURSOR := NULL;
LC_CURSOR := NULL;
LINE_CARD_PKG.Get_Available_LC_By_ChSeq ( P_CHASSIS_SEQ, P_MODEL_SEQ, P_LC_CURSOR) ;
:LC_CURSOR :=P_LC_CURSOR;
END;
or use named parameters like this
DECLARE
P_CHASSIS_SEQ NUMBER;
P_MODEL_SEQ NUMBER;
P_LC_CURSOR LINE_CARD_PKG.CURSOR_TYPE;
LC_CURSOR LINE_CARD_PKG.CURSOR_TYPE;
BEGIN
P_CHASSIS_SEQ := 617;
P_MODEL_SEQ := 10;
P_LC_CURSOR := NULL;
LINE_CARD_PKG.Get_Available_LC_By_ChSeq ( P_CHASSIS_SEQ => P_CHASSIS_SEQ,
P_MODEL_SEQ => P_MODEL_SEQ,
P_LC_CURSOR => P_LC_CURSOR) ;
:LC_CURSOR :=P_LC_CURSOR;
END;
No comments:
Post a Comment