[Home] [Help]
PACKAGE BODY: APPS.INV_LABEL_PUB
Source
1 PACKAGE BODY INV_LABEL_PUB AS
2 /* $Header: INVPLABB.pls 120.1 2005/06/20 23:30:01 appldev ship $ */
3
4 PROCEDURE print_label
5 (
6 x_return_status OUT NOCOPY VARCHAR2 -- NOCOPY added as a part of Bug# 4380449
7 , x_msg_count OUT NOCOPY NUMBER -- NOCOPY added as a part of Bug# 4380449
8 , x_msg_data OUT NOCOPY VARCHAR2 -- NOCOPY added as a part of Bug# 4380449
9 , x_label_status OUT NOCOPY VARCHAR2 -- NOCOPY added as a part of Bug# 4380449
10 , p_api_version IN NUMBER := 1.0
11 , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
12 , p_commit IN VARCHAR2 := fnd_api.g_false
13 , p_business_flow_code IN NUMBER DEFAULT NULL
14 , p_transaction_id IN INV_LABEL_PUB.transaction_id_rec_type default INV_LABEL_PUB.txn_id_null_rec
15 ,p_transaction_identifier IN NUMBER DEFAULT NULL
16 )IS
17
18 l_transaction_id INV_LABEL.transaction_id_rec_type;
19 i BINARY_INTEGER;
20
21 BEGIN
22 -- Initialize API return status to success
23
24 x_return_status := FND_API.G_RET_STS_SUCCESS;
25
26 FOR i IN 1..p_transaction_id.count()
27 LOOP
28 l_transaction_id(1) := p_transaction_id(i);
29
30 inv_label.print_label(
31 x_return_status => x_return_status
32 , x_msg_count => x_msg_count
33 , x_msg_data => x_msg_data
34 , x_label_status => x_label_status
35 , p_api_version => 1.0
36 , p_print_mode => 1
37 , p_business_flow_code => p_business_flow_code
38 , p_transaction_id => l_transaction_id
39 ,p_transaction_identifier =>p_transaction_identifier
40 );
41
42 END LOOP;
43
44
45
46 END print_label;
47
48 END INV_LABEL_PUB;