DBA Data[Home] [Help]

APPS.AR_GTA_TXT_OPERATOR_PROC dependencies on FND_FILE

Line 110: --| 15/03/2006 Jogen Hu erase the log by fnd_file.log |

106: --| 06/03/2006 Donghai Wang update procedures |
107: --| 'Check_Item_Length' and |
108: --| 'Export_Items' for adding fnd |
109: --| log |
110: --| 15/03/2006 Jogen Hu erase the log by fnd_file.log |
111: --| 21/03/2006 Jogen Hu Change data range from trunc |
112: --| parameters to DB columns by |
113: --| bug 5107043 |
114: --| 06/04/2006 Donghai Wang Update procedures |

Line 254: FND_FILE.Put_Line(FND_FILE.Output,p_str);

250: ( p_str IN VARCHAR2
251: )
252: IS
253: BEGIN
254: FND_FILE.Put_Line(FND_FILE.Output,p_str);
255:
256: END Put_Line;
257:
258: --==========================================================================

Line 283: --FND_FILE.Put_Line(FND_FILE.Log,p_str);

279: ( p_str IN VARCHAR2
280: )
281: IS
282: BEGIN
283: --FND_FILE.Put_Line(FND_FILE.Log,p_str);
284: IF(FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
285: THEN
286: fnd_log.STRING(LOG_LEVEL => fnd_log.LEVEL_STATEMENT
287: ,MODULE => G_MODULE_PREFIX||'.debug'

Line 1956: fnd_file.PUT_LINE(fnd_file.LOG,'lv_trx_type'||lv_trx_type);

1952: WHEN OTHERS THEN
1953: RAISE;
1954: END;
1955: END IF;
1956: fnd_file.PUT_LINE(fnd_file.LOG,'lv_trx_type'||lv_trx_type);
1957:
1958: /* only Special and Recycle VAT invoices with transaction class
1959: * 'Credit Memo' will be check their Prefix format, and if there
1960: * duplicated descriptions exist.

Line 3143: --FND_FILE.Put_Line(FND_FILE.Log, 'export_Invoices_from_Workbench. end');

3139: ,G_MODULE_PREFIX||'.'||l_procedure_name||'.end'
3140: ,'Exit procedure');
3141: END IF; --( l_proc_level >= l_dbg_level )
3142:
3143: --FND_FILE.Put_Line(FND_FILE.Log, 'export_Invoices_from_Workbench. end');
3144: EXCEPTION
3145:
3146: WHEN OTHERS THEN
3147: IF(l_proc_level >= l_dbg_level)

Line 3757: fnd_file.put_line(fnd_file.OUTPUT, fnd_message.get());

3753: IF fnd_profile.VALUE('CE_MASK_INTERNAL_BANK_ACCT_NUM') <> 'NO MASK'
3754: THEN
3755: fnd_message.set_name('AR', 'AR_GTA_BANKACCOUNT_MASKING');
3756:
3757: fnd_file.put_line(fnd_file.OUTPUT, fnd_message.get());
3758:
3759: IF(FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
3760: THEN
3761: fnd_log.STRING(fnd_log.LEVEL_UNEXPECTED

Line 3778: fnd_file.put_line(fnd_file.output, fnd_message.get());

3774: fnd_message.set_name('AR', 'AR_GTA_CUSTOMER_EXPORT_LNA');
3775: fnd_message.set_token('PREFIX', '{');
3776: fnd_message.set_token('MIDFIX', '}[');
3777: fnd_message.set_token('SUFFIX', ']"~~"');
3778: fnd_file.put_line(fnd_file.output, fnd_message.get());
3779:
3780: -- message line 2
3781: fnd_message.set_name('AR', 'AR_GTA_CUSTOMER_EXPORT_LNB');
3782: fnd_message.set_token('PREFIX', '//');

Line 3784: fnd_file.put_line(fnd_file.output, fnd_message.get());

3780: -- message line 2
3781: fnd_message.set_name('AR', 'AR_GTA_CUSTOMER_EXPORT_LNB');
3782: fnd_message.set_token('PREFIX', '//');
3783: fnd_message.set_token('SUFFIX', ':');
3784: fnd_file.put_line(fnd_file.output, fnd_message.get());
3785:
3786: -- message line 3
3787: fnd_message.set_name('AR', 'AR_GTA_CUSTOMER_EXPORT_LNC');
3788: fnd_message.set_token('PREFIX', '//');

Line 3790: fnd_file.put_line(fnd_file.output, fnd_message.get());

3786: -- message line 3
3787: fnd_message.set_name('AR', 'AR_GTA_CUSTOMER_EXPORT_LNC');
3788: fnd_message.set_token('PREFIX', '//');
3789: fnd_message.set_token('MIDFIX', '~~');
3790: fnd_file.put_line(fnd_file.output, fnd_message.get());
3791:
3792: l_customer_num_from :=nvl(p_customer_num_from,' ');
3793: l_customer_num_to :=nvl(p_customer_num_to,rpad('z',30,'z'));
3794: l_customer_name_from :=nvl(p_customer_name_from,' ');

Line 3823: fnd_file.put_line(fnd_file.OUTPUT, l_comment||l_error_string);

3819: IF l_count = 0
3820: THEN
3821: fnd_message.set_name('AR', 'AR_GTA_NO_DATA_FOUND');
3822: l_error_string := fnd_message.get();
3823: fnd_file.put_line(fnd_file.OUTPUT, l_comment||l_error_string);
3824: END IF;
3825:
3826: OPEN c_customer(l_customer_num_from
3827: ,l_customer_num_to

Line 4217: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_string);

4213: */
4214: /*
4215: fnd_message.set_name('AR', 'AR_GTA_MUL_BANK_ON_CUSTOMER');
4216: l_error_string := fnd_message.GET;
4217: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_string);
4218: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);
4219: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_customer_number
4220: ||l_bound
4221: ||l_customer_name

Line 4218: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);

4214: /*
4215: fnd_message.set_name('AR', 'AR_GTA_MUL_BANK_ON_CUSTOMER');
4216: l_error_string := fnd_message.GET;
4217: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_string);
4218: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);
4219: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_customer_number
4220: ||l_bound
4221: ||l_customer_name
4222: ||l_bound

Line 4219: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_customer_number

4215: fnd_message.set_name('AR', 'AR_GTA_MUL_BANK_ON_CUSTOMER');
4216: l_error_string := fnd_message.GET;
4217: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_string);
4218: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);
4219: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_customer_number
4220: ||l_bound
4221: ||l_customer_name
4222: ||l_bound
4223: ||l_alternate_name

Line 4231: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);

4227: ||l_address_phonenumber
4228: ||l_bound
4229: ||l_bank_account
4230: );
4231: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);
4232: */
4233: l_bank_exceed_tbl.EXTEND;
4234: l_bank_exceed_tbl(l_bank_exceed_tbl.COUNT) := l_customer_number
4235: ||l_bound

Line 4246: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_customer_number

4242: ||l_address_phonenumber
4243: ||l_bound
4244: ||l_bank_account;
4245: ELSE
4246: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_customer_number
4247: ||l_bound
4248: ||l_customer_name
4249: ||l_bound
4250: ||l_alternate_name

Line 4273: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);

4269: -- output AR_GTA_INVALID_LENGTH
4270: fnd_message.SET_NAME('AR', 'AR_GTA_INVALID_LENGTH');
4271: l_error_string := fnd_message.get;
4272:
4273: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
4274: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
4275: fnd_file.put_line(fnd_file.output, '');
4276:
4277: l_index := l_taxpayer_tbl.FIRST;

Line 4274: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);

