DBA Data[Home] [Help]

APPS.INVKBCGN dependencies on INVKBCGN

Line 1: PACKAGE BODY INVKBCGN as

1: PACKAGE BODY INVKBCGN as
2: /* $Header: INVKBCGB.pls 120.15.12020000.3 2013/02/19 07:27:00 akuppa ship $ */
3:
4: -- Global constant holding the package name
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INVKBCGN';

Line 5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INVKBCGN';

1: PACKAGE BODY INVKBCGN as
2: /* $Header: INVKBCGB.pls 120.15.12020000.3 2013/02/19 07:27:00 akuppa ship $ */
3:
4: -- Global constant holding the package name
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INVKBCGN';
6:
7: -- Global var holding the Current Error code for the error encountered
8: Current_Error_Code Varchar2(20) := NULL;
9:

Line 317: if (X_PRINT_KANBAN_CARD = INVKBCGN.flm_ekb_yes AND V_REPORT_ID IS NOT NULL ) then

313: current_error_code := to_char(SQLCODE);
314: end if; /* if NOT REC then */
315:
316: -- call to report conc pgm report
317: if (X_PRINT_KANBAN_CARD = INVKBCGN.flm_ekb_yes AND V_REPORT_ID IS NOT NULL ) then
318: print_kanban_report( v_report_id );
319: end if;
320: Commit;
321: return v_success;

Line 404: if (X_PRINT_KANBAN_CARD = INVKBCGN.flm_ekb_yes AND V_REPORT_ID IS NOT NULL ) then

400: current_error_code := to_char(SQLCODE);
401: end if;
402:
403: -- call to report conc pgm report
404: if (X_PRINT_KANBAN_CARD = INVKBCGN.flm_ekb_yes AND V_REPORT_ID IS NOT NULL ) then
405: print_kanban_report( v_report_id );
406: end if;
407: Commit;
408: return v_success;

Line 483: IF NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN

479: query_range_loc( X_org_id, X_locator_lo, X_locator_hi, p_where_loc);
480: if ( p_where_loc IS NOT NULL ) then
481: d_sql_p := dbms_sql.open_cursor;
482: --Changes for Ekanban Bug 11829018
483: IF NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN
484: d_sql_stmt :=
485: 'select mkps.pull_sequence_id ,mkps.organization_id ,mkps.inventory_item_id ,' ||
486: ' mkps.subinventory_name , mkps.locator_id , mkps.source_type , mkps.supplier_id,' ||
487: ' mkps.supplier_site_id, mkps.source_organization_id, mkps.source_subinventory,' ||

Line 673: IF NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN

669:
670: if (( p_where_itm IS NOT NULL ) AND ( p_where_loc IS NOT NULL)) then
671: d_sql_p := dbms_sql.open_cursor;
672: --Changes for Ekanban Bug 11829018
673: IF NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN
674: d_sql_stmt := 'select mkps.pull_sequence_id ,mkps.organization_id ,mkps.inventory_item_id ,' ||
675: ' mkps.subinventory_name , mkps.locator_id , mkps.source_type , mkps.supplier_id,' ||
676: ' mkps.supplier_site_id, mkps.source_organization_id, mkps.source_subinventory,' ||
677: ' mkps.source_locator_id, mkps.wip_line_id, mkps.kanban_size, mkps.number_of_cards, ' ||

Line 1010: IF NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN

