107: -- Ship To and Payment Term required on ORDER lines,
108: -- NOT on RETURN lines
109:
110: IF p_line_rec.line_category_code(p_index)
111: <> OE_GLOBALS.G_RETURN_CATEGORY_CODE THEN
112:
113: IF p_line_rec.ship_to_org_id(p_index) IS NULL THEN
114: x_return_status := FND_API.G_RET_STS_ERROR;
115: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
306: -- ATO checks for config support
307:
308: IF p_line_rec.ato_line_id(p_index) is not null AND
309: NOT(p_line_rec.ato_line_id(p_index) = p_line_rec.line_id(p_index) AND
310: p_line_rec.item_type_code(p_index) IN ( OE_GLOBALS.G_ITEM_OPTION,
311: OE_GLOBALS.G_ITEM_STANDARD))
312: THEN
313: IF MSC_ATP_GLOBAL.GET_APS_VERSION <> 10 AND
314: p_line_rec.ship_from_org_id(p_index) is NULL
307:
308: IF p_line_rec.ato_line_id(p_index) is not null AND
309: NOT(p_line_rec.ato_line_id(p_index) = p_line_rec.line_id(p_index) AND
310: p_line_rec.item_type_code(p_index) IN ( OE_GLOBALS.G_ITEM_OPTION,
311: OE_GLOBALS.G_ITEM_STANDARD))
312: THEN
313: IF MSC_ATP_GLOBAL.GET_APS_VERSION <> 10 AND
314: p_line_rec.ship_from_org_id(p_index) is NULL
315: THEN
904: AND org.organization_id= p_ship_from_org_id
905: AND rownum=1;
906:
907: ELSE /* other orders except Internal*/
908: IF p_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
909: p_item_type_code = OE_GLOBALS.G_ITEM_CONFIG OR
910: p_item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
911: p_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
912: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
905: AND rownum=1;
906:
907: ELSE /* other orders except Internal*/
908: IF p_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
909: p_item_type_code = OE_GLOBALS.G_ITEM_CONFIG OR
910: p_item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
911: p_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
912: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
913: nvl(p_top_model_line_id, -1) <> p_line_id)
906:
907: ELSE /* other orders except Internal*/
908: IF p_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
909: p_item_type_code = OE_GLOBALS.G_ITEM_CONFIG OR
910: p_item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
911: p_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
912: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
913: nvl(p_top_model_line_id, -1) <> p_line_id)
914: THEN
907: ELSE /* other orders except Internal*/
908: IF p_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
909: p_item_type_code = OE_GLOBALS.G_ITEM_CONFIG OR
910: p_item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
911: p_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
912: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
913: nvl(p_top_model_line_id, -1) <> p_line_id)
914: THEN
915: --perf bug 5121218, replace org_organization_definitions with
908: IF p_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
909: p_item_type_code = OE_GLOBALS.G_ITEM_CONFIG OR
910: p_item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
911: p_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
912: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
913: nvl(p_top_model_line_id, -1) <> p_line_id)
914: THEN
915: --perf bug 5121218, replace org_organization_definitions with
916: --hr_all_organization_units
1103: RETURN FALSE;
1104: END IF;
1105: ELSE /* other orders except Internal*/
1106:
1107: IF p_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
1108: p_item_type_code = OE_GLOBALS.G_ITEM_CONFIG OR
1109: p_item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
1110: p_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
1111: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
1104: END IF;
1105: ELSE /* other orders except Internal*/
1106:
1107: IF p_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
1108: p_item_type_code = OE_GLOBALS.G_ITEM_CONFIG OR
1109: p_item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
1110: p_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
1111: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
1112: nvl(p_top_model_line_id, -1) <> p_line_id)
1105: ELSE /* other orders except Internal*/
1106:
1107: IF p_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
1108: p_item_type_code = OE_GLOBALS.G_ITEM_CONFIG OR
1109: p_item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
1110: p_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
1111: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
1112: nvl(p_top_model_line_id, -1) <> p_line_id)
1113: THEN
1106:
1107: IF p_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
1108: p_item_type_code = OE_GLOBALS.G_ITEM_CONFIG OR
1109: p_item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
1110: p_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
1111: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
1112: nvl(p_top_model_line_id, -1) <> p_line_id)
1113: THEN
1114: RETURN TRUE;
1107: IF p_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
1108: p_item_type_code = OE_GLOBALS.G_ITEM_CONFIG OR
1109: p_item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
1110: p_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
1111: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
1112: nvl(p_top_model_line_id, -1) <> p_line_id)
1113: THEN
1114: RETURN TRUE;
1115: ELSE /* item type is MODEL,STANDARD,SERVICE,KIT in top most level*/
1804: p_line_rec.item_type_code(p_index) := 'OPTION';
1805: oe_debug_pub.add( 'Populate_Internal_Fields bb' ) ;
1806: ELSE
1807: -- Standard Item
1808: p_line_rec.item_type_code(p_index) := OE_GLOBALS.G_ITEM_STANDARD;
1809: END IF;
1810: END IF; --bom_item_type = 4
1811:
1812: END IF; -- item_type_code IS NULL
1909: oe_debug_pub.add( 'Populate_Internal_Fields 6a' ) ;
1910: -- KIT Item
1911: IF OE_BULK_CACHE.G_ITEM_TBL(l_c_index).pick_components_flag = 'Y' THEN
1912: oe_debug_pub.add( 'Populate_Internal_Fields 7a' ) ;
1913: p_line_rec.item_type_code(p_index) := OE_GLOBALS.G_ITEM_KIT;
1914: p_line_rec.component_code(p_index) := to_char(l_inventory_item_id);
1915: p_line_rec.top_model_line_id(p_index)
1916: := p_line_rec.line_id(p_index);
1917: p_line_rec.ship_model_complete_flag(p_index)
1921: p_line_rec.ship_tolerance_below(p_index) := 0;
1922:
1923: -- Standard Item
1924: ELSE
1925: p_line_rec.item_type_code(p_index) := OE_GLOBALS.G_ITEM_STANDARD;
1926: END IF;
1927: END IF;
1928: oe_debug_pub.add( 'Populate_Internal_Fields 8a' ) ;
1929: p_line_rec.shippable_flag(p_index)
2778: ,x_return_status => p_line_rec.lock_control(l_index)
2779: );
2780:
2781: -- Validate UOM
2782: IF ( p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_MODEL OR
2783: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CLASS OR
2784: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_OPTION OR
2785: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_KIT OR
2786: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_INCLUDED OR
2779: );
2780:
2781: -- Validate UOM
2782: IF ( p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_MODEL OR
2783: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CLASS OR
2784: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_OPTION OR
2785: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_KIT OR
2786: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_INCLUDED OR
2787: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CONFIG)
2780:
2781: -- Validate UOM
2782: IF ( p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_MODEL OR
2783: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CLASS OR
2784: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_OPTION OR
2785: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_KIT OR
2786: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_INCLUDED OR
2787: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CONFIG)
2788: THEN
2781: -- Validate UOM
2782: IF ( p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_MODEL OR
2783: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CLASS OR
2784: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_OPTION OR
2785: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_KIT OR
2786: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_INCLUDED OR
2787: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CONFIG)
2788: THEN
2789:
2782: IF ( p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_MODEL OR
2783: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CLASS OR
2784: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_OPTION OR
2785: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_KIT OR
2786: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_INCLUDED OR
2787: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CONFIG)
2788: THEN
2789:
2790: BEGIN
2783: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CLASS OR
2784: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_OPTION OR
2785: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_KIT OR
2786: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_INCLUDED OR
2787: p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_CONFIG)
2788: THEN
2789:
2790: BEGIN
2791: SELECT primary_uom_code
2982: END IF;
2983:
2984: --Item Orderability
2985: --Validate Item Orderability Rules
2986: IF ( NVL( p_line_rec.item_type_code(l_index),OE_GLOBALS.G_ITEM_STANDARD) = OE_GLOBALS.G_ITEM_STANDARD
2987: OR ( p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_MODEL )
2988: ) then
2989:
2990: oe_debug_pub.add(' Checking Validate_item_orderability ');
2983:
2984: --Item Orderability
2985: --Validate Item Orderability Rules
2986: IF ( NVL( p_line_rec.item_type_code(l_index),OE_GLOBALS.G_ITEM_STANDARD) = OE_GLOBALS.G_ITEM_STANDARD
2987: OR ( p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_MODEL )
2988: ) then
2989:
2990: oe_debug_pub.add(' Checking Validate_item_orderability ');
2991: --oe_debug_pub.add(' org id :' || p_line_rec.org_id(l_index));
3040:
3041:
3042: -- Agreement related validation
3043: IF p_line_rec.agreement_id(l_index) IS NOT NULL
3044: AND (NOT OE_GLOBALS.Equal(p_line_rec.agreement_id(l_index),
3045: p_header_rec.agreement_id(header_counter))
3046: OR NOT OE_GLOBALS.Equal(p_line_rec.pricing_date(l_index),
3047: p_header_rec.pricing_date(header_counter))
3048: OR NOT OE_GLOBALS.Equal(p_line_rec.price_list_id(l_index),
3042: -- Agreement related validation
3043: IF p_line_rec.agreement_id(l_index) IS NOT NULL
3044: AND (NOT OE_GLOBALS.Equal(p_line_rec.agreement_id(l_index),
3045: p_header_rec.agreement_id(header_counter))
3046: OR NOT OE_GLOBALS.Equal(p_line_rec.pricing_date(l_index),
3047: p_header_rec.pricing_date(header_counter))
3048: OR NOT OE_GLOBALS.Equal(p_line_rec.price_list_id(l_index),
3049: p_header_rec.price_list_id(header_counter))
3050: )
3044: AND (NOT OE_GLOBALS.Equal(p_line_rec.agreement_id(l_index),
3045: p_header_rec.agreement_id(header_counter))
3046: OR NOT OE_GLOBALS.Equal(p_line_rec.pricing_date(l_index),
3047: p_header_rec.pricing_date(header_counter))
3048: OR NOT OE_GLOBALS.Equal(p_line_rec.price_list_id(l_index),
3049: p_header_rec.price_list_id(header_counter))
3050: )
3051: THEN
3052:
3068:
3069: -- Price List related validations
3070:
3071: IF p_line_rec.price_list_id(l_index) IS NOT NULL
3072: AND NOT OE_GLOBALS.Equal(p_line_rec.price_list_id(l_index),
3073: p_header_rec.price_list_id(header_counter))
3074: THEN
3075:
3076: -- Error messages are populated in Validate_Price_List
3091:
3092: -- Validate Customer , customer contact and Sites
3093: -- Validate Bill-to for customer
3094: IF p_line_rec.invoice_to_org_id(l_index) IS NOT NULL
3095: AND NOT OE_GLOBALS.Equal(p_line_rec.invoice_to_org_id(l_index),
3096: p_header_rec.invoice_to_org_id(header_counter))
3097: THEN
3098:
3099: IF NOT OE_BULK_PROCESS_HEADER.Validate_Bill_To
3114: END IF; -- Invoice to is not null
3115:
3116: -- Validate ship-to for customer
3117: IF p_line_rec.ship_to_org_id(l_index) IS NOT NULL
3118: AND NOT OE_GLOBALS.Equal(p_line_rec.ship_to_org_id(l_index),
3119: p_header_rec.ship_to_org_id(header_counter))
3120: THEN
3121:
3122: IF NOT OE_BULK_PROCESS_HEADER.Validate_Ship_To
3136:
3137: END IF; -- ship to is not null
3138:
3139: IF p_line_rec.deliver_to_org_id(l_index) IS NOT NULL
3140: AND NOT OE_GLOBALS.Equal(p_line_rec.deliver_to_org_id(l_index),
3141: p_header_rec.deliver_to_org_id(header_counter))
3142: THEN
3143:
3144: IF NOT OE_BULK_PROCESS_HEADER.Validate_Deliver_To
3165: -- Validate Bill to contact
3166: IF p_line_rec.invoice_to_contact_id(l_index) IS NOT NULL
3167: THEN
3168:
3169: IF NOT OE_GLOBALS.EQUAL(p_line_rec.invoice_to_org_id(l_index),
3170: p_header_rec.invoice_to_org_id(
3171: header_counter))
3172: OR
3173: NOT OE_GLOBALS.EQUAL(p_line_rec.invoice_to_contact_id(l_index),
3169: IF NOT OE_GLOBALS.EQUAL(p_line_rec.invoice_to_org_id(l_index),
3170: p_header_rec.invoice_to_org_id(
3171: header_counter))
3172: OR
3173: NOT OE_GLOBALS.EQUAL(p_line_rec.invoice_to_contact_id(l_index),
3174: p_header_rec.invoice_to_contact_id(
3175: header_counter))
3176: THEN
3177:
3194: -- Validate Ship to contact
3195: IF p_line_rec.Ship_to_contact_id(l_index) IS NOT NULL
3196: THEN
3197:
3198: IF NOT OE_GLOBALS.EQUAL(p_line_rec.Ship_to_org_id(l_index),
3199: p_header_rec.Ship_to_org_id(
3200: header_counter)) OR
3201: NOT OE_GLOBALS.EQUAL(p_line_rec.Ship_to_contact_id(l_index),
3202: p_header_rec.Ship_to_contact_id(
3197:
3198: IF NOT OE_GLOBALS.EQUAL(p_line_rec.Ship_to_org_id(l_index),
3199: p_header_rec.Ship_to_org_id(
3200: header_counter)) OR
3201: NOT OE_GLOBALS.EQUAL(p_line_rec.Ship_to_contact_id(l_index),
3202: p_header_rec.Ship_to_contact_id(
3203: header_counter))
3204: THEN
3205:
3221: -- Validate Deliver to contact
3222: IF p_line_rec.Deliver_to_contact_id(l_index) IS NOT NULL
3223: THEN
3224:
3225: IF NOT OE_GLOBALS.EQUAL(p_line_rec.Deliver_to_org_id(l_index),
3226: p_header_rec.Deliver_to_org_id(
3227: header_counter)) OR
3228: NOT OE_GLOBALS.EQUAL(p_line_rec.Deliver_to_contact_id(l_index),
3229: p_header_rec.Deliver_to_contact_id(
3224:
3225: IF NOT OE_GLOBALS.EQUAL(p_line_rec.Deliver_to_org_id(l_index),
3226: p_header_rec.Deliver_to_org_id(
3227: header_counter)) OR
3228: NOT OE_GLOBALS.EQUAL(p_line_rec.Deliver_to_contact_id(l_index),
3229: p_header_rec.Deliver_to_contact_id(
3230: header_counter))
3231: THEN
3232:
3247:
3248: --{Bug 5054618
3249: --End customer changes
3250: IF p_line_rec.end_Customer_id(l_index) IS NOT NULL
3251: AND NOT OE_GLOBALS.Equal(p_line_rec.end_Customer_id(l_index),p_header_rec.end_customer_id(header_counter))THEN
3252: IF NOT OE_BULK_PROCESS_HEADER.Validate_End_Customer(p_line_rec.end_customer_id(l_index)) THEN
3253: p_line_rec.lock_control(l_index) := -99;
3254: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3255: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('end_customer_id'));
3257: END IF;
3258: END IF;
3259:
3260: IF p_line_rec.end_Customer_Contact_id(l_index) IS NOT NULL AND
3261: NOT OE_GLOBALS.Equal(p_line_rec.end_Customer_Contact_id(l_index),p_header_rec.end_customer_Contact_id(header_counter)) THEN
3262: IF NOT OE_BULK_PROCESS_HEADER.Validate_End_Customer_Contact(p_line_rec.end_customer_contact_id(l_index)) THEN
3263: p_line_rec.lock_control(l_index) := -99;
3264: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3265: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('end_customer_contact_id'));
3268: END IF;
3269:
3270:
3271: IF p_line_rec.end_Customer_site_use_id(l_index) IS NOT NULL AND NOT
3272: OE_GLOBALS.Equal(p_line_rec.end_Customer_site_use_id(l_index),p_header_rec.end_customer_site_use_id(header_counter)) THEN
3273: IF NOT OE_BULK_PROCESS_HEADER.Validate_End_Customer_site_use(p_line_rec.end_customer_site_use_id(l_index),
3274: p_line_rec.end_customer_id(l_index)) THEN
3275: p_line_rec.lock_control(l_index) := -99;
3276: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3279: END IF;
3280: END IF;
3281:
3282: IF p_line_rec.IB_owner(l_index) IS NOT NULL AND NOT
3283: OE_GLOBALS.Equal(p_line_rec.IB_owner(l_index),p_header_rec.IB_owner(header_counter))THEN
3284: IF NOT OE_BULK_PROCESS_HEADER.Validate_IB_Owner(p_line_rec.IB_owner(l_index)) THEN
3285: p_line_rec.lock_control(l_index) := -99;
3286: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3287: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('IB_owner'));
3289: END IF;
3290: END IF;
3291:
3292: IF p_line_rec.IB_current_location(l_index) IS NOT NULL AND NOT
3293: OE_GLOBALS.Equal(p_line_rec.IB_current_location(l_index),p_header_rec.IB_current_location(header_counter)) THEN
3294: IF NOT OE_BULK_PROCESS_HEADER.Validate_IB_current_Location (p_line_rec.IB_current_location(l_index)) THEN
3295: p_line_rec.lock_control(l_index) := -99;
3296: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3297: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('IB_location'));
3299: END IF;
3300: END IF;
3301:
3302: IF p_line_rec.IB_Installed_at_location(l_index) IS NOT NULL AND NOT
3303: OE_GLOBALS.Equal(p_line_rec.IB_Installed_at_location(l_index),p_header_rec.IB_Installed_at_location(header_counter)) THEN
3304: IF NOT OE_BULK_PROCESS_HEADER.Validate_IB_Inst_loc(p_line_rec.IB_Installed_at_location(l_index)) THEN
3305: p_line_rec.lock_control(l_index) := -99;
3306: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3307: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('Installed_at_location'));
3440: -- EBTax Changes
3441: /*
3442: IF oe_code_control.code_release_level >= '110510' THEN
3443:
3444: l_AR_Sys_Param_Rec := OE_Sys_Parameters_Pvt.Get_AR_Sys_Params(OE_GLOBALS.G_ORG_ID);
3445: l_sob_id := l_AR_Sys_Param_Rec.set_of_books_id;
3446:
3447: SELECT 'VALID'
3448: INTO l_dummy