DBA Data[Home] [Help]

APPS.JMF_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 220: FND_FILE.Put_Line(FND_FILE.Output,p_str);

216: ( p_str IN VARCHAR2
217: )
218: IS
219: BEGIN
220: FND_FILE.Put_Line(FND_FILE.Output,p_str);
221:
222: END Put_Line;
223:
224: --==========================================================================

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

245: ( p_str IN VARCHAR2
246: )
247: IS
248: BEGIN
249: --FND_FILE.Put_Line(FND_FILE.Log,p_str);
250: IF(FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
251: THEN
252: fnd_log.STRING(LOG_LEVEL => fnd_log.LEVEL_STATEMENT
253: ,MODULE => G_MODULE_PREFIX||'.debug'

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

2917: ,G_MODULE_PREFIX||'.'||l_procedure_name||'.end'
2918: ,'Exit procedure');
2919: END IF; --( l_proc_level >= l_dbg_level )
2920:
2921: --FND_FILE.Put_Line(FND_FILE.Log, 'export_Invoices_from_Workbench. end');
2922: EXCEPTION
2923:
2924: WHEN OTHERS THEN
2925: IF(l_proc_level >= l_dbg_level)

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

3379: IF fnd_profile.VALUE('CE_MASK_INTERNAL_BANK_ACCT_NUM') <> 'NO MASK'
3380: THEN
3381: fnd_message.set_name('JMF', 'JMF_GTA_BANKACCOUNT_MASKING');
3382:
3383: fnd_file.put_line(fnd_file.OUTPUT, fnd_message.get());
3384:
3385: IF(FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
3386: THEN
3387: fnd_log.STRING(fnd_log.LEVEL_UNEXPECTED

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

3400: fnd_message.set_name('JMF', 'JMF_GTA_CUSTOMER_EXPORT_LNA');
3401: fnd_message.set_token('PREFIX', '{');
3402: fnd_message.set_token('MIDFIX', '}[');
3403: fnd_message.set_token('SUFFIX', ']"~~"');
3404: fnd_file.put_line(fnd_file.output, fnd_message.get());
3405:
3406: -- message line 2
3407: fnd_message.set_name('JMF', 'JMF_GTA_CUSTOMER_EXPORT_LNB');
3408: fnd_message.set_token('PREFIX', '//');

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

3406: -- message line 2
3407: fnd_message.set_name('JMF', 'JMF_GTA_CUSTOMER_EXPORT_LNB');
3408: fnd_message.set_token('PREFIX', '//');
3409: fnd_message.set_token('SUFFIX', ':');
3410: fnd_file.put_line(fnd_file.output, fnd_message.get());
3411:
3412: -- message line 3
3413: fnd_message.set_name('JMF', 'JMF_GTA_CUSTOMER_EXPORT_LNC');
3414: fnd_message.set_token('PREFIX', '//');

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

3412: -- message line 3
3413: fnd_message.set_name('JMF', 'JMF_GTA_CUSTOMER_EXPORT_LNC');
3414: fnd_message.set_token('PREFIX', '//');
3415: fnd_message.set_token('MIDFIX', '~~');
3416: fnd_file.put_line(fnd_file.output, fnd_message.get());
3417:
3418: l_customer_num_from :=nvl(p_customer_num_from,' ');
3419: l_customer_num_to :=nvl(p_customer_num_to,rpad('z',30,'z'));
3420: l_customer_name_from :=nvl(p_customer_name_from,' ');

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

3442: IF l_count = 0
3443: THEN
3444: fnd_message.set_name('JMF', 'JMF_GTA_NO_DATA_FOUND');
3445: l_error_string := fnd_message.get();
3446: fnd_file.put_line(fnd_file.OUTPUT, l_comment||l_error_string);
3447: END IF;
3448:
3449: OPEN c_customer(l_customer_num_from
3450: ,l_customer_num_to

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

3729: ||l_bound
3730: ||l_bank_account;
3731:
3732: ELSE
3733: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_customer_number
3734: ||l_bound
3735: ||l_customer_name
3736: ||l_bound
3737: ||l_alternate_name

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

3754: -- output JMF_GTA_INVALID_LENGTH
3755: fnd_message.SET_NAME('JMF', 'JMF_GTA_INVALID_LENGTH');
3756: l_error_string := fnd_message.get;
3757:
3758: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
3759: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
3760: fnd_file.put_line(fnd_file.output, '');
3761:
3762: l_index := l_taxpayer_tbl.FIRST;

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

3755: fnd_message.SET_NAME('JMF', 'JMF_GTA_INVALID_LENGTH');
3756: l_error_string := fnd_message.get;
3757:
3758: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
3759: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
3760: fnd_file.put_line(fnd_file.output, '');
3761:
3762: l_index := l_taxpayer_tbl.FIRST;
3763: WHILE l_index IS NOT NULL

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

3756: l_error_string := fnd_message.get;
3757:
3758: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
3759: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
3760: fnd_file.put_line(fnd_file.output, '');
3761:
3762: l_index := l_taxpayer_tbl.FIRST;
3763: WHILE l_index IS NOT NULL
3764: LOOP

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

3761:
3762: l_index := l_taxpayer_tbl.FIRST;
3763: WHILE l_index IS NOT NULL
3764: LOOP
3765: fnd_file.put_line(fnd_file.output, l_taxpayer_tbl(l_index));
3766: l_index := l_taxpayer_tbl.NEXT(l_index);
3767: END LOOP;
3768:
3769: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);

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

3765: fnd_file.put_line(fnd_file.output, l_taxpayer_tbl(l_index));
3766: l_index := l_taxpayer_tbl.NEXT(l_index);
3767: END LOOP;
3768:
3769: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);
3770:
3771: END IF;
3772: */
3773: IF l_exceed_tbl.COUNT > 0

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

3774: THEN
3775: -- output JMF_GTA_EXCEEDL_LENGTH message
3776: fnd_message.set_name('JMF', 'JMF_GTA_EXCEED_LENGTH');
3777: l_error_string := fnd_message.GET;
3778: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
3779: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
3780: fnd_file.put_line(fnd_file.output, '');
3781:
3782: l_index := l_exceed_tbl.FIRST;

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

3775: -- output JMF_GTA_EXCEEDL_LENGTH message
3776: fnd_message.set_name('JMF', 'JMF_GTA_EXCEED_LENGTH');
3777: l_error_string := fnd_message.GET;
3778: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
3779: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
3780: fnd_file.put_line(fnd_file.output, '');
3781:
3782: l_index := l_exceed_tbl.FIRST;
3783: WHILE l_index IS NOT NULL

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

3776: fnd_message.set_name('JMF', 'JMF_GTA_EXCEED_LENGTH');
3777: l_error_string := fnd_message.GET;
3778: fnd_file.put_line(fnd_file.output, l_comment||l_error_bound);
3779: fnd_file.PUT_LINE(fnd_file.output, l_comment||l_error_string);
3780: fnd_file.put_line(fnd_file.output, '');
3781:
3782: l_index := l_exceed_tbl.FIRST;
3783: WHILE l_index IS NOT NULL
3784: LOOP

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

3781:
3782: l_index := l_exceed_tbl.FIRST;
3783: WHILE l_index IS NOT NULL
3784: LOOP
3785: fnd_file.put_line(fnd_file.output, l_exceed_tbl(l_index));
3786: l_index := l_exceed_tbl.NEXT(l_index);
3787: END LOOP;
3788:
3789: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);

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

3785: fnd_file.put_line(fnd_file.output, l_exceed_tbl(l_index));
3786: l_index := l_exceed_tbl.NEXT(l_index);
3787: END LOOP;
3788:
3789: fnd_file.PUT_LINE(fnd_file.OUTPUT, l_comment||l_error_bound);
3790: END IF ;
3791:
3792:
3793: IF(l_proc_level >= l_dbg_level)

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

4023: );
4024: FND_MESSAGE.Set_Token(TOKEN =>'SUFFIX'
4025: ,VALUE => ']"~~"'
4026: );
4027: FND_FILE.Put_Line(FND_FILE.Output,FND_MESSAGE.GET);
4028:
4029: --Line2
4030: FND_MESSAGE.Set_Name(application => 'JMF'
4031: ,name => 'JMF_GTA_CUSTOMER_EXPORT_LNB'

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

4035: );
4036: FND_MESSAGE.Set_Token(TOKEN =>'SUFFIX'
4037: ,VALUE => ':'
4038: );
4039: FND_FILE.Put_Line(FND_FILE.Output,FND_MESSAGE.GET);
4040:
4041: --Line3
4042: FND_MESSAGE.Set_Name(application => 'JMF'
4043: ,name => 'JMF_GTA_ITEM_EXPORT_LNB'

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

4047: );
4048: FND_MESSAGE.Set_Token(TOKEN =>'MIDFIX'
4049: ,VALUE => '~~'
4050: );
4051: FND_FILE.Put_Line(FND_FILE.Output,FND_MESSAGE.GET);
4052:
4053: l_idx:='';
4054: l_idx:=l_export_item.FIRST;
4055: WHILE l_idx IS NOT NULL

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

