DBA Data[Home] [Help]

APPS.AR_GTA_SPLIT_TRX_PROC dependencies on AR_GTA_TRX_UTIL

Line 126: , P_GTA_TRX_Tbl IN AR_GTA_TRX_UTIL.TRX_TBL_TYPE

122: --=============================================================================
123: PROCEDURE Split_Transactions
124: ( P_ORG_ID IN NUMBER
125: , p_transfer_id IN NUMBER
126: , P_GTA_TRX_Tbl IN AR_GTA_TRX_UTIL.TRX_TBL_TYPE
127: , x_GTA_TRX_Tbl OUT NOCOPY AR_GTA_TRX_UTIL.TRX_TBL_TYPE
128: )
129: IS
130: l_procedure_name VARCHAR2(30):='Split_Transactions';

Line 127: , x_GTA_TRX_Tbl OUT NOCOPY AR_GTA_TRX_UTIL.TRX_TBL_TYPE

123: PROCEDURE Split_Transactions
124: ( P_ORG_ID IN NUMBER
125: , p_transfer_id IN NUMBER
126: , P_GTA_TRX_Tbl IN AR_GTA_TRX_UTIL.TRX_TBL_TYPE
127: , x_GTA_TRX_Tbl OUT NOCOPY AR_GTA_TRX_UTIL.TRX_TBL_TYPE
128: )
129: IS
130: l_procedure_name VARCHAR2(30):='Split_Transactions';
131:

Line 162: l_GTA_TRX AR_GTA_TRX_UTIL.trx_rec_type; -- trx get from input parameter

158: l_max_line NUMBER;
159: l_sales_list_flag ar_gta_rule_headers_all.Sales_List_Flag%TYPE;
160: l_split_flag ar_gta_system_parameters.Trx_Line_Split_Flag%TYPE;
161:
162: l_GTA_TRX AR_GTA_TRX_UTIL.trx_rec_type; -- trx get from input parameter
163: l_gta_trx_succesed AR_GTA_TRX_UTIL.trx_rec_type; -- trx for insert into temp table for report
164: l_gta_trx_init AR_GTA_TRX_UTIL.trx_rec_type; -- trx for init
165:
166: -- use when split a trx line

Line 163: l_gta_trx_succesed AR_GTA_TRX_UTIL.trx_rec_type; -- trx for insert into temp table for report

159: l_sales_list_flag ar_gta_rule_headers_all.Sales_List_Flag%TYPE;
160: l_split_flag ar_gta_system_parameters.Trx_Line_Split_Flag%TYPE;
161:
162: l_GTA_TRX AR_GTA_TRX_UTIL.trx_rec_type; -- trx get from input parameter
163: l_gta_trx_succesed AR_GTA_TRX_UTIL.trx_rec_type; -- trx for insert into temp table for report
164: l_gta_trx_init AR_GTA_TRX_UTIL.trx_rec_type; -- trx for init
165:
166: -- use when split a trx line
167: l_GTA_Trx_line_old AR_GTA_TRX_UTIL.trx_line_rec_type;

Line 164: l_gta_trx_init AR_GTA_TRX_UTIL.trx_rec_type; -- trx for init

160: l_split_flag ar_gta_system_parameters.Trx_Line_Split_Flag%TYPE;
161:
162: l_GTA_TRX AR_GTA_TRX_UTIL.trx_rec_type; -- trx get from input parameter
163: l_gta_trx_succesed AR_GTA_TRX_UTIL.trx_rec_type; -- trx for insert into temp table for report
164: l_gta_trx_init AR_GTA_TRX_UTIL.trx_rec_type; -- trx for init
165:
166: -- use when split a trx line
167: l_GTA_Trx_line_old AR_GTA_TRX_UTIL.trx_line_rec_type;
168: l_GTA_TRX_line_new AR_GTA_TRX_UTIL.trx_line_rec_type;

Line 167: l_GTA_Trx_line_old AR_GTA_TRX_UTIL.trx_line_rec_type;

163: l_gta_trx_succesed AR_GTA_TRX_UTIL.trx_rec_type; -- trx for insert into temp table for report
164: l_gta_trx_init AR_GTA_TRX_UTIL.trx_rec_type; -- trx for init
165:
166: -- use when split a trx line
167: l_GTA_Trx_line_old AR_GTA_TRX_UTIL.trx_line_rec_type;
168: l_GTA_TRX_line_new AR_GTA_TRX_UTIL.trx_line_rec_type;
169: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
170:
171: -- use when split a new trx

Line 168: l_GTA_TRX_line_new AR_GTA_TRX_UTIL.trx_line_rec_type;

164: l_gta_trx_init AR_GTA_TRX_UTIL.trx_rec_type; -- trx for init
165:
166: -- use when split a trx line
167: l_GTA_Trx_line_old AR_GTA_TRX_UTIL.trx_line_rec_type;
168: l_GTA_TRX_line_new AR_GTA_TRX_UTIL.trx_line_rec_type;
169: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
170:
171: -- use when split a new trx
172: l_GTA_Trx_new AR_GTA_TRX_UTIL.trx_rec_type;

Line 169: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;

