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;