PACKAGE BODY: APPS.OKE_FORM_DD250_EXT

Source

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
6 --
7 G_PKG_NAME     VARCHAR2(30) := 'OKE_FORM_DD250_EXT';
8 
9 --
10 -- Private Procedures and Functions
11 --
12 
13 FUNCTION Override_Shipment_Prefix
14 ( P_K_Header_ID          IN           NUMBER
15 , P_Delivery_ID          IN           NUMBER
16 , P_Inv_Org_ID           IN           NUMBER
17 , P_Ship_From_Loc_ID     IN           NUMBER
18 ) RETURN VARCHAR2 IS
19 
20 BEGIN
21 
22   RETURN ( NULL );
23 
24 END Override_Shipment_Prefix;
25 
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
35 
36 BEGIN
37 
38   X_Hdr_Rec := P_Hdr_Rec;
39   X_Line_Tbl := P_Line_Tbl;
40 
41 END Override_Form_Data;
42 
43 END OKE_FORM_DD250_EXT;