4270: fnd_message.SET_NAME('AR', 'AR_GTA_INVALID_LENGTH');
4271: l_error_string := fnd_message.get;
4272:
4273: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
4274: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
4275: fnd_file.put_line(fnd_file.output, '');
4276:
4277: l_index := l_taxpayer_tbl.FIRST;
4278: WHILE l_index IS NOT NULL

Line 4275: fnd_file.put_line(fnd_file.output, '');

4271: l_error_string := fnd_message.get;
4272:
4273: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
4274: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
4275: fnd_file.put_line(fnd_file.output, '');
4276:
4277: l_index := l_taxpayer_tbl.FIRST;
4278: WHILE l_index IS NOT NULL
4279: LOOP

Line 4280: fnd_file.put_line(fnd_file.output, l_taxpayer_tbl(l_index));

4276:
4277: l_index := l_taxpayer_tbl.FIRST;
4278: WHILE l_index IS NOT NULL
4279: LOOP
4280: fnd_file.put_line(fnd_file.output, l_taxpayer_tbl(l_index));
4281: l_index := l_taxpayer_tbl.NEXT(l_index);
4282: END LOOP;
4283:
4284: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);

Line 4284: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);

4280: fnd_file.put_line(fnd_file.output, l_taxpayer_tbl(l_index));
4281: l_index := l_taxpayer_tbl.NEXT(l_index);
4282: END LOOP;
4283:
4284: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);
4285:
4286: END IF;
4287: */
4288:

Line 4299: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);

4295: fnd_message.set_name('AR', 'AR_GTA_MUL_BANK_ON_CUSTOMER');
4296: fnd_message.set_token(TOKEN => 'NUMBER'
4297: ,VALUE => l_bank_exceed_tbl.COUNT);
4298: l_error_string := fnd_message.GET;
4299: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
4300: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
4301: fnd_file.put_line(fnd_file.output, '');
4302:
4303: l_index := l_bank_exceed_tbl.FIRST;

