1: PACKAGE BODY OKE_FORM_DD250_EXT AS
2: /* $Header: OKEMIRXB.pls 115.0 2003/11/20 20:27:49 alaw noship $ */
3:
4: --
5: -- Global Declarations
3:
4: --
5: -- Global Declarations
6: --
7: G_PKG_NAME VARCHAR2(30) := 'OKE_FORM_DD250_EXT';
8:
9: --
10: -- Private Procedures and Functions
11: --
26:
27: PROCEDURE Override_Form_Data
28: ( P_K_Header_ID IN NUMBER
29: , P_Delivery_ID IN NUMBER
30: , P_Hdr_Rec IN OKE_FORM_DD250.Hdr_Rec_Type
31: , P_Line_Tbl IN OKE_FORM_DD250.Line_Tbl_Type
32: , X_Hdr_Rec OUT NOCOPY OKE_FORM_DD250.Hdr_Rec_Type
33: , X_Line_Tbl OUT NOCOPY OKE_FORM_DD250.Line_Tbl_Type
34: ) IS
27: PROCEDURE Override_Form_Data
28: ( P_K_Header_ID IN NUMBER
29: , P_Delivery_ID IN NUMBER
30: , P_Hdr_Rec IN OKE_FORM_DD250.Hdr_Rec_Type
31: , P_Line_Tbl IN OKE_FORM_DD250.Line_Tbl_Type
32: , X_Hdr_Rec OUT NOCOPY OKE_FORM_DD250.Hdr_Rec_Type
33: , X_Line_Tbl OUT NOCOPY OKE_FORM_DD250.Line_Tbl_Type
34: ) IS
35:
28: ( P_K_Header_ID IN NUMBER
29: , P_Delivery_ID IN NUMBER
30: , P_Hdr_Rec IN OKE_FORM_DD250.Hdr_Rec_Type
31: , P_Line_Tbl IN OKE_FORM_DD250.Line_Tbl_Type
32: , X_Hdr_Rec OUT NOCOPY OKE_FORM_DD250.Hdr_Rec_Type
33: , X_Line_Tbl OUT NOCOPY OKE_FORM_DD250.Line_Tbl_Type
34: ) IS
35:
36: BEGIN
29: , P_Delivery_ID IN NUMBER
30: , P_Hdr_Rec IN OKE_FORM_DD250.Hdr_Rec_Type
31: , P_Line_Tbl IN OKE_FORM_DD250.Line_Tbl_Type
32: , X_Hdr_Rec OUT NOCOPY OKE_FORM_DD250.Hdr_Rec_Type
33: , X_Line_Tbl OUT NOCOPY OKE_FORM_DD250.Line_Tbl_Type
34: ) IS
35:
36: BEGIN
37:
39: X_Line_Tbl := P_Line_Tbl;
40:
41: END Override_Form_Data;
42:
43: END OKE_FORM_DD250_EXT;