165:
166: -- use when split a trx line
167: l_GTA_Trx_line_old AR_GTA_TRX_UTIL.trx_line_rec_type;
168: l_GTA_TRX_line_new AR_GTA_TRX_UTIL.trx_line_rec_type;
169: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
170:
171: -- use when split a new trx
172: l_GTA_Trx_new AR_GTA_TRX_UTIL.trx_rec_type;
173: l_gta_trx_new_succ AR_Gta_Trx_Util.trx_rec_type;

Line 172: l_GTA_Trx_new AR_GTA_TRX_UTIL.trx_rec_type;

168: l_GTA_TRX_line_new AR_GTA_TRX_UTIL.trx_line_rec_type;
169: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
170:
171: -- use when split a new trx
172: l_GTA_Trx_new AR_GTA_TRX_UTIL.trx_rec_type;
173: l_gta_trx_new_succ AR_Gta_Trx_Util.trx_rec_type;
174: l_trx_lines_new AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
175: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
176:

Line 173: l_gta_trx_new_succ AR_Gta_Trx_Util.trx_rec_type;

169: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
170:
171: -- use when split a new trx
172: l_GTA_Trx_new AR_GTA_TRX_UTIL.trx_rec_type;
173: l_gta_trx_new_succ AR_Gta_Trx_Util.trx_rec_type;
174: l_trx_lines_new AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
175: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
176:
177:

Line 174: l_trx_lines_new AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

170:
171: -- use when split a new trx
172: l_GTA_Trx_new AR_GTA_TRX_UTIL.trx_rec_type;
173: l_gta_trx_new_succ AR_Gta_Trx_Util.trx_rec_type;
174: l_trx_lines_new AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
175: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
176:
177:
178: -- use by split trx by tax rate and fp registration number

Line 175: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;

171: -- use when split a new trx
172: l_GTA_Trx_new AR_GTA_TRX_UTIL.trx_rec_type;
173: l_gta_trx_new_succ AR_Gta_Trx_Util.trx_rec_type;
174: l_trx_lines_new AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
175: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
176:
177:
178: -- use by split trx by tax rate and fp registration number
179: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();

Line 179: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();

175: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
176:
177:
178: -- use by split trx by tax rate and fp registration number
179: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
180: l_gta_taxreg_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
181:
182: l_quantity_limit NUMBER;
183:

Line 180: l_gta_taxreg_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();

176:
177:
178: -- use by split trx by tax rate and fp registration number
179: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
180: l_gta_taxreg_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
181:
182: l_quantity_limit NUMBER;
183:
184: l_trx_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

Line 184: l_trx_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

180: l_gta_taxreg_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
181:
182: l_quantity_limit NUMBER;
183:
184: l_trx_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
185:
186: l_trx_index NUMBER; -- loop index of l_gta_trx
187: l_trx_rate_index NUMBER; -- loop index of l_gta_rate_trx
188: l_trx_line_index NUMBER; -- loop index of trx lines

Line 221: l_trx_lines_new := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

217:
218:
219: END IF;
220: -- init all nested table
221: l_trx_lines_new := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
222: l_trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
223: l_gta_trx_new.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
224: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
225: x_GTA_TRX_Tbl := AR_GTA_TRX_UTIL.TRX_TBL_TYPE();

Line 222: l_trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

218:
219: END IF;
220: -- init all nested table
221: l_trx_lines_new := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
222: l_trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
223: l_gta_trx_new.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
224: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
225: x_GTA_TRX_Tbl := AR_GTA_TRX_UTIL.TRX_TBL_TYPE();
226:

Line 223: l_gta_trx_new.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

219: END IF;
220: -- init all nested table
221: l_trx_lines_new := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
222: l_trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
223: l_gta_trx_new.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
224: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
225: x_GTA_TRX_Tbl := AR_GTA_TRX_UTIL.TRX_TBL_TYPE();
226:
227: --begin select max amount, max number of lines and sales list flag

Line 224: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();

220: -- init all nested table
221: l_trx_lines_new := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
222: l_trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
223: l_gta_trx_new.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
224: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
225: x_GTA_TRX_Tbl := AR_GTA_TRX_UTIL.TRX_TBL_TYPE();
226:
227: --begin select max amount, max number of lines and sales list flag
228: BEGIN

Line 225: x_GTA_TRX_Tbl := AR_GTA_TRX_UTIL.TRX_TBL_TYPE();

221: l_trx_lines_new := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
222: l_trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
223: l_gta_trx_new.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
224: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
225: x_GTA_TRX_Tbl := AR_GTA_TRX_UTIL.TRX_TBL_TYPE();
226:
227: --begin select max amount, max number of lines and sales list flag
228: BEGIN
229: SELECT

Line 472: l_trx_lines_new := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

468: -- init l_gta_trx_line_old
469: l_gta_trx_line_old := l_gta_trx_line_init;
470: l_gta_trx_new := l_gta_trx_init;
471: l_gta_trx_new_succ := l_gta_trx_init;
472: l_trx_lines_new := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
473: l_GTA_TRX_line_old :=l_GTA_TRX.trx_lines(l_processing_row);
474: l_amount:=l_GTA_TRX_line_old.amount;
475: l_original_c_amount:=l_GTA_TRX_line_old.original_currency_amount;--add by Qion.liu for bug 10638369
476: l_actual_amount:=l_GTA_TRX_line_old.amount+nvl(l_GTA_TRX_line_old.discount_amount,0);