Line 4300: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);

4296: fnd_message.set_token(TOKEN => 'NUMBER'
4297: ,VALUE => l_bank_exceed_tbl.COUNT);
4298: l_error_string := fnd_message.GET;
4299: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
4300: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
4301: fnd_file.put_line(fnd_file.output, '');
4302:
4303: l_index := l_bank_exceed_tbl.FIRST;
4304: WHILE l_index IS NOT NULL

Line 4301: fnd_file.put_line(fnd_file.output, '');

4297: ,VALUE => l_bank_exceed_tbl.COUNT);
4298: l_error_string := fnd_message.GET;
4299: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
4300: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
4301: fnd_file.put_line(fnd_file.output, '');
4302:
4303: l_index := l_bank_exceed_tbl.FIRST;
4304: WHILE l_index IS NOT NULL
4305: LOOP

Line 4306: fnd_file.put_line(fnd_file.output, l_bank_exceed_tbl(l_index));

4302:
4303: l_index := l_bank_exceed_tbl.FIRST;
4304: WHILE l_index IS NOT NULL
4305: LOOP
4306: fnd_file.put_line(fnd_file.output, l_bank_exceed_tbl(l_index));
4307: l_index := l_bank_exceed_tbl.NEXT(l_index);
4308: END LOOP;
4309:
4310: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);

Line 4310: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);

4306: fnd_file.put_line(fnd_file.output, l_bank_exceed_tbl(l_index));
4307: l_index := l_bank_exceed_tbl.NEXT(l_index);
4308: END LOOP;
4309:
4310: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);
4311: END IF ;
4312: -----------------------------------------------------------------
4313: IF l_exceed_tbl.COUNT > 0
4314: THEN

Line 4318: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);

4314: THEN
4315: -- output AR_GTA_EXCEEDL_LENGTH message
4316: fnd_message.set_name('AR', 'AR_GTA_EXCEED_LENGTH');
4317: l_error_string := fnd_message.GET;
4318: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
4319: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
4320: fnd_file.put_line(fnd_file.output, '');
4321:
4322: l_index := l_exceed_tbl.FIRST;

Line 4319: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);

4315: -- output AR_GTA_EXCEEDL_LENGTH message
4316: fnd_message.set_name('AR', 'AR_GTA_EXCEED_LENGTH');
4317: l_error_string := fnd_message.GET;
4318: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
4319: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
4320: fnd_file.put_line(fnd_file.output, '');
4321:
4322: l_index := l_exceed_tbl.FIRST;
4323: WHILE l_index IS NOT NULL

Line 4320: fnd_file.put_line(fnd_file.output, '');

4316: fnd_message.set_name('AR', 'AR_GTA_EXCEED_LENGTH');
4317: l_error_string := fnd_message.GET;
4318: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
4319: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
4320: fnd_file.put_line(fnd_file.output, '');
4321:
4322: l_index := l_exceed_tbl.FIRST;
4323: WHILE l_index IS NOT NULL
4324: LOOP

Line 4325: fnd_file.put_line(fnd_file.output, l_exceed_tbl(l_index));

4321:
4322: l_index := l_exceed_tbl.FIRST;
4323: WHILE l_index IS NOT NULL
4324: LOOP
4325: fnd_file.put_line(fnd_file.output, l_exceed_tbl(l_index));
4326: l_index := l_exceed_tbl.NEXT(l_index);
4327: END LOOP;
4328:
4329: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);

Line 4329: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);

4325: fnd_file.put_line(fnd_file.output, l_exceed_tbl(l_index));
4326: l_index := l_exceed_tbl.NEXT(l_index);
4327: END LOOP;
4328:
4329: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);
4330: END IF ;
4331:
4332:
4333: IF(l_proc_level >= l_dbg_level)

Line 4567: FND_FILE.Put_Line(FND_FILE.Output,FND_MESSAGE.GET);

4563: );
4564: FND_MESSAGE.Set_Token(TOKEN =>'SUFFIX'
4565: ,VALUE => ']"~~"'
4566: );
4567: FND_FILE.Put_Line(FND_FILE.Output,FND_MESSAGE.GET);
4568:
4569: --Line2
4570: FND_MESSAGE.Set_Name(application => 'AR'
4571: ,name => 'AR_GTA_CUSTOMER_EXPORT_LNB'

Line 4579: FND_FILE.Put_Line(FND_FILE.Output,FND_MESSAGE.GET);

4575: );
4576: FND_MESSAGE.Set_Token(TOKEN =>'SUFFIX'
4577: ,VALUE => ':'
4578: );
4579: FND_FILE.Put_Line(FND_FILE.Output,FND_MESSAGE.GET);
4580:
4581: --Line3
4582: FND_MESSAGE.Set_Name(application => 'AR'
4583: ,name => 'AR_GTA_ITEM_EXPORT_LNB'

Line 4591: FND_FILE.Put_Line(FND_FILE.Output,FND_MESSAGE.GET);

4587: );
4588: FND_MESSAGE.Set_Token(TOKEN =>'MIDFIX'
4589: ,VALUE => '~~'
4590: );
4591: FND_FILE.Put_Line(FND_FILE.Output,FND_MESSAGE.GET);
4592:
4593: l_idx:='';
4594: l_idx:=l_export_item.FIRST;
4595: WHILE l_idx IS NOT NULL