1006: if ( (X_ITEM_LO IS NULL) AND (X_ITEM_HI IS NULL) ) then
1007: Begin
1008: --Changes for Ekanban Bug 11829018
1009: PUT_LINE('FLM_EKB_OPS_FLAG '||nvl(fnd_profile.VALUE('FLM_EKB_OPS_FLAG'),0));
1010: IF NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN
1011:
1012: For KBCC in MKPSC_ekanban LOOP
1013: REC := TRUE;
1014: card_check_and_create( KBCC.PULL_SEQUENCE_ID, KBCC.ORGANIZATION_ID,

Line 1072: IF NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN

1068: query_range_itm( X_item_lo, X_item_hi, p_where);
1069: if ( p_where IS NOT NULL ) then
1070: d_sql_p := dbms_sql.open_cursor;
1071: --Changes for Ekanban Bug 11829018
1072: IF NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN
1073: d_sql_stmt := 'select mkps.pull_sequence_id ,mkps.organization_id ,mkps.inventory_item_id ,' ||
1074: ' mkps.subinventory_name , mkps.locator_id , mkps.source_type , mkps.supplier_id,' ||
1075: ' mkps.supplier_site_id, mkps.source_organization_id, mkps.source_subinventory,' ||
1076: ' mkps.source_locator_id, mkps.wip_line_id, mkps.kanban_size, mkps.number_of_cards, ' ||

Line 1249: if (X_PRINT_KANBAN_CARD = INVKBCGN.flm_ekb_yes AND V_REPORT_ID IS NOT NULL ) then

1245: end;
1246: end if;
1247:
1248: -- call to report conc pgm report
1249: if (X_PRINT_KANBAN_CARD = INVKBCGN.flm_ekb_yes AND V_REPORT_ID IS NOT NULL ) then
1250: print_kanban_report( v_report_id );
1251: end if;
1252: Commit;
1253: return v_success;

Line 1345: If NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN

1341: put_line ('X_CREATE_CARD_FLAG -' || x_create_card_flag);
1342: put_line ('X_PLAN_CARD_FLAG -' || X_PLAN_CARD_FLAG);
1343: PUT_LINE('FLM_EKB_OPS_FLAG - '||NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0));
1344:
1345: If NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN
1346: PUT_LINE('X_pull_sequence_id- '||X_pull_sequence_id);
1347: -- Step1: Logic is Find the planning_effectivity for pull_sequence_id from MTL_KANBAN_PULL_SEQUENCES
1348: SELECT number_of_cards
1349: , kanban_size

Line 1392: IF nvl(X_PLAN_CARD_FLAG,INVKBCGN.flm_ekb_no) =INVKBCGN.flm_ekb_yes THEN

1388: l_number_of_cards:=nvl(l_future_no_of_cards,l_number_of_cards);
1389: l_pull_seq_rec.kanban_size:=nvl(l_future_card_size,l_kanban_size);
1390:
1391: END IF;
1392: IF nvl(X_PLAN_CARD_FLAG,INVKBCGN.flm_ekb_no) =INVKBCGN.flm_ekb_yes THEN
1393: SELECT COUNT(*)
1394: INTO l_no_of_existing_cards
1395: FROM MTL_KANBAN_CARDS
1396: WHERE pull_sequence_id = X_Pull_sequence_id

Line 1447: IF nvl(X_CREATE_CARD_FLAG,INVKBCGN.flm_ekb_yes) =INVKBCGN.flm_ekb_yes THEN

1443: end loop;
1444: end if;
1445: END IF;
1446: END IF;
1447: IF nvl(X_CREATE_CARD_FLAG,INVKBCGN.flm_ekb_yes) =INVKBCGN.flm_ekb_yes THEN
1448: SELECT COUNT(*)
1449: INTO l_no_of_existing_cards
1450: FROM MTL_KANBAN_CARDS
1451: WHERE pull_sequence_id = X_Pull_sequence_id

Line 1493: if X_PRINT_KANBAN_CARD = INVKBCGN.flm_ekb_yes then

1489: if l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1490: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1491: end if;
1492:
1493: if X_PRINT_KANBAN_CARD = INVKBCGN.flm_ekb_yes then
1494: if X_REPORT_ID IS NULL then
1495: select MTL_KANBAN_CARD_PRINT_TEMP_S.nextval
1496: into l_report_id from DUAL;
1497: X_REPORT_ID := l_report_id;

Line 1786: If NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN

1782: l_language VARCHAR2 (10);
1783: l_territory VARCHAR2 (10);
1784: BEGIN
1785: --Changes made for Generate Kanban Cards by javakat
1786: If NVL(FND_PROFILE.VALUE('FLM_EKB_OPS_FLAG'),0)=INVKBCGN.flm_ekb_yes THEN
1787: v_conc_prog:='INVKBCPR_XML';
1788:
1789: BEGIN
1790: SELECT LOWER(FL.iso_language),ISO_TERRITORY

Line 2113: INVKBCGN.create_kanban_cards(

2109: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
2110: X_return_msg:= fnd_message.get;
2111: X_return_status:='E';
2112: else
2113: INVKBCGN.create_kanban_cards(
2114: errbuf => l_error_msg
2115: ,retcode => l_ret_code
2116: ,x_org_id => null
2117: ,x_item_lo => null

Line 2181: END INVKBCGN;

2177: X_return_msg:= 'Unhandled exception while generating cards : '||sqlerrm(sqlcode);
2178: X_return_status:='E';
2179: END Create_eKanban_Cards;
2180:
2181: END INVKBCGN;