Line 1282: ( p_GTA_TRX_Header_Rec IN AR_GTA_TRX_UTIL.TRX_HEADER_REC_TYPE

1278: -- HISTORY:
1279: -- 10-MAY-2005 : Jim.Zheng Create
1280: --=============================================================================
1281: PROCEDURE Copy_Header
1282: ( p_GTA_TRX_Header_Rec IN AR_GTA_TRX_UTIL.TRX_HEADER_REC_TYPE
1283: , x_GTA_TRX_Header_Rec OUT NOCOPY AR_GTA_TRX_UTIL.TRX_HEADER_REC_TYPE
1284: ) AS
1285: l_procedure_name VARCHAR2(30):= 'Copy_Header';
1286: l_gta_header_id ar_gta_trx_headers.gta_trx_header_id%TYPE;

Line 1283: , x_GTA_TRX_Header_Rec OUT NOCOPY AR_GTA_TRX_UTIL.TRX_HEADER_REC_TYPE

1279: -- 10-MAY-2005 : Jim.Zheng Create
1280: --=============================================================================
1281: PROCEDURE Copy_Header
1282: ( p_GTA_TRX_Header_Rec IN AR_GTA_TRX_UTIL.TRX_HEADER_REC_TYPE
1283: , x_GTA_TRX_Header_Rec OUT NOCOPY AR_GTA_TRX_UTIL.TRX_HEADER_REC_TYPE
1284: ) AS
1285: l_procedure_name VARCHAR2(30):= 'Copy_Header';
1286: l_gta_header_id ar_gta_trx_headers.gta_trx_header_id%TYPE;
1287: l_gta_trx_header_rec AR_GTA_TRX_UTIL.TRX_HEADER_REC_TYPE;

Line 1287: l_gta_trx_header_rec AR_GTA_TRX_UTIL.TRX_HEADER_REC_TYPE;

1283: , x_GTA_TRX_Header_Rec OUT NOCOPY AR_GTA_TRX_UTIL.TRX_HEADER_REC_TYPE
1284: ) AS
1285: l_procedure_name VARCHAR2(30):= 'Copy_Header';
1286: l_gta_header_id ar_gta_trx_headers.gta_trx_header_id%TYPE;
1287: l_gta_trx_header_rec AR_GTA_TRX_UTIL.TRX_HEADER_REC_TYPE;
1288:
1289: BEGIN
1290: IF(FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1291: THEN

Line 1356: (p_trx_lines IN AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE

1352: -- HISTORY:
1353: -- 10-MAY-2005 : Jim.Zheng Create
1354: --=============================================================================
1355: PROCEDURE Split_Nested_Table
1356: (p_trx_lines IN AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1357: , p_split_flag IN NUMBER
1358: , x_first_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1359: , x_last_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1360: )

Line 1358: , x_first_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE

1354: --=============================================================================
1355: PROCEDURE Split_Nested_Table
1356: (p_trx_lines IN AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1357: , p_split_flag IN NUMBER
1358: , x_first_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1359: , x_last_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1360: )
1361: IS
1362: l_first_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

Line 1359: , x_last_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE

1355: PROCEDURE Split_Nested_Table
1356: (p_trx_lines IN AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1357: , p_split_flag IN NUMBER
1358: , x_first_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1359: , x_last_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1360: )
1361: IS
1362: l_first_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1363: l_last_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

Line 1362: l_first_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

1358: , x_first_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1359: , x_last_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1360: )
1361: IS
1362: l_first_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1363: l_last_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1364: l_index NUMBER;
1365: l_procedure_name VARCHAR2(50):='Split_Nested_Table';
1366:

Line 1363: l_last_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

1359: , x_last_lines OUT NOCOPY AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE
1360: )
1361: IS
1362: l_first_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1363: l_last_lines AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1364: l_index NUMBER;
1365: l_procedure_name VARCHAR2(50):='Split_Nested_Table';
1366:
1367: BEGIN

Line 1376: x_first_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

1372: ,'Begin Procedure. ');
1373: END IF;
1374:
1375: --init
1376: x_first_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1377: x_last_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1378:
1379: IF p_split_flag = 0
1380: THEN

Line 1377: x_last_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

1373: END IF;
1374:
1375: --init
1376: x_first_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1377: x_last_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1378:
1379: IF p_split_flag = 0
1380: THEN
1381: l_last_lines := p_trx_lines;

Line 1440: x_gta_trx_rec IN OUT NOCOPY AR_Gta_Trx_Util.TRX_REC_TYPE

1436: -- 10-MAY-2005 : Jim.Zheng Create
1437: --=============================================================================
1438: PROCEDURE process_before_split
1439: (
1440: x_gta_trx_rec IN OUT NOCOPY AR_Gta_Trx_Util.TRX_REC_TYPE
1441: )
1442: AS
1443:
1444: l_procedure_name VARCHAR2(35) := 'get_trx_header_id';

