[Home] [Help]
1551: -- SQL Why: Find all allowable line level control actions for this doc
1552: SELECT polc.displayed_field,
1553: polc.lookup_code
1554: FROM po_lookup_codes polc,
1555: po_lines pol,
1556: po_headers poh
1557: WHERE pol.po_line_id = p_doc_line_id
1558: AND pol.po_header_id = poh.po_header_id
1559: AND polc.lookup_type = 'CONTROL ACTIONS'
3284:
3285: /**
3286: * Public Procedure: update_note_to_vendor
3287: * Requires: API message list has been initialized if p_init_msg_list is false.
3288: * Modifies: note_to_vendor in PO_HEADERS, PO_LINES, or PO_RELEASES. API message
3289: * list.
3290: * Effects: Updates the note_to_vendor column of PO_HEADERS, PO_LINES, or
3291: * PO_RELEASES depending upon p_doc_type. If p_doc_line_id is not NULL and the
3292: * document is not a RELEASE, then updates PO_LINES. All changes will be
3286: * Public Procedure: update_note_to_vendor
3287: * Requires: API message list has been initialized if p_init_msg_list is false.
3288: * Modifies: note_to_vendor in PO_HEADERS, PO_LINES, or PO_RELEASES. API message
3289: * list.
3290: * Effects: Updates the note_to_vendor column of PO_HEADERS, PO_LINES, or
3291: * PO_RELEASES depending upon p_doc_type. If p_doc_line_id is not NULL and the
3292: * document is not a RELEASE, then updates PO_LINES. All changes will be
3293: * committed upon success if p_commit is FND_API.G_TRUE. Appends to API
3294: * message list on error.
3288: * Modifies: note_to_vendor in PO_HEADERS, PO_LINES, or PO_RELEASES. API message
3289: * list.
3290: * Effects: Updates the note_to_vendor column of PO_HEADERS, PO_LINES, or
3291: * PO_RELEASES depending upon p_doc_type. If p_doc_line_id is not NULL and the
3292: * document is not a RELEASE, then updates PO_LINES. All changes will be
3293: * committed upon success if p_commit is FND_API.G_TRUE. Appends to API
3294: * message list on error.
3295: * Returns:
3296: * x_return_status - FND_API.G_RET_STS_SUCCESS if the update was successful
3336: IF (p_doc_type IN ('PO','PA')) THEN
3337:
3338: IF (p_doc_line_id IS NOT NULL) THEN
3339:
3340: UPDATE po_lines pol
3341: SET pol.note_to_vendor = p_note_to_vendor
3342: WHERE pol.po_line_id = p_doc_line_id AND
3343: pol.po_header_id = p_doc_id;
3344:
3359:
3360: /* Bug 2781710: We should update the note_to_vendor column
3361: in the archive table also. */
3362:
3363: UPDATE po_lines_archive pla
3364: SET pla.note_to_vendor = p_note_to_vendor
3365: WHERE pla.po_line_id = p_doc_line_id AND
3366: pla.po_header_id = p_doc_id AND
3367: pla.revision_num = (SELECT poh.revision_num
4854: FUNCTION is_backing_req_labor_expense(p_doc_level_id IN NUMBER,
4855: p_doc_level IN VARCHAR2)
4856: RETURN BOOLEAN
4857: IS
4858: l_po_line_id PO_LINES_ALL.po_line_id%TYPE := NULL;
4859: l_line_location_id PO_LINE_LOCATIONS_ALL.line_location_id%TYPE := NULL;
4860: l_has_labor_expense_req BOOLEAN := FALSE;
4861: d_pos NUMBER := 0;
4862: l_api_name CONSTANT VARCHAR2(30) := 'is_backing_req_labor_expense';
5133: l_doc_subtype PO_HEADERS_ALL.type_lookup_code%type;
5134: l_cons_trans_exist VARCHAR2(1);
5135: l_index NUMBER;
5136: l_agent_id NUMBER;
5137: l_item_id PO_LINES_ALL.item_Id%TYPE;
5138: l_po_line_id PO_LINES_ALL.po_line_id%TYPE;
5139: l_current_action PO_LOOKUP_CODES.lookup_code%TYPE;
5140: l_mode VARCHAR2(30);
5141: l_ship_invalid_for_ctrl_actn VARCHAR2(1) := 'N';
5134: l_cons_trans_exist VARCHAR2(1);
5135: l_index NUMBER;
5136: l_agent_id NUMBER;
5137: l_item_id PO_LINES_ALL.item_Id%TYPE;
5138: l_po_line_id PO_LINES_ALL.po_line_id%TYPE;
5139: l_current_action PO_LOOKUP_CODES.lookup_code%TYPE;
5140: l_mode VARCHAR2(30);
5141: l_ship_invalid_for_ctrl_actn VARCHAR2(1) := 'N';
5142: d_pos NUMBER;
5187: d_pos := 40;
5188: --get the itme_id for the consumption transaction existence check
5189: SELECT item_id
5190: INTO l_item_id
5191: FROM po_lines_all
5192: WHERE po_line_id = p_doc_level_id;
5193:
5194: IF (PO_LOG.d_stmt) THEN
5195: PO_LOG.stmt(d_module,d_pos,'l_item_id',l_agent_id);