4076: ||l_export_item(l_idx).uom||'~~'
4077: ||'~~'
4078: ;
4079:
4080: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);
4081: l_idx:=l_export_item.NEXT(l_idx);
4082: END LOOP; -- l_idx IS NOT NULL
4083: END IF; --l_export_item.COUNT>0
4084:

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

4085:
4086: --export exception item records
4087: IF l_noreference.COUNT>0
4088: THEN --export items that don't define cross reference
4089: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4090: FND_MESSAGE.Set_Name('JMF','JMF_GTA_ITEM_MISSING_CROSS_REF');
4091: FND_FILE.Put_Line(FND_FILE.Output,'//'||FND_MESSAGE.Get);
4092:
4093: l_idx:='';

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

4087: IF l_noreference.COUNT>0
4088: THEN --export items that don't define cross reference
4089: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4090: FND_MESSAGE.Set_Name('JMF','JMF_GTA_ITEM_MISSING_CROSS_REF');
4091: FND_FILE.Put_Line(FND_FILE.Output,'//'||FND_MESSAGE.Get);
4092:
4093: l_idx:='';
4094: l_idx:=l_noreference.FIRST;
4095: WHILE l_idx IS NOT NULL

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

4094: l_idx:=l_noreference.FIRST;
4095: WHILE l_idx IS NOT NULL
4096: LOOP
4097: l_export_record:='//'||l_noreference(l_idx);
4098: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);
4099: l_idx:=l_noreference.NEXT(l_idx);
4100: END LOOP; -- l_idx IS NOT NULL
4101:
4102: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');

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