Line 1488: x_gta_trx_rec.trx_header.invoice_type := ar_gta_trx_util.get_invoice_type(p_org_id => x_gta_trx_rec.trx_header.org_id

1484:
1485: --28/12/07 added by subba for R12.1
1486:
1487:
1488: x_gta_trx_rec.trx_header.invoice_type := ar_gta_trx_util.get_invoice_type(p_org_id => x_gta_trx_rec.trx_header.org_id
1489: ,p_customer_trx_id=> x_gta_trx_rec.trx_header.ra_trx_id
1490: ,p_trx_line_id=> x_gta_trx_rec.trx_lines(1).ar_trx_line_id
1491: ,p_fp_tax_registration_num => x_gta_trx_rec.trx_lines(1).fp_tax_registration_number);
1492:

Line 1534: p_gta_trx_rec IN AR_Gta_Trx_Util.TRX_REC_TYPE

1530: -- 15-Jan-2009: Yao Zhang Modified for bug 7709947
1531: --=============================================================================
1532: PROCEDURE add_succ_to_temp
1533: (
1534: p_gta_trx_rec IN AR_Gta_Trx_Util.TRX_REC_TYPE
1535: )
1536: AS
1537: l_amount NUMBER;
1538: l_trx_num VARCHAR2(30);

Line 1667: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_rec_type

1663: --
1664: -- DESCRIPTION:
1665: -- split trx by first party registration number
1666: -- PARAMETERS:
1667: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_rec_type
1668: -- x_trx_tbl out AR_Gta_Trx_Util.trx_tbl_type
1669: -- HISTORY:
1670: -- 10-Sep-2005 : Jim.Zheng Create
1671: --=============================================================================

Line 1668: -- x_trx_tbl out AR_Gta_Trx_Util.trx_tbl_type

1664: -- DESCRIPTION:
1665: -- split trx by first party registration number
1666: -- PARAMETERS:
1667: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_rec_type
1668: -- x_trx_tbl out AR_Gta_Trx_Util.trx_tbl_type
1669: -- HISTORY:
1670: -- 10-Sep-2005 : Jim.Zheng Create
1671: --=============================================================================
1672: PROCEDURE split_trx_by_taxreg_number

Line 1673: (p_gta_trx IN AR_GTA_TRX_UTIL.trx_rec_type

1669: -- HISTORY:
1670: -- 10-Sep-2005 : Jim.Zheng Create
1671: --=============================================================================
1672: PROCEDURE split_trx_by_taxreg_number
1673: (p_gta_trx IN AR_GTA_TRX_UTIL.trx_rec_type
1674: ,x_trx_tbl OUT NOCOPY AR_Gta_Trx_Util.trx_tbl_type
1675: )
1676: IS
1677: l_procedure_name VARCHAR2(100) := 'split_trx_by_tax_registration_number';

Line 1674: ,x_trx_tbl OUT NOCOPY AR_Gta_Trx_Util.trx_tbl_type

1670: -- 10-Sep-2005 : Jim.Zheng Create
1671: --=============================================================================
1672: PROCEDURE split_trx_by_taxreg_number
1673: (p_gta_trx IN AR_GTA_TRX_UTIL.trx_rec_type
1674: ,x_trx_tbl OUT NOCOPY AR_Gta_Trx_Util.trx_tbl_type
1675: )
1676: IS
1677: l_procedure_name VARCHAR2(100) := 'split_trx_by_tax_registration_number';
1678: l_gta_rate_trx_line AR_GTA_TRX_UTIL.trx_line_rec_type;

Line 1678: l_gta_rate_trx_line AR_GTA_TRX_UTIL.trx_line_rec_type;

1674: ,x_trx_tbl OUT NOCOPY AR_Gta_Trx_Util.trx_tbl_type
1675: )
1676: IS
1677: l_procedure_name VARCHAR2(100) := 'split_trx_by_tax_registration_number';
1678: l_gta_rate_trx_line AR_GTA_TRX_UTIL.trx_line_rec_type;
1679: l_gta_rate_trx AR_GTA_TRX_UTIL.trx_rec_type;
1680: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1681: l_tax_reg_number ar_gta_trx_headers_all.fp_tax_registration_number%TYPE;
1682: l_add_flag NUMBER := 0;

Line 1679: l_gta_rate_trx AR_GTA_TRX_UTIL.trx_rec_type;

1675: )
1676: IS
1677: l_procedure_name VARCHAR2(100) := 'split_trx_by_tax_registration_number';
1678: l_gta_rate_trx_line AR_GTA_TRX_UTIL.trx_line_rec_type;
1679: l_gta_rate_trx AR_GTA_TRX_UTIL.trx_rec_type;
1680: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1681: l_tax_reg_number ar_gta_trx_headers_all.fp_tax_registration_number%TYPE;
1682: l_add_flag NUMBER := 0;
1683: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;

Line 1680: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();

1676: IS
1677: l_procedure_name VARCHAR2(100) := 'split_trx_by_tax_registration_number';
1678: l_gta_rate_trx_line AR_GTA_TRX_UTIL.trx_line_rec_type;
1679: l_gta_rate_trx AR_GTA_TRX_UTIL.trx_rec_type;
1680: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1681: l_tax_reg_number ar_gta_trx_headers_all.fp_tax_registration_number%TYPE;
1682: l_add_flag NUMBER := 0;
1683: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;
1684: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;

Line 1683: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;

1679: l_gta_rate_trx AR_GTA_TRX_UTIL.trx_rec_type;
1680: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1681: l_tax_reg_number ar_gta_trx_headers_all.fp_tax_registration_number%TYPE;
1682: l_add_flag NUMBER := 0;
1683: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;
1684: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
1685: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
1686: l_trx_rate_index NUMBER; -- index for nested table loop
1687: l_index NUMBER; -- index for nested table loop

