DBA Data[Home] [Help]

APPS.ECE_POO_TRANSACTION dependencies on PO_HEADERS

Line 1522: v_entity_name := 'PO_HEADERS';

1518: ec_debug.pl(3,'release_id: ',l_header_tbl(nRelease_id_pos).value);
1519: end if;
1520: ELSE -- If this is a non-Release PO.
1521: xProgress := 'POOB-10-1504';
1522: v_entity_name := 'PO_HEADERS';
1523: v_pk1_value := l_header_tbl(nHeader_key_pos).value;
1524: if ec_debug.G_debug_level = 3 then
1525: ec_debug.pl(3,'po_header_id: ',l_header_tbl(nHeader_key_pos).value);
1526: end if;

Line 2925: v_entity_name := 'PO_HEADERS';

2921: ec_debug.pl(3,'release_id: ',nRelease_ID);
2922: end if;
2923: ELSE -- If this is a non-Release PO.
2924: xProgress := 'POOB-20-1482';
2925: v_entity_name := 'PO_HEADERS';
2926: v_pk1_value := n_po_header_id;
2927: if ec_debug.G_debug_level = 3 then
2928: ec_debug.pl(3,'po_header_id: ',n_po_header_id);
2929: end if;

Line 3392: FROM po_headers

3388: xProgress := 'POOB-30-1000';
3389: BEGIN
3390: SELECT po_header_id
3391: INTO l_header_id
3392: FROM po_headers
3393: WHERE segment1 = po_number AND
3394: type_lookup_code = po_type;
3395:
3396: EXCEPTION

Line 3398: ec_debug.pl(0,'EC','ECE_NO_ROW_SELECTED','PROGRESS_LEVEL',xProgress,'INFO','PO HEADER ID','TABLE_NAME','PO_HEADERS');

3394: type_lookup_code = po_type;
3395:
3396: EXCEPTION
3397: WHEN NO_DATA_FOUND THEN
3398: ec_debug.pl(0,'EC','ECE_NO_ROW_SELECTED','PROGRESS_LEVEL',xProgress,'INFO','PO HEADER ID','TABLE_NAME','PO_HEADERS');
3399:
3400: END;
3401: if ec_debug.G_debug_level = 3 then
3402: ec_debug.pl(3,'l_header_id: ',l_header_id);

Line 3409: UPDATE po_headers

3405: -- Perform the first update if this is a Standard or Blanket PO
3406: xProgress := 'POOB-30-1010';
3407: IF document_type NOT IN('NR','CR') THEN
3408: xProgress := 'POOB-30-1020';
3409: UPDATE po_headers
3410: SET last_update_date = SYSDATE,
3411: printed_date = SYSDATE,
3412: print_count = NVL(print_count,0) + 1,
3413: edi_processed_flag = 'Y'

Line 3417: ec_debug.pl(0,'EC','ECE_NO_ROW_UPDATED','PROGRESS_LEVEL',xProgress,'INFO','EDI PROCESSED','TABLE_NAME','PO_HEADERS');

3413: edi_processed_flag = 'Y'
3414: WHERE po_header_id = l_header_id;
3415:
3416: IF SQL%NOTFOUND THEN
3417: ec_debug.pl(0,'EC','ECE_NO_ROW_UPDATED','PROGRESS_LEVEL',xProgress,'INFO','EDI PROCESSED','TABLE_NAME','PO_HEADERS');
3418: END IF;
3419:
3420: -- Perform the same update for the Archive Table.
3421: xProgress := 'POOB-30-1022';

Line 3422: UPDATE po_headers_archive

3418: END IF;
3419:
3420: -- Perform the same update for the Archive Table.
3421: xProgress := 'POOB-30-1022';
3422: UPDATE po_headers_archive
3423: SET last_update_date = SYSDATE,
3424: printed_date = SYSDATE,
3425: print_count = NVL(print_count,0) + 1,
3426: edi_processed_flag = 'Y'

Line 3431: ec_debug.pl(0,'EC','ECE_NO_ROW_UPDATED','PROGRESS_LEVEL',xProgress,'INFO','EDI PROCESSED','TABLE_NAME','PO_HEADERS_ARCHIVE');

3427: WHERE po_header_id = l_header_id AND
3428: latest_external_flag = 'Y';
3429:
3430: IF SQL%NOTFOUND THEN
3431: ec_debug.pl(0,'EC','ECE_NO_ROW_UPDATED','PROGRESS_LEVEL',xProgress,'INFO','EDI PROCESSED','TABLE_NAME','PO_HEADERS_ARCHIVE');
3432: END IF;
3433:
3434: ELSE
3435: -- Get the po_release_id, as it is needed here for the update and