4098: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);
4099: l_idx:=l_noreference.NEXT(l_idx);
4100: END LOOP; -- l_idx IS NOT NULL
4101:
4102: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4103: END IF; --l_noreference.COUNT>0
4104:
4105: IF l_item_length_exp.COUNT>0
4106: THEN --export items that exceed length limitation

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

4103: END IF; --l_noreference.COUNT>0
4104:
4105: IF l_item_length_exp.COUNT>0
4106: THEN --export items that exceed length limitation
4107: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4108: FND_MESSAGE.Set_Name('JMF','JMF_GTA_EXCEED_LENGTH');
4109: FND_FILE.Put_Line(FND_FILE.Output,'//'||FND_MESSAGE.Get);
4110:
4111: l_idx:='';

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

4105: IF l_item_length_exp.COUNT>0
4106: THEN --export items that exceed length limitation
4107: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4108: FND_MESSAGE.Set_Name('JMF','JMF_GTA_EXCEED_LENGTH');
4109: FND_FILE.Put_Line(FND_FILE.Output,'//'||FND_MESSAGE.Get);
4110:
4111: l_idx:='';
4112: l_idx:=l_item_length_exp.FIRST;
4113: WHILE l_idx IS NOT NULL

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

4122: ||l_item_length_exp(l_idx).uom||'~~'
4123: ||'~~'
4124: ;
4125:
4126: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);
4127: l_idx:=l_item_length_exp.NEXT(l_idx);
4128: END LOOP; --l_idx IS NOT NULL
4129:
4130: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');

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

4126: FND_FILE.Put_Line(FND_FILE.Output,l_export_record);
4127: l_idx:=l_item_length_exp.NEXT(l_idx);
4128: END LOOP; --l_idx IS NOT NULL
4129:
4130: FND_FILE.Put_Line(FND_FILE.Output,'//******************************');
4131: END IF; --l_item_lengh_exp.COUNT>0
4132:
4133: --log for debug
4134: IF( l_proc_level >= l_dbg_level )

Line 4566: FND_FILE.Put_Line(FND_FILE.Output

4562: IF l_export_item_count=0
4563: THEN --no data found
4564: FND_MESSAGE.Set_Name('JMF','JMF_GTA_NO_DATA_FOUND');
4565: l_nodatafound_msg:='//'||FND_MESSAGE.Get;
4566: FND_FILE.Put_Line(FND_FILE.Output
4567: ,l_nodatafound_msg
4568: );
4569: ELSIF l_export_item_count>0
4570: THEN