Line 1684: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;

1680: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1681: l_tax_reg_number ar_gta_trx_headers_all.fp_tax_registration_number%TYPE;
1682: l_add_flag NUMBER := 0;
1683: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;
1684: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
1685: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
1686: l_trx_rate_index NUMBER; -- index for nested table loop
1687: l_index NUMBER; -- index for nested table loop
1688: BEGIN

Line 1685: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;

1681: l_tax_reg_number ar_gta_trx_headers_all.fp_tax_registration_number%TYPE;
1682: l_add_flag NUMBER := 0;
1683: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;
1684: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
1685: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
1686: l_trx_rate_index NUMBER; -- index for nested table loop
1687: l_index NUMBER; -- index for nested table loop
1688: BEGIN
1689: IF(FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

Line 1696: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();

1692: , G_MODULE_PREFIX || l_procedure_name
1693: ,'Begin Procedure. ');
1694: END IF;
1695: -- init l_gta_rate_trx_tbl
1696: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1697:
1698: -- init x_trx_tbl
1699: x_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1700:

Line 1699: x_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();

1695: -- init l_gta_rate_trx_tbl
1696: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1697:
1698: -- init x_trx_tbl
1699: x_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1700:
1701: -- init l_gta_rate_trx
1702: l_gta_rate_trx.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1703:

Line 1702: l_gta_rate_trx.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

1698: -- init x_trx_tbl
1699: x_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1700:
1701: -- init l_gta_rate_trx
1702: l_gta_rate_trx.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1703:
1704: l_gta_trx := p_gta_trx;
1705:
1706: -- split the different rate lines to different trx, use loop and if else

Line 1749: l_gta_rate_trx.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

1745: -- new trx for new tax_rate
1746: copy_header( p_GTA_TRX_Header_Rec => l_gta_rate_trx_tbl(l_gta_rate_trx_tbl.COUNT).trx_header
1747: , x_GTA_TRX_Header_Rec => l_trx_header_new );
1748: l_gta_rate_trx.trx_header := l_trx_header_new;
1749: l_gta_rate_trx.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1750: l_gta_rate_trx.trx_lines.EXTEND;
1751: l_gta_rate_trx.trx_lines(l_gta_rate_trx.trx_lines.COUNT) := l_gta_rate_trx_line;
1752:
1753: l_gta_rate_trx_tbl.EXTEND;

Line 1797: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_tbl_type

1793: --
1794: -- DESCRIPTION:
1795: -- split trx by tax rate
1796: -- PARAMETERS:
1797: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_tbl_type
1798: -- x_trx_tbl out AR_Gta_Trx_Util.trx_tbl_type
1799: -- HISTORY:
1800: -- 10-Sep-2005 : Jim.Zheng Create
1801: --=============================================================================

Line 1798: -- x_trx_tbl out AR_Gta_Trx_Util.trx_tbl_type

1794: -- DESCRIPTION:
1795: -- split trx by tax rate
1796: -- PARAMETERS:
1797: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_tbl_type
1798: -- x_trx_tbl out AR_Gta_Trx_Util.trx_tbl_type
1799: -- HISTORY:
1800: -- 10-Sep-2005 : Jim.Zheng Create
1801: --=============================================================================
1802: PROCEDURE split_trx_by_rate

Line 1803: (p_gta_tbl IN AR_GTA_TRX_UTIL.trx_tbl_type

1799: -- HISTORY:
1800: -- 10-Sep-2005 : Jim.Zheng Create
1801: --=============================================================================
1802: PROCEDURE split_trx_by_rate
1803: (p_gta_tbl IN AR_GTA_TRX_UTIL.trx_tbl_type
1804: ,x_trx_tbl OUT NOCOPY AR_Gta_Trx_Util.trx_tbl_type
1805: )
1806: IS
1807: l_procedure_name VARCHAR2(100) := 'split_trx_by_tax_registration_number';

Line 1804: ,x_trx_tbl OUT NOCOPY AR_Gta_Trx_Util.trx_tbl_type

1800: -- 10-Sep-2005 : Jim.Zheng Create
1801: --=============================================================================
1802: PROCEDURE split_trx_by_rate
1803: (p_gta_tbl IN AR_GTA_TRX_UTIL.trx_tbl_type
1804: ,x_trx_tbl OUT NOCOPY AR_Gta_Trx_Util.trx_tbl_type
1805: )
1806: IS
1807: l_procedure_name VARCHAR2(100) := 'split_trx_by_tax_registration_number';
1808: l_gta_rate_trx_line AR_GTA_TRX_UTIL.trx_line_rec_type;

Line 1808: l_gta_rate_trx_line AR_GTA_TRX_UTIL.trx_line_rec_type;

1804: ,x_trx_tbl OUT NOCOPY AR_Gta_Trx_Util.trx_tbl_type
1805: )
1806: IS
1807: l_procedure_name VARCHAR2(100) := 'split_trx_by_tax_registration_number';
1808: l_gta_rate_trx_line AR_GTA_TRX_UTIL.trx_line_rec_type;
1809: l_gta_rate_trx AR_GTA_TRX_UTIL.trx_rec_type;
1810: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1811: l_tax_rate NUMBER;
1812: l_add_flag NUMBER := 0;

Line 1809: l_gta_rate_trx AR_GTA_TRX_UTIL.trx_rec_type;

