1917: tax_point_code VARCHAR2
1918: )
1919: IS
1920: SELECT meaning,lookup_type
1921: FROM AR_LOOKUPS
1922: WHERE (lookup_code=fob_point_code
1923: AND lookup_type='FOB')
1924: OR (lookup_code=tax_exempt_flag
1925: AND lookup_type='TAX_CONTROL_FLAG')
2037: (p_header_rec_type.tax_exempt_flag is not null) or
2038: (p_header_rec_type.return_reason_code is not null) or
2039: (p_header_rec_type.tax_exempt_reason_code is not null) THEN
2040:
2041: FOR ar_lookups in c1(p_header_rec_type.fob_point_code,
2042: p_header_rec_type.tax_exempt_flag,
2043: p_header_rec_type.tax_exempt_reason_code,
2044: p_header_rec_type.return_reason_code,
2045: p_header_rec_type.tax_point_code)
2044: p_header_rec_type.return_reason_code,
2045: p_header_rec_type.tax_point_code)
2046: LOOP
2047:
2048: IF ar_lookups.lookup_type='FOB' THEN
2049: x_header_val_rec.fob:=ar_lookups.meaning;
2050: ELSIF ar_lookups.lookup_type='TAX_CONTROL_FLAG' THEN
2051: x_header_val_rec.tax_exempt:=ar_lookups.meaning;
2052: ELSIF ar_lookups.lookup_type='TAX_REASON' THEN
2045: p_header_rec_type.tax_point_code)
2046: LOOP
2047:
2048: IF ar_lookups.lookup_type='FOB' THEN
2049: x_header_val_rec.fob:=ar_lookups.meaning;
2050: ELSIF ar_lookups.lookup_type='TAX_CONTROL_FLAG' THEN
2051: x_header_val_rec.tax_exempt:=ar_lookups.meaning;
2052: ELSIF ar_lookups.lookup_type='TAX_REASON' THEN
2053: x_header_val_rec.tax_exempt_reason:=ar_lookups.meaning;
2046: LOOP
2047:
2048: IF ar_lookups.lookup_type='FOB' THEN
2049: x_header_val_rec.fob:=ar_lookups.meaning;
2050: ELSIF ar_lookups.lookup_type='TAX_CONTROL_FLAG' THEN
2051: x_header_val_rec.tax_exempt:=ar_lookups.meaning;
2052: ELSIF ar_lookups.lookup_type='TAX_REASON' THEN
2053: x_header_val_rec.tax_exempt_reason:=ar_lookups.meaning;
2054: ELSIF ar_lookups.lookup_type='TAX_POINT' THEN
2047:
2048: IF ar_lookups.lookup_type='FOB' THEN
2049: x_header_val_rec.fob:=ar_lookups.meaning;
2050: ELSIF ar_lookups.lookup_type='TAX_CONTROL_FLAG' THEN
2051: x_header_val_rec.tax_exempt:=ar_lookups.meaning;
2052: ELSIF ar_lookups.lookup_type='TAX_REASON' THEN
2053: x_header_val_rec.tax_exempt_reason:=ar_lookups.meaning;
2054: ELSIF ar_lookups.lookup_type='TAX_POINT' THEN
2055: x_header_val_rec.tax_point:=ar_lookups.meaning;
2048: IF ar_lookups.lookup_type='FOB' THEN
2049: x_header_val_rec.fob:=ar_lookups.meaning;
2050: ELSIF ar_lookups.lookup_type='TAX_CONTROL_FLAG' THEN
2051: x_header_val_rec.tax_exempt:=ar_lookups.meaning;
2052: ELSIF ar_lookups.lookup_type='TAX_REASON' THEN
2053: x_header_val_rec.tax_exempt_reason:=ar_lookups.meaning;
2054: ELSIF ar_lookups.lookup_type='TAX_POINT' THEN
2055: x_header_val_rec.tax_point:=ar_lookups.meaning;
2056: ELSIF ar_lookups.lookup_type='CREDIT_MEMO_REASON' then
2049: x_header_val_rec.fob:=ar_lookups.meaning;
2050: ELSIF ar_lookups.lookup_type='TAX_CONTROL_FLAG' THEN
2051: x_header_val_rec.tax_exempt:=ar_lookups.meaning;
2052: ELSIF ar_lookups.lookup_type='TAX_REASON' THEN
2053: x_header_val_rec.tax_exempt_reason:=ar_lookups.meaning;
2054: ELSIF ar_lookups.lookup_type='TAX_POINT' THEN
2055: x_header_val_rec.tax_point:=ar_lookups.meaning;
2056: ELSIF ar_lookups.lookup_type='CREDIT_MEMO_REASON' then
2057: x_header_val_rec.return_reason:=ar_lookups.meaning;
2050: ELSIF ar_lookups.lookup_type='TAX_CONTROL_FLAG' THEN
2051: x_header_val_rec.tax_exempt:=ar_lookups.meaning;
2052: ELSIF ar_lookups.lookup_type='TAX_REASON' THEN
2053: x_header_val_rec.tax_exempt_reason:=ar_lookups.meaning;
2054: ELSIF ar_lookups.lookup_type='TAX_POINT' THEN
2055: x_header_val_rec.tax_point:=ar_lookups.meaning;
2056: ELSIF ar_lookups.lookup_type='CREDIT_MEMO_REASON' then
2057: x_header_val_rec.return_reason:=ar_lookups.meaning;
2058: END IF;
2051: x_header_val_rec.tax_exempt:=ar_lookups.meaning;
2052: ELSIF ar_lookups.lookup_type='TAX_REASON' THEN
2053: x_header_val_rec.tax_exempt_reason:=ar_lookups.meaning;
2054: ELSIF ar_lookups.lookup_type='TAX_POINT' THEN
2055: x_header_val_rec.tax_point:=ar_lookups.meaning;
2056: ELSIF ar_lookups.lookup_type='CREDIT_MEMO_REASON' then
2057: x_header_val_rec.return_reason:=ar_lookups.meaning;
2058: END IF;
2059: END LOOP;
2052: ELSIF ar_lookups.lookup_type='TAX_REASON' THEN
2053: x_header_val_rec.tax_exempt_reason:=ar_lookups.meaning;
2054: ELSIF ar_lookups.lookup_type='TAX_POINT' THEN
2055: x_header_val_rec.tax_point:=ar_lookups.meaning;
2056: ELSIF ar_lookups.lookup_type='CREDIT_MEMO_REASON' then
2057: x_header_val_rec.return_reason:=ar_lookups.meaning;
2058: END IF;
2059: END LOOP;
2060: END IF;
2053: x_header_val_rec.tax_exempt_reason:=ar_lookups.meaning;
2054: ELSIF ar_lookups.lookup_type='TAX_POINT' THEN
2055: x_header_val_rec.tax_point:=ar_lookups.meaning;
2056: ELSIF ar_lookups.lookup_type='CREDIT_MEMO_REASON' then
2057: x_header_val_rec.return_reason:=ar_lookups.meaning;
2058: END IF;
2059: END LOOP;
2060: END IF;
2061: