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