APPS.BOM_DEFAULT_BOM_HEADER dependencies on ERROR_HANDLER

Line 144: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

140: ( p_bom_header_rec IN Bom_Bo_Pub.Bom_Head_Rec_Type
141: , p_bom_head_unexp_rec IN Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
142: , x_bom_header_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Head_Rec_Type
143: , x_bom_head_unexp_rec IN OUT NOCOPY Bom_Bo_Pub.Bom_Head_Unexposed_Rec_Type
144: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
145: , x_return_status IN OUT NOCOPY VARCHAR2
146: )
147: IS
148: l_token_tbl Error_Handler.Token_Tbl_Type;

Line 148: l_token_tbl Error_Handler.Token_Tbl_Type;

144: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
145: , x_return_status IN OUT NOCOPY VARCHAR2
146: )
147: IS
148: l_token_tbl Error_Handler.Token_Tbl_Type;
149: BEGIN
150:
151: x_bom_header_rec := p_bom_header_rec;
152: x_bom_head_unexp_rec := p_bom_head_unexp_rec;

Line 187: Error_Handler.Write_Debug ('Get the structure type id');

183:
184:
185: /* Get the structure type information */
186:
187: Error_Handler.Write_Debug ('Get the structure type id');
188: BEGIN
189: IF x_bom_head_unexp_rec.structure_type_id IS NULL THEN
190: SELECT structure_type_id,
191: enable_unimplemented_boms

Line 231: x_return_status := Error_Handler.G_STATUS_UNEXPECTED;

227: ELSE
228: -- If we come here, then there is some other unexpected error
229: -- The alternate code given is incorrect and is currently not being handled
230: -- as any other error.
231: x_return_status := Error_Handler.G_STATUS_UNEXPECTED;
232: END IF;
233: END;
234:
235: /* If the structure allows unimplemented BOMS and the BO is for BOM

Line 238: Error_Handler.Write_Debug ('Checking for unimplemented BOM');

234:
235: /* If the structure allows unimplemented BOMS and the BO is for BOM
236: and also the assembly is ENGG, create the BOM as unimplemented BOM */
237:
238: Error_Handler.Write_Debug ('Checking for unimplemented BOM');
239: IF x_bom_header_rec.bom_implementation_date IS NULL
240: THEN
241: Error_Handler.Write_Debug ('IS NULL' || 'BO: ' || Bom_Globals.Get_Bo_Identifier || 'unimpl: ' || x_bom_head_unexp_rec.enable_unimplemented_boms || ' assembly type: ' || x_bom_header_rec.assembly_type);
242: IF x_bom_header_rec.assembly_type <> 2 OR

Line 241: Error_Handler.Write_Debug ('IS NULL' || 'BO: ' || Bom_Globals.Get_Bo_Identifier || 'unimpl: ' || x_bom_head_unexp_rec.enable_unimplemented_boms || ' assembly type: ' || x_bom_header_rec.assembly_type);

237:
238: Error_Handler.Write_Debug ('Checking for unimplemented BOM');
239: IF x_bom_header_rec.bom_implementation_date IS NULL
240: THEN
241: Error_Handler.Write_Debug ('IS NULL' || 'BO: ' || Bom_Globals.Get_Bo_Identifier || 'unimpl: ' || x_bom_head_unexp_rec.enable_unimplemented_boms || ' assembly type: ' || x_bom_header_rec.assembly_type);
242: IF x_bom_header_rec.assembly_type <> 2 OR
243: --Bom_Globals.Get_Bo_Identifier <> 'BOM' OR
244: x_bom_head_unexp_rec.enable_unimplemented_boms <> 'Y' THEN
245: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';

Line 251: Error_Handler.Add_Error_Token

247: x_bom_header_rec.assembly_item_name;
248: l_token_tbl(1).token_name := 'ALTERNATE';
249: l_token_tbl(1).token_value :=
250: x_bom_header_rec.alternate_bom_code;
251: Error_Handler.Add_Error_Token
252: ( p_message_name => 'BOM_CANNOT_CREATE_UNIMPBOM'
253: , p_Mesg_Token_Tbl => x_Mesg_Token_Tbl
254: , x_Mesg_Token_Tbl => x_Mesg_Token_Tbl
255: , p_Token_Tbl => l_Token_Tbl

Line 260: Error_Handler.Write_Debug ('After the unimplemented check');

256: );
257: x_return_status := FND_API.G_RET_STS_ERROR;
258: END IF;
259: END IF;
260: Error_Handler.Write_Debug ('After the unimplemented check');
261:
262: END Attribute_Defaulting;
263:
264: /******************************************************************