Line 4620: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);

4616: ||l_export_item(l_idx).uom||'~~'
4617: ||'~~'
4618: ;
4619:
4620: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);
4621: l_idx:=l_export_item.NEXT(l_idx);
4622: END LOOP; -- l_idx IS NOT NULL
4623: END IF; --l_export_item.COUNT>0
4624:

Line 4629: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');

4625:
4626: --export exception item records
4627: IF l_noreference.COUNT>0
4628: THEN --export items that don't define cross reference
4629: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4630: FND_MESSAGE.Set_Name('AR','AR_GTA_ITEM_MISSING_CROSS_REF');
4631: FND_FILE.Put_Line(FND_FILE.Output,'//'||FND_MESSAGE.Get);
4632:
4633: l_idx:='';

Line 4631: FND_FILE.Put_Line(FND_FILE.Output,'//'||FND_MESSAGE.Get);

4627: IF l_noreference.COUNT>0
4628: THEN --export items that don't define cross reference
4629: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4630: FND_MESSAGE.Set_Name('AR','AR_GTA_ITEM_MISSING_CROSS_REF');
4631: FND_FILE.Put_Line(FND_FILE.Output,'//'||FND_MESSAGE.Get);
4632:
4633: l_idx:='';
4634: l_idx:=l_noreference.FIRST;
4635: WHILE l_idx IS NOT NULL

Line 4638: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);

4634: l_idx:=l_noreference.FIRST;
4635: WHILE l_idx IS NOT NULL
4636: LOOP
4637: l_export_record:='//'||l_noreference(l_idx);
4638: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);
4639: l_idx:=l_noreference.NEXT(l_idx);
4640: END LOOP; -- l_idx IS NOT NULL
4641:
4642: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');

Line 4642: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');

4638: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);
4639: l_idx:=l_noreference.NEXT(l_idx);
4640: END LOOP; -- l_idx IS NOT NULL
4641:
4642: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4643: END IF; --l_noreference.COUNT>0
4644:
4645: IF l_item_length_exp.COUNT>0
4646: THEN --export items that exceed length limitation

Line 4647: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');

4643: END IF; --l_noreference.COUNT>0
4644:
4645: IF l_item_length_exp.COUNT>0
4646: THEN --export items that exceed length limitation
4647: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4648: FND_MESSAGE.Set_Name('AR','AR_GTA_EXCEED_LENGTH');
4649: FND_FILE.Put_Line(FND_FILE.Output,'//'||FND_MESSAGE.Get);
4650:
4651: l_idx:='';

Line 4649: FND_FILE.Put_Line(FND_FILE.Output,'//'||FND_MESSAGE.Get);

4645: IF l_item_length_exp.COUNT>0
4646: THEN --export items that exceed length limitation
4647: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4648: FND_MESSAGE.Set_Name('AR','AR_GTA_EXCEED_LENGTH');
4649: FND_FILE.Put_Line(FND_FILE.Output,'//'||FND_MESSAGE.Get);
4650:
4651: l_idx:='';
4652: l_idx:=l_item_length_exp.FIRST;
4653: WHILE l_idx IS NOT NULL

Line 4666: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);

4662: ||l_item_length_exp(l_idx).uom||'~~'
4663: ||'~~'
4664: ;
4665:
4666: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);
4667: l_idx:=l_item_length_exp.NEXT(l_idx);
4668: END LOOP; --l_idx IS NOT NULL
4669:
4670: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');

Line 4670: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');

4666: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);
4667: l_idx:=l_item_length_exp.NEXT(l_idx);
4668: END LOOP; --l_idx IS NOT NULL
4669:
4670: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4671: END IF; --l_item_lengh_exp.COUNT>0
4672:
4673: --log for debug
4674: IF( l_proc_level >= l_dbg_level )

Line 5178: FND_FILE.Put_Line(FND_FILE.Output

5174: IF l_export_item_count=0
5175: THEN --no data found
5176: FND_MESSAGE.Set_Name('AR','AR_GTA_NO_DATA_FOUND');
5177: l_nodatafound_msg:='//'||FND_MESSAGE.Get;
5178: FND_FILE.Put_Line(FND_FILE.Output
5179: ,l_nodatafound_msg
5180: );
5181: ELSIF l_export_item_count>0
5182: THEN