[Home] [Help]
1390: -- SQL Why: Find all allowable line level control actions for this doc
1391: SELECT polc.displayed_field,
1392: polc.lookup_code
1393: FROM po_lookup_codes polc,
1394: po_lines pol,
1395: po_headers poh
1396: WHERE pol.po_line_id = p_doc_line_id
1397: AND pol.po_header_id = poh.po_header_id
1398: AND polc.lookup_type = 'CONTROL ACTIONS'
3139:
3140: /**
3141: * Public Procedure: update_note_to_vendor
3142: * Requires: API message list has been initialized if p_init_msg_list is false.
3143: * Modifies: note_to_vendor in PO_HEADERS, PO_LINES, or PO_RELEASES. API message
3144: * list.
3145: * Effects: Updates the note_to_vendor column of PO_HEADERS, PO_LINES, or
3146: * PO_RELEASES depending upon p_doc_type. If p_doc_line_id is not NULL and the
3147: * document is not a RELEASE, then updates PO_LINES. All changes will be
3141: * Public Procedure: update_note_to_vendor
3142: * Requires: API message list has been initialized if p_init_msg_list is false.
3143: * Modifies: note_to_vendor in PO_HEADERS, PO_LINES, or PO_RELEASES. API message
3144: * list.
3145: * Effects: Updates the note_to_vendor column of PO_HEADERS, PO_LINES, or
3146: * PO_RELEASES depending upon p_doc_type. If p_doc_line_id is not NULL and the
3147: * document is not a RELEASE, then updates PO_LINES. All changes will be
3148: * committed upon success if p_commit is FND_API.G_TRUE. Appends to API
3149: * message list on error.
3143: * Modifies: note_to_vendor in PO_HEADERS, PO_LINES, or PO_RELEASES. API message
3144: * list.
3145: * Effects: Updates the note_to_vendor column of PO_HEADERS, PO_LINES, or
3146: * PO_RELEASES depending upon p_doc_type. If p_doc_line_id is not NULL and the
3147: * document is not a RELEASE, then updates PO_LINES. All changes will be
3148: * committed upon success if p_commit is FND_API.G_TRUE. Appends to API
3149: * message list on error.
3150: * Returns:
3151: * x_return_status - FND_API.G_RET_STS_SUCCESS if the update was successful
3191: IF (p_doc_type IN ('PO','PA')) THEN
3192:
3193: IF (p_doc_line_id IS NOT NULL) THEN
3194:
3195: UPDATE po_lines pol
3196: SET pol.note_to_vendor = p_note_to_vendor
3197: WHERE pol.po_line_id = p_doc_line_id AND
3198: pol.po_header_id = p_doc_id;
3199:
3214:
3215: /* Bug 2781710: We should update the note_to_vendor column
3216: in the archive table also. */
3217:
3218: UPDATE po_lines_archive pla
3219: SET pla.note_to_vendor = p_note_to_vendor
3220: WHERE pla.po_line_id = p_doc_line_id AND
3221: pla.po_header_id = p_doc_id AND
3222: pla.revision_num = (SELECT poh.revision_num
4679: FUNCTION is_backing_req_labor_expense(p_doc_level_id IN NUMBER,
4680: p_doc_level IN VARCHAR2)
4681: RETURN BOOLEAN
4682: IS
4683: l_po_line_id PO_LINES_ALL.po_line_id%TYPE := NULL;
4684: l_line_location_id PO_LINE_LOCATIONS_ALL.line_location_id%TYPE := NULL;
4685: l_has_labor_expense_req BOOLEAN := FALSE;
4686: d_pos NUMBER := 0;
4687: l_api_name CONSTANT VARCHAR2(30) := 'is_backing_req_labor_expense';
4959: l_doc_subtype PO_HEADERS_ALL.type_lookup_code%type;
4960: l_cons_trans_exist VARCHAR2(1);
4961: l_index NUMBER;
4962: l_agent_id NUMBER;
4963: l_item_id PO_LINES_ALL.item_Id%TYPE;
4964: l_po_line_id PO_LINES_ALL.po_line_id%TYPE;
4965: l_current_action PO_LOOKUP_CODES.lookup_code%TYPE;
4966: l_mode VARCHAR2(30);
4967: l_ship_invalid_for_ctrl_actn VARCHAR2(1) := 'N';
4960: l_cons_trans_exist VARCHAR2(1);
4961: l_index NUMBER;
4962: l_agent_id NUMBER;
4963: l_item_id PO_LINES_ALL.item_Id%TYPE;
4964: l_po_line_id PO_LINES_ALL.po_line_id%TYPE;
4965: l_current_action PO_LOOKUP_CODES.lookup_code%TYPE;
4966: l_mode VARCHAR2(30);
4967: l_ship_invalid_for_ctrl_actn VARCHAR2(1) := 'N';
4968: d_pos NUMBER;
5013: d_pos := 40;
5014: --get the itme_id for the consumption transaction existence check
5015: SELECT item_id
5016: INTO l_item_id
5017: FROM po_lines_merge_v --
5019: AND draft_id = p_draft_id;
5020:
5021: IF (PO_LOG.d_stmt) THEN