1 package fnd_transaction AUTHID CURRENT_USER as
2 /* $Header: AFCPTRNS.pls 120.2 2005/09/02 18:46:01 pferguso ship $ */
3
4
5 --
6 -- Constants
7 --
8
9 DAY_PER_SEC constant number := 1 / (24 * 60 * 60); -- Days in a second
10 SEC_PER_DAY constant number := (24 * 60 * 60); -- Seconds in a day
11
12 E_SUCCESS constant number := 0; -- e_code is success
13 E_TIMEOUT constant number := 1; -- e_code is timeout
14 E_NOMGR constant number := 2; -- e_code is no manager
15 E_OTHER constant number := 3; -- e_code is other
16 E_ARGSIZE constant number := 4; -- arguments are too large
17
18 TYPE_REQUEST constant varchar2(1) := '0'; -- Normal request
19 TYPE_REQUEST_DEBUG1 constant varchar2(1) := '1'; -- Request in debug mode 1
20 TYPE_REQUEST_DEBUG2 constant varchar2(1) := '2'; -- Request in debug mode 2
21
22 DEFAULT_TIMEOUT constant number := 10; -- Default token timeout value in seconds
23
24 ARGMAX constant number := 480; -- Max size of single argument
25 ARGSTOTAL constant number := 3072; -- Max total size of all args
26
27
28
29 --
30 -- Types
31 --
32 type varchar_table is table of varchar(480) index by binary_integer;
33
34
35 --
36 -- Variables
37 --
38 debug_flag boolean := null;
39 conc_queue_id number := null;
40 return_values varchar_table;
41
42
43
44
45 --
46 -- Function
47 -- synchronous
48 -- Purpose
49 -- Submit a sychronous transaction request.
50 -- Arguments
51 -- IN
52 -- timeout - Number of seconds to wait for transaction completion.
53 -- application - Transaction program application short name.
54 -- program - Transaction program short name.
55 -- arg_n - Arguments 1 through 20 to the transaction program.
56 --
57 -- Each argument is at most 480 characters.
58 -- Individual arguments longer than 480 chars will be truncated.
59 --
60 -- The sum of the argument lengths must be less than 3K.
61 -- Note that this means that all 20 arguments can NOT be 480 bytes long.
62 -- E_ARGSIZE will be returned if the sum is greater than 3K.
63 --
64 -- If there are n arguments, where n is less than 20,
65 -- then argument n+1 must be set to chr(0).
66 -- OUT
67 -- outcome - varchar(30) - Transaction program completion status.
68 -- message - varchar(240) - Transaction program completion message.
69 --
70 function synchronous (timeout in number,
71 outcome in out NOCOPY varchar2,
72 message in out NOCOPY varchar2,
73 application in varchar2,
74 program in varchar2,
75 arg_1 in varchar2 default chr(0),
76 arg_2 in varchar2 default chr(0),
77 arg_3 in varchar2 default chr(0),
78 arg_4 in varchar2 default chr(0),
79 arg_5 in varchar2 default chr(0),
80 arg_6 in varchar2 default chr(0),
81 arg_7 in varchar2 default chr(0),
82 arg_8 in varchar2 default chr(0),
83 arg_9 in varchar2 default chr(0),
84 arg_10 in varchar2 default chr(0),
85 arg_11 in varchar2 default chr(0),
86 arg_12 in varchar2 default chr(0),
87 arg_13 in varchar2 default chr(0),
88 arg_14 in varchar2 default chr(0),
89 arg_15 in varchar2 default chr(0),
90 arg_16 in varchar2 default chr(0),
91 arg_17 in varchar2 default chr(0),
92 arg_18 in varchar2 default chr(0),
93 arg_19 in varchar2 default chr(0),
94 arg_20 in varchar2 default chr(0))
95 return number;
96
97 --
98 -- Function
99 -- get_values
100 -- Purpose
101 -- Retrieve the last transaction's return
102 -- values from the global table.
103 -- Arguments
104 -- OUT
105 -- arg_n - Returned values 1 through 20
106 --
107 function get_values (arg_1 in out NOCOPY varchar2,
108 arg_2 in out NOCOPY varchar2,
109 arg_3 in out NOCOPY varchar2,
110 arg_4 in out NOCOPY varchar2,
111 arg_5 in out NOCOPY varchar2,
112 arg_6 in out NOCOPY varchar2,
113 arg_7 in out NOCOPY varchar2,
114 arg_8 in out NOCOPY varchar2,
115 arg_9 in out NOCOPY varchar2,
116 arg_10 in out NOCOPY varchar2,
117 arg_11 in out NOCOPY varchar2,
118 arg_12 in out NOCOPY varchar2,
119 arg_13 in out NOCOPY varchar2,
120 arg_14 in out NOCOPY varchar2,
121 arg_15 in out NOCOPY varchar2,
122 arg_16 in out NOCOPY varchar2,
123 arg_17 in out NOCOPY varchar2,
124 arg_18 in out NOCOPY varchar2,
125 arg_19 in out NOCOPY varchar2,
126 arg_20 in out NOCOPY varchar2)
127 return number;
128
129
130
131
132
133 procedure debug_info(function_name in varchar2,
134 action_name in varchar2,
135 message_text in varchar2,
136 s_type in varchar2 default 'C');
137
138 procedure post_tm_event( event_type in number,
139 application in varchar2,
140 program in varchar2,
141 queue_id in number,
142 timeout in number default null,
143 tm_pipe in varchar2 default null );
144
145
146 end FND_TRANSACTION;