PACKAGE: APPS.WIP_WS_PTPKPI_PK

Source

1 package WIP_WS_PTPKPI_PK as
2 /* $Header: WIPWSPPS.pls 120.4.12010000.3 2008/09/03 00:26:43 awongwai ship $ */
3 
4 /*============================================================================+
5 |  Copyright (c) 1993 Oracle Corporation    Belmont, California, USA          |
6 |                        All rights reserved.                                 |
7 |                        Oracle Manufacturing                                 |
8 +=============================================================================+
9 |
10 | FILE NAME   : WIPWSPPS.sql
11 | DESCRIPTION :
12 |              This package contains specification for all APIs related to
13                MES production to Plan module
14 |
15 | HISTORY     : created   13-SEP-07
16 |             Renga Kannan 13-Sep-2007   Creating Initial Version
17 |
18 
19 *============================================================================*/
20 
21 gUserId  number;
22 gLoginId number;
23 
24 g_logLevel NUMBER     := FND_LOG.g_current_runtime_level;
25 g_user_id NUMBER      := FND_GLOBAL.user_id;
26 g_login_id NUMBER     := FND_GLOBAL.login_id;
27 g_prog_appid NUMBER   := FND_PROFILE.value('RESP_APPL_ID');
28 g_prog_id NUMBER      := FND_PROFILE.value('PROGRAM_ID');
29 g_prog_run_date DATE  := sysdate;
30 g_request_id NUMBER   := FND_PROFILE.value('REQUEST_ID');
31 g_init_obj_ver NUMBER := 1;
32 
33 Type org_ptpkpi_rec_type is record(
34   org_id              NUMBER,
35   inc_released_jobs   NUMBER,
36   inc_unreleased_jobs NUMBER,
37   inc_onhold_jobs     NUMBER,
38   inc_completed_jobs  NUMBER,
39   inc_standard_jobs   NUMBER,
40   inc_nonstd_jobs     NUMBER
41 );
42 
43 /* Package constants */
44 
45 g_pref_id_ptp NUMBER := 40;
46 g_pref_level_id_site NUMBER := 1;
47 g_pref_val_mast_org_att       VARCHAR2(30) := 'masterorg';
48 g_pref_val_dtl_org_att        VARCHAR2(30) := 'detailorg';
49 g_pref_val_inc_release_att    VARCHAR2(30) := 'released';
50 g_pref_val_inc_unreleased_att VARCHAR2(30) := 'unreleased';
51 g_pref_val_inc_onhold_att     VARCHAR2(30) := 'onhold';
52 g_pref_val_inc_completed_att  VARCHAR2(30) := 'complete';
53 g_pref_val_inc_standard_att   VARCHAR2(30) := 'standard';
54 g_pref_val_inc_nonstd_att     VARCHAR2(30) := 'nonstandard';
55 
56 
57 Procedure wip_ws_PTPKPI_CONC_PROG(
58                              errbuf            out nocopy varchar2,
59                              retcode           out nocopy varchar2,
60                              p_org_id          in  number);
61 
62 Procedure get_org_ptpkpi_param(
63             p_org_id IN NUMBER,
64             x_pref_exists  out nocopy varchar2,
65             x_org_ptpkpi_rec OUT NOCOPY org_ptpkpi_rec_type);
66 
67 FUNCTION get_pref_job_statuses(
68             p_org_ptpkpi_rec IN org_ptpkpi_rec_type) RETURN VARCHAR2;
69 
70 FUNCTION get_job_types(
71             p_org_ptpkpi_rec IN org_ptpkpi_rec_type) RETURN VARCHAR2;
72 
73 
74 END WIP_WS_PTPKPI_PK;