1 PACKAGE BODY WSH_EXTERNAL_CUSTOM AS
2 /* $Header: WSHUOPNB.pls 115.3 99/07/16 08:23:15 porting ship $ */
3
4 FUNCTION Order_value ( header_id IN NUMBER ) RETURN NUMBER IS
5 ov NUMBER;
6 BEGIN
7 ov := 0;
8 RETURN ov;
9 END Order_value;
10
11 FUNCTION PickRelease_SLQs( batch_id IN NUMBER,
12 release_mode IN VARCHAR2 )
13 RETURN VARCHAR2 IS
14 BEGIN
15 RETURN NULL;
16 END PickRelease_SLQs;
17
18 FUNCTION Departure_Name ( departure_id IN NUMBER )
19 RETURN VARCHAR2 IS
20 dep_name VARCHAR2(30);
21 BEGIN
22 dep_name := SUBSTR(TO_CHAR( departure_id), 1, 30);
23 RETURN dep_name;
24 END Departure_Name;
25
26 FUNCTION Delivery_Name ( delivery_id IN NUMBER )
27 RETURN VARCHAR2 IS
28 del_name VARCHAR2(30);
29 BEGIN
30 del_name := SUBSTR(TO_CHAR( delivery_id), 1, 15);
31 RETURN del_name;
32 END Delivery_Name;
33
34 FUNCTION Bill_Of_Lading ( departure_id IN NUMBER )
35 RETURN VARCHAR2 IS
36 BEGIN
37 RETURN NULL;
38 END Bill_Of_Lading;
39
40 FUNCTION WayBill ( departure_id IN NUMBER, del_id IN NUMBER )
41 RETURN VARCHAR2 IS
42 BEGIN
43
44 RETURN NULL;
45
46 END WayBill;
47
48 END WSH_EXTERNAL_CUSTOM;