44: and s.trans_source_code = 'PO' and m.event_code = 'RCPT'
45: and e.delete_mark = 0;
46:
47: /* Cursor for getting the cmpnt_cls_id and analysis_code for a specific aqui_cost_id.*/
48: CURSOR Cur_po_cost_mst IS
49: SELECT cmpntcls_id , analysis_code
50: FROM po_cost_mst
51: WHERE aqui_cost_id = GML_PO_GLDIST.P_aqui_cost_id;
52:
46:
47: /* Cursor for getting the cmpnt_cls_id and analysis_code for a specific aqui_cost_id.*/
48: CURSOR Cur_po_cost_mst IS
49: SELECT cmpntcls_id , analysis_code
50: FROM po_cost_mst
51: WHERE aqui_cost_id = GML_PO_GLDIST.P_aqui_cost_id;
52:
53: /* Cursor for getting the cost_amount and incl_ind for a particular po_id, line_id and doc_type.*/
54: CURSOR Cur_po_cost_dtl IS
84: X_orgn_code := FND_PROFILE.VALUE ('GEMMS_DEFAULT_ORGN');
85: END IF;
86:
87: /* cmpntcls_id and analysis code comes for each row from the poglded2_process_trans. Hence, commented.*/
88: OPEN Cur_po_cost_mst ;
89: FETCH Cur_po_cost_mst INTO GML_PO_GLDIST.P_cost_cmpntcls_id, GML_PO_GLDIST.P_cost_analysis_code ;
90: CLOSE Cur_po_cost_mst;
91:
92: OPEN Cur_po_cost_dtl;
85: END IF;
86:
87: /* cmpntcls_id and analysis code comes for each row from the poglded2_process_trans. Hence, commented.*/
88: OPEN Cur_po_cost_mst ;
89: FETCH Cur_po_cost_mst INTO GML_PO_GLDIST.P_cost_cmpntcls_id, GML_PO_GLDIST.P_cost_analysis_code ;
90: CLOSE Cur_po_cost_mst;
91:
92: OPEN Cur_po_cost_dtl;
93: FETCH Cur_po_cost_dtl INTO X_incl_ind, X_cost_amount;
86:
87: /* cmpntcls_id and analysis code comes for each row from the poglded2_process_trans. Hence, commented.*/
88: OPEN Cur_po_cost_mst ;
89: FETCH Cur_po_cost_mst INTO GML_PO_GLDIST.P_cost_cmpntcls_id, GML_PO_GLDIST.P_cost_analysis_code ;
90: CLOSE Cur_po_cost_mst;
91:
92: OPEN Cur_po_cost_dtl;
93: FETCH Cur_po_cost_dtl INTO X_incl_ind, X_cost_amount;
94: CLOSE Cur_po_cost_dtl;
452: SELECT vendgl_class gl_vendorgl_class
453: FROM po_vend_mst
454: WHERE vendor_id = V_shipvend_id;
455:
456: CURSOR Cur_po_cost_mst IS
457: SELECT cmpntcls_id , analysis_code
458: FROM po_cost_mst
459: WHERE aqui_cost_id = P_aqui_cost_id;
460:
454: WHERE vendor_id = V_shipvend_id;
455:
456: CURSOR Cur_po_cost_mst IS
457: SELECT cmpntcls_id , analysis_code
458: FROM po_cost_mst
459: WHERE aqui_cost_id = P_aqui_cost_id;
460:
461: /*Sandeep. Modified the Cursor for doc_type 'PORD' and 'RECV". */
462: /*Initially, it was hard-coded to 'PORD'.*/
669: P_incl_ind := Rec.incl_ind;
670:
671: P_aqui_cmpntcls_id := 0;
672: P_aqui_analysis_code := NULL;
673: OPEN Cur_po_cost_mst;
674: FETCH Cur_po_cost_mst INTO P_aqui_cmpntcls_id,P_aqui_analysis_code;
675: IF Cur_po_cost_mst%NOTFOUND THEN
676: CLOSE Cur_po_cost_mst;
677: ELSE
670:
671: P_aqui_cmpntcls_id := 0;
672: P_aqui_analysis_code := NULL;
673: OPEN Cur_po_cost_mst;
674: FETCH Cur_po_cost_mst INTO P_aqui_cmpntcls_id,P_aqui_analysis_code;
675: IF Cur_po_cost_mst%NOTFOUND THEN
676: CLOSE Cur_po_cost_mst;
677: ELSE
678: CLOSE Cur_po_cost_mst;
671: P_aqui_cmpntcls_id := 0;
672: P_aqui_analysis_code := NULL;
673: OPEN Cur_po_cost_mst;
674: FETCH Cur_po_cost_mst INTO P_aqui_cmpntcls_id,P_aqui_analysis_code;
675: IF Cur_po_cost_mst%NOTFOUND THEN
676: CLOSE Cur_po_cost_mst;
677: ELSE
678: CLOSE Cur_po_cost_mst;
679: /*X_no_acqui_titles := poglded2_load_acct_title_array ('AQUI',X_aqui_row_num );*/
672: P_aqui_analysis_code := NULL;
673: OPEN Cur_po_cost_mst;
674: FETCH Cur_po_cost_mst INTO P_aqui_cmpntcls_id,P_aqui_analysis_code;
675: IF Cur_po_cost_mst%NOTFOUND THEN
676: CLOSE Cur_po_cost_mst;
677: ELSE
678: CLOSE Cur_po_cost_mst;
679: /*X_no_acqui_titles := poglded2_load_acct_title_array ('AQUI',X_aqui_row_num );*/
680: GML_PO_GLDIST.load_acct_titles('AQUI',
674: FETCH Cur_po_cost_mst INTO P_aqui_cmpntcls_id,P_aqui_analysis_code;
675: IF Cur_po_cost_mst%NOTFOUND THEN
676: CLOSE Cur_po_cost_mst;
677: ELSE
678: CLOSE Cur_po_cost_mst;
679: /*X_no_acqui_titles := poglded2_load_acct_title_array ('AQUI',X_aqui_row_num );*/
680: GML_PO_GLDIST.load_acct_titles('AQUI',
681: P_gl_item_id,
682: P_co_code,
1445: ##########################################################################*/
1446:
1447: PROCEDURE poglded2_check_new_aqui(retcode IN OUT NOCOPY NUMBER) AS
1448:
1449: CURSOR Cur_po_cost_mst IS
1450: SELECT cmpntcls_id , analysis_code
1451: FROM po_cost_mst
1452: WHERE aqui_cost_id = GML_PO_GLDIST.P_aqui_cost_id;
1453:
1447: PROCEDURE poglded2_check_new_aqui(retcode IN OUT NOCOPY NUMBER) AS
1448:
1449: CURSOR Cur_po_cost_mst IS
1450: SELECT cmpntcls_id , analysis_code
1451: FROM po_cost_mst
1452: WHERE aqui_cost_id = GML_PO_GLDIST.P_aqui_cost_id;
1453:
1454: CURSOR Cur_get_aqui_costs IS
1455: SELECT aqui_cost_id , cost_amount , incl_ind, delete_mark
1489: GML_PO_GLDIST.P_delete_mark := Rec.delete_mark;
1490:
1491: GML_PO_GLDIST.P_aqui_cmpntcls_id := 0;
1492:
1493: OPEN Cur_po_cost_mst;
1494: FETCH Cur_po_cost_mst INTO GML_PO_GLDIST.P_aqui_cmpntcls_id,GML_PO_GLDIST.P_aqui_analysis_code;
1495: IF Cur_po_cost_mst%NOTFOUND THEN
1496: CLOSE Cur_po_cost_mst;
1497: ELSE
1490:
1491: GML_PO_GLDIST.P_aqui_cmpntcls_id := 0;
1492:
1493: OPEN Cur_po_cost_mst;
1494: FETCH Cur_po_cost_mst INTO GML_PO_GLDIST.P_aqui_cmpntcls_id,GML_PO_GLDIST.P_aqui_analysis_code;
1495: IF Cur_po_cost_mst%NOTFOUND THEN
1496: CLOSE Cur_po_cost_mst;
1497: ELSE
1498: CLOSE Cur_po_cost_mst;
1491: GML_PO_GLDIST.P_aqui_cmpntcls_id := 0;
1492:
1493: OPEN Cur_po_cost_mst;
1494: FETCH Cur_po_cost_mst INTO GML_PO_GLDIST.P_aqui_cmpntcls_id,GML_PO_GLDIST.P_aqui_analysis_code;
1495: IF Cur_po_cost_mst%NOTFOUND THEN
1496: CLOSE Cur_po_cost_mst;
1497: ELSE
1498: CLOSE Cur_po_cost_mst;
1499: GML_PO_GLDIST.load_acct_titles('AQUI',
1492:
1493: OPEN Cur_po_cost_mst;
1494: FETCH Cur_po_cost_mst INTO GML_PO_GLDIST.P_aqui_cmpntcls_id,GML_PO_GLDIST.P_aqui_analysis_code;
1495: IF Cur_po_cost_mst%NOTFOUND THEN
1496: CLOSE Cur_po_cost_mst;
1497: ELSE
1498: CLOSE Cur_po_cost_mst;
1499: GML_PO_GLDIST.load_acct_titles('AQUI',
1500: GML_PO_GLDIST.P_gl_item_id,
1494: FETCH Cur_po_cost_mst INTO GML_PO_GLDIST.P_aqui_cmpntcls_id,GML_PO_GLDIST.P_aqui_analysis_code;
1495: IF Cur_po_cost_mst%NOTFOUND THEN
1496: CLOSE Cur_po_cost_mst;
1497: ELSE
1498: CLOSE Cur_po_cost_mst;
1499: GML_PO_GLDIST.load_acct_titles('AQUI',
1500: GML_PO_GLDIST.P_gl_item_id,
1501: GML_PO_GLDIST.P_co_code,
1502: GML_PO_GLDIST.P_non_inv_ind,