1805: )
1806: IS
1807: l_procedure_name VARCHAR2(100) := 'split_trx_by_tax_registration_number';
1808: l_gta_rate_trx_line AR_GTA_TRX_UTIL.trx_line_rec_type;
1809: l_gta_rate_trx AR_GTA_TRX_UTIL.trx_rec_type;
1810: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1811: l_tax_rate NUMBER;
1812: l_add_flag NUMBER := 0;
1813: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;

Line 1810: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();

1806: IS
1807: l_procedure_name VARCHAR2(100) := 'split_trx_by_tax_registration_number';
1808: l_gta_rate_trx_line AR_GTA_TRX_UTIL.trx_line_rec_type;
1809: l_gta_rate_trx AR_GTA_TRX_UTIL.trx_rec_type;
1810: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1811: l_tax_rate NUMBER;
1812: l_add_flag NUMBER := 0;
1813: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;
1814: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;

Line 1813: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;

1809: l_gta_rate_trx AR_GTA_TRX_UTIL.trx_rec_type;
1810: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1811: l_tax_rate NUMBER;
1812: l_add_flag NUMBER := 0;
1813: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;
1814: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
1815: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
1816: l_trx_rate_index NUMBER; -- index for nested table loop
1817: l_index NUMBER; -- index for nested table loop

Line 1814: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;

1810: l_gta_rate_trx_tbl AR_GTA_TRX_UTIL.TRX_Tbl_TYPE := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1811: l_tax_rate NUMBER;
1812: l_add_flag NUMBER := 0;
1813: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;
1814: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
1815: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
1816: l_trx_rate_index NUMBER; -- index for nested table loop
1817: l_index NUMBER; -- index for nested table loop
1818: l_gta_index NUMBER; -- index for nested table loop

Line 1815: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;

1811: l_tax_rate NUMBER;
1812: l_add_flag NUMBER := 0;
1813: l_gta_trx AR_GTA_TRX_UTIL.trx_rec_type;
1814: l_gta_trx_line_init AR_GTA_TRX_UTIL.trx_line_rec_type;
1815: l_trx_header_new AR_GTA_TRX_UTIL.TRX_header_rec_TYPE;
1816: l_trx_rate_index NUMBER; -- index for nested table loop
1817: l_index NUMBER; -- index for nested table loop
1818: l_gta_index NUMBER; -- index for nested table loop
1819: BEGIN

Line 1827: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();

1823: , G_MODULE_PREFIX || l_procedure_name
1824: ,'Begin Procedure. ');
1825: END IF;
1826: -- init l_gta_rate_trx_tbl
1827: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1828:
1829: -- init x_trx_tbl
1830: x_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1831:

Line 1830: x_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();

1826: -- init l_gta_rate_trx_tbl
1827: l_gta_rate_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1828:
1829: -- init x_trx_tbl
1830: x_trx_tbl := AR_GTA_TRX_UTIL.TRX_Tbl_TYPE();
1831:
1832: l_gta_index := p_gta_tbl.FIRST;
1833: WHILE l_gta_index IS NOT NULL
1834: LOOP

Line 1836: l_gta_rate_trx.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

1832: l_gta_index := p_gta_tbl.FIRST;
1833: WHILE l_gta_index IS NOT NULL
1834: LOOP
1835: -- init l_gta_rate_trx
1836: l_gta_rate_trx.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1837:
1838: l_gta_trx := p_gta_tbl(l_gta_index);
1839:
1840: -- split the different rate lines to different trx, use loop and if else

Line 1883: l_gta_rate_trx.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();

1879: -- new trx for new tax_rate
1880: copy_header( p_GTA_TRX_Header_Rec => l_gta_rate_trx_tbl(l_gta_rate_trx_tbl.COUNT).trx_header
1881: , x_GTA_TRX_Header_Rec => l_trx_header_new );
1882: l_gta_rate_trx.trx_header := l_trx_header_new;
1883: l_gta_rate_trx.trx_lines := AR_GTA_TRX_UTIL.TRX_line_Tbl_TYPE();
1884: l_gta_rate_trx.trx_lines.EXTEND;
1885: l_gta_rate_trx.trx_lines(l_gta_rate_trx.trx_lines.COUNT) := l_gta_rate_trx_line;
1886:
1887: l_gta_rate_trx_tbl.EXTEND;

Line 1935: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_tbl_type

1931: -- DESCRIPTION:
1932: -- get trx type by trx id
1933: -- PARAMETERS:
1934: -- p_org_id IN NUMBER
1935: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_tbl_type
1936: -- x_trx_type out ra_cust_trx_types_all.type%TYPE
1937: -- HISTORY:
1938: -- 10-Sep-2005 : Jim.Zheng Create
1939: -- 04-Aug-2009 : Yao Zhang fix bug#8756943 modified

Line 1943: , p_gta_trx IN AR_Gta_Trx_Util.trx_rec_type

1939: -- 04-Aug-2009 : Yao Zhang fix bug#8756943 modified
1940: --=============================================================================
1941: PROCEDURE get_trx_type
1942: (p_org_id IN NUMBER
1943: , p_gta_trx IN AR_Gta_Trx_Util.trx_rec_type
1944: , x_trx_type OUT NOCOPY ra_cust_trx_types_all.type%TYPE
1945: )
1946: IS
1947:

Line 1967: IF AR_GTA_TRX_UTIL.Get_Gtainvoice_Amount(p_gta_trx.trx_header.gta_trx_header_id)>0

1963: --Yao Zhang add for credit memo with discount lines exceed max line number should be transfered
1964: --without split for bug#8756943
1965: IF p_gta_trx.trx_header.consolidation_flag='0'
1966: THEN
1967: IF AR_GTA_TRX_UTIL.Get_Gtainvoice_Amount(p_gta_trx.trx_header.gta_trx_header_id)>0
1968: THEN l_trx_type:='INV';
1969: ELSE l_trx_type:='CM';
1970: END IF;
1971: ELSE

Line 2026: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_tbl_type

2022: --
2023: -- DESCRIPTION:
2024: -- Judge wether the CM exceed the max line and max amount
2025: -- PARAMETERS:
2026: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_tbl_type
2027: -- p_org_id in number
2028: -- x_result out BOOLEAN
2029: -- HISTORY:
2030: -- 10-Sep-2005 : Jim.Zheng Create

Line 2036: (p_gta_trx IN AR_Gta_Trx_Util.trx_rec_type

2032: -- 23-Jan-2009 : Yao Zhang changed for bug 7758496
2033: -- 28-Oct-2009 : Yao Zhang changed for bug 9045187
2034: --=============================================================================
2035: PROCEDURE judge_cm_limit
2036: (p_gta_trx IN AR_Gta_Trx_Util.trx_rec_type
2037: , p_org_id IN NUMBER
2038: , p_transfer_id IN NUMBER --yao zhang changed for bug 7758496
2039: , x_result OUT NOCOPY BOOLEAN)
2040: IS

Line 2042: l_gta_trx AR_Gta_Trx_Util.trx_rec_type;

2038: , p_transfer_id IN NUMBER --yao zhang changed for bug 7758496
2039: , x_result OUT NOCOPY BOOLEAN)
2040: IS
2041: l_procedure_name VARCHAR2(30) := 'judge_cm_limit';
2042: l_gta_trx AR_Gta_Trx_Util.trx_rec_type;
2043: l_fp_reg_num ar_gta_trx_headers_all.fp_tax_registration_number%TYPE;
2044: l_max_amount ar_gta_tax_limits_all.max_amount%TYPE;
2045: l_max_line ar_gta_tax_limits_all.max_num_of_line%TYPE;
2046: l_lines_number NUMBER;

