16: IS
17: l_vendor_id number;
18: l_operating_unit VARCHAR2(240);
19: l_org_id NUMBER;
20: l_po_number PO_HEADERS_ALL.CLM_DOCUMENT_NUMBER%TYPE;
21: l_segment1 PO_HEADERS_ALL.CLM_DOCUMENT_NUMBER%TYPE;
22: l_po_line_num PO_LINES_ALL.LINE_NUM_DISPLAY%TYPE;
23: l_line_number PO_LINES_ALL.LINE_NUM_DISPLAY%TYPE;
24: l_clm_flag VARCHAR2(1) := 'N';
17: l_vendor_id number;
18: l_operating_unit VARCHAR2(240);
19: l_org_id NUMBER;
20: l_po_number PO_HEADERS_ALL.CLM_DOCUMENT_NUMBER%TYPE;
21: l_segment1 PO_HEADERS_ALL.CLM_DOCUMENT_NUMBER%TYPE;
22: l_po_line_num PO_LINES_ALL.LINE_NUM_DISPLAY%TYPE;
23: l_line_number PO_LINES_ALL.LINE_NUM_DISPLAY%TYPE;
24: l_clm_flag VARCHAR2(1) := 'N';
25: l_po_header_id NUMBER;
151: SELECT NVL(PDSH.CLM_FLAG,'N') CLM_FLAG,
152: POH.PO_HEADER_ID
153: INTO l_clm_flag,
154: l_po_header_id
155: FROM PO_HEADERS_ALL POH,
156: PO_DOC_STYLE_HEADERS PDSH
157: WHERE POH.CLM_DOCUMENT_NUMBER = l_po_number AND
158: POH.ORG_ID = l_org_id AND
159: NVL(POH.STYLE_ID, 1) = PDSH.STYLE_ID (+) AND
165:
166: IF(l_clm_flag = 'Y') THEN
167: SELECT POH.SEGMENT1
168: INTO l_segment1
169: FROM PO_HEADERS_ALL POH
170: WHERE POH.PO_HEADER_ID = l_po_header_id;
171: END IF;
172:
173: IF(l_clm_flag = 'Y' AND l_po_header_id IS NOT null) THEN