PACKAGE BODY: APPS.PO_UPDATE_DATE_PKG

Source

1 PACKAGE BODY PO_UPDATE_DATE_PKG AS
2 /* $Header: POXUPDTB.pls 115.0 99/07/28 18:30:39 porting shi $ */
3 
4   /* update_promised_date
5    * --------------------
6    */
7   PROCEDURE update_promised_date(p_line_location_id NUMBER,
8                                  p_new_promised_date DATE) IS
9   BEGIN
10 
11     UPDATE PO_LINE_LOCATIONS_ALL
12        SET promised_date = p_new_promised_date
13      WHERE line_location_id = p_line_location_id;
14 
15     COMMIT;
16 
17   END update_promised_date;
18 
19 
20 
21 
22   /* update_need_by_date
23    * -------------------
24    */
25   PROCEDURE update_need_by_date(p_line_location_id NUMBER,
26                              p_new_need_by_date DATE) IS
27   BEGIN
28 
29     UPDATE PO_LINE_LOCATIONS_ALL
30        SET need_by_date = p_new_need_by_date
31      WHERE line_location_id = p_line_location_id;
32 
33     COMMIT;
34 
35   END update_need_by_date;
36 
37 
38 
39   /* update_req_need_by_date
40    * -----------------------
41    */
42   PROCEDURE update_req_need_by_date(p_requisition_line_id NUMBER,
43                                     p_new_need_by_date    DATE) IS
44   BEGIN
45 
46     UPDATE PO_REQUISITION_LINES_ALL
47        SET need_by_date = p_new_need_by_date
48      WHERE requisition_line_id = p_requisition_line_id;
49 
50     COMMIT;
51 
52   END update_req_need_by_date;
53 
54 
55 END PO_UPDATE_DATE_PKG;
56 
57