Line 2065: l_invoice_type := ar_gta_trx_util.get_invoice_type(p_org_id => l_gta_trx.trx_header.org_id

2061: l_fp_reg_num := l_gta_trx.trx_lines(1).fp_tax_registration_number;
2062:
2063: --added by subba for R12.1, getting invoice type to caliculate VAT limits
2064:
2065: l_invoice_type := ar_gta_trx_util.get_invoice_type(p_org_id => l_gta_trx.trx_header.org_id
2066: ,p_customer_trx_id=> l_gta_trx.trx_header.ra_trx_id
2067: ,p_trx_line_id=> l_gta_trx.trx_lines(1).ar_trx_line_id
2068: ,p_fp_tax_registration_num => l_fp_reg_num);
2069: l_sum_of_amount := 0;

Line 2193: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_tbl_type

2189: --
2190: -- DESCRIPTION:
2191: -- get max line and max amount by fp registration number
2192: -- PARAMETERS:
2193: -- p_gta_trx in AR_GTA_TRX_UTIL.trx_tbl_type
2194: -- p_org_id in number
2195: -- x_max_amount in number
2196: -- x_max_line in number
2197: -- HISTORY:

Line 2201: (p_gta_trx IN AR_Gta_Trx_Util.trx_rec_type

2197: -- HISTORY:
2198: -- 10-Sep-2005 : Jim.Zheng Create
2199: --=============================================================================
2200: PROCEDURE get_max_amount_line
2201: (p_gta_trx IN AR_Gta_Trx_Util.trx_rec_type
2202: , p_org_id IN NUMBER
2203: , x_max_amount OUT NOCOPY NUMBER
2204: , x_max_line OUT NOCOPY NUMBER)
2205: IS

Line 2207: l_gta_trx AR_Gta_Trx_Util.trx_rec_type;

2203: , x_max_amount OUT NOCOPY NUMBER
2204: , x_max_line OUT NOCOPY NUMBER)
2205: IS
2206: l_procedure_name VARCHAR2(30) := 'judge_cm_limit';
2207: l_gta_trx AR_Gta_Trx_Util.trx_rec_type;
2208: l_fp_reg_num ar_gta_trx_headers_all.fp_tax_registration_number%TYPE;
2209: l_max_amount NUMBER;
2210: l_max_line NUMBER;
2211: l_error_string VARCHAR2(2000); --added by subba.

Line 2271: l_gta_trx.trx_header.invoice_type := ar_gta_trx_util.get_invoice_type(p_org_id => p_org_id

2267: */ --New logic is added below
2268:
2269:
2270:
2271: l_gta_trx.trx_header.invoice_type := ar_gta_trx_util.get_invoice_type(p_org_id => p_org_id
2272: ,p_customer_trx_id=> l_gta_trx.trx_header.ra_trx_id
2273: ,p_trx_line_id=> l_gta_trx.trx_lines(1).ar_trx_line_id
2274: ,p_fp_tax_registration_num => l_fp_reg_num);
2275:

Line 2356: -- p_gta_trx_tbl in ar_gta_trx_util.trx_tbl_type

2352: -- DESCRIPTION:
2353: -- filter credit memo which amount and lines number exceeded.
2354: -- PARAMETERS:
2355: -- p_org_id in number
2356: -- p_gta_trx_tbl in ar_gta_trx_util.trx_tbl_type
2357: -- x_gta_trx_tbl out nocopy ar_gta_trx_util.trx_tbl_type
2358: --
2359: -- HISTORY:
2360: -- 10-Sep-2005 : Jim.Zheng Create

Line 2357: -- x_gta_trx_tbl out nocopy ar_gta_trx_util.trx_tbl_type

2353: -- filter credit memo which amount and lines number exceeded.
2354: -- PARAMETERS:
2355: -- p_org_id in number
2356: -- p_gta_trx_tbl in ar_gta_trx_util.trx_tbl_type
2357: -- x_gta_trx_tbl out nocopy ar_gta_trx_util.trx_tbl_type
2358: --
2359: -- HISTORY:
2360: -- 10-Sep-2005 : Jim.Zheng Create
2361: -- 23-Jan-2009 : yao zhang changed for bug 7758496

Line 2366: , p_gta_trx_tbl IN ar_gta_trx_util.trx_tbl_type

2362: --=============================================================================
2363: PROCEDURE filter_credit_memo
2364: (p_org_id IN NUMBER
2365: , p_transfer_id IN NUMBER--yao zhang changed for bug 7758496
2366: , p_gta_trx_tbl IN ar_gta_trx_util.trx_tbl_type
2367: , x_gta_Trx_tbl OUT NOCOPY ar_gta_trx_util.trx_tbl_type
2368: )
2369: IS
2370: l_index NUMBER;

Line 2367: , x_gta_Trx_tbl OUT NOCOPY ar_gta_trx_util.trx_tbl_type

2363: PROCEDURE filter_credit_memo
2364: (p_org_id IN NUMBER
2365: , p_transfer_id IN NUMBER--yao zhang changed for bug 7758496
2366: , p_gta_trx_tbl IN ar_gta_trx_util.trx_tbl_type
2367: , x_gta_Trx_tbl OUT NOCOPY ar_gta_trx_util.trx_tbl_type
2368: )
2369: IS
2370: l_index NUMBER;
2371: l_procedure_name VARCHAR2(50) := 'filter_credit_memo';

Line 2373: l_trx_reg_tbl ar_gta_trx_util.trx_tbl_type;

2369: IS
2370: l_index NUMBER;
2371: l_procedure_name VARCHAR2(50) := 'filter_credit_memo';
2372: l_trx_type VARCHAR2(30);
2373: l_trx_reg_tbl ar_gta_trx_util.trx_tbl_type;
2374: l_trx_rate_tbl ar_gta_trx_util.trx_tbl_type;
2375: l_rate_index NUMBER;
2376: l_result BOOLEAN;
2377: l_gta_trx ar_gta_trx_util.trx_rec_type;

Line 2374: l_trx_rate_tbl ar_gta_trx_util.trx_tbl_type;

2370: l_index NUMBER;
2371: l_procedure_name VARCHAR2(50) := 'filter_credit_memo';
2372: l_trx_type VARCHAR2(30);
2373: l_trx_reg_tbl ar_gta_trx_util.trx_tbl_type;
2374: l_trx_rate_tbl ar_gta_trx_util.trx_tbl_type;
2375: l_rate_index NUMBER;
2376: l_result BOOLEAN;
2377: l_gta_trx ar_gta_trx_util.trx_rec_type;
2378: l_gta_rate_trx ar_gta_trx_util.trx_rec_type;

Line 2377: l_gta_trx ar_gta_trx_util.trx_rec_type;

2373: l_trx_reg_tbl ar_gta_trx_util.trx_tbl_type;
2374: l_trx_rate_tbl ar_gta_trx_util.trx_tbl_type;
2375: l_rate_index NUMBER;
2376: l_result BOOLEAN;
2377: l_gta_trx ar_gta_trx_util.trx_rec_type;
2378: l_gta_rate_trx ar_gta_trx_util.trx_rec_type;
2379: l_cm_exceed_limit EXCEPTION;
2380: l_error_string VARCHAR2(500);
2381:

Line 2378: l_gta_rate_trx ar_gta_trx_util.trx_rec_type;

2374: l_trx_rate_tbl ar_gta_trx_util.trx_tbl_type;
2375: l_rate_index NUMBER;
2376: l_result BOOLEAN;
2377: l_gta_trx ar_gta_trx_util.trx_rec_type;
2378: l_gta_rate_trx ar_gta_trx_util.trx_rec_type;
2379: l_cm_exceed_limit EXCEPTION;
2380: l_error_string VARCHAR2(500);
2381:
2382: BEGIN

Line 2399: x_gta_Trx_tbl := ar_gta_trx_util.trx_tbl_type();

2395: END IF;
2396: -- end log
2397:
2398: -- init x_gta_Trx_tbl
2399: x_gta_Trx_tbl := ar_gta_trx_util.trx_tbl_type();
2400:
2401: -- begin loop the p_gta_trx_tbl
2402: l_index := p_gta_trx_tbl.FIRST;
2403: WHILE l_index IS NOT NULL