[Home] [Help]
90: AND jclllbg.Ledger_Id = pn_ledger_id
91: AND jclllbg.Legal_Entity_Id = pn_legal_entity_id)
92: AND NOT EXISTS
93: (SELECT je_header_id, je_line_number
94: FROM ja_cn_voucher_number jcvn
95: WHERE gjh.je_header_id = jcvn.je_header_id
96: AND gjl.je_line_num = jcvn.je_line_number
97: AND jcvn.ledger_id = pn_ledger_id
98: AND jcvn.legal_entity_id = pn_legal_entity_id
119: AND gjh.status = 'P'
120: AND gjh.period_name = pv_period_name
121: AND NOT EXISTS
122: (SELECT je_header_id, je_line_number
123: FROM ja_cn_voucher_number jcvn
124: WHERE gjh.je_header_id = jcvn.je_header_id
125: AND gjl.je_line_num = jcvn.je_line_number
126: AND jcvn.ledger_id = pn_ledger_id
127: AND jcvn.legal_entity_id = pn_legal_entity_id
153: WHERE ledger_id = pn_ledger_id;
154: -- BSV is assigned, only the parameter legal entity will be handled.
155: IF (ln_bsv_assigned_num > 0) THEN
156: IF (pv_regenerate_flag = 'Y') THEN
157: DELETE FROM ja_cn_voucher_number
158: WHERE ledger_id = pn_ledger_id
159: AND (data_source_tag <> 'M' or data_source_tag is null)
160: AND legal_entity_id = pn_legal_entity_id
161: AND period_name = pv_period_name;
161: AND period_name = pv_period_name;
162: END IF; --IF(pv_regenerate_flag = 'Y')
163: SELECT NVL(MAX(jcvn.voucher_number), 0)
164: INTO ln_voucher_number
165: FROM ja_cn_voucher_number jcvn
166: WHERE jcvn.ledger_id = pn_ledger_id
167: AND jcvn.legal_entity_id = pn_legal_entity_id
168: AND jcvn.period_name = pv_period_name;
169: ln_last_header_id := -1;
172: IF (ln_je_header_id <> ln_last_header_id) THEN
173: ln_voucher_number := ln_voucher_number + 1;
174: END IF; --IF(ln_je_header_id <> ln_last_header_id)
175:
176: INSERT INTO ja_cn_voucher_number
177: (ledger_id,
178: legal_entity_id,
179: period_name,
180: je_header_id,
202: ln_last_header_id := v_row.je_header_id;
203: END LOOP; -- FOR v_row IN voucher_cur
204: ELSE
205: IF (pv_regenerate_flag = 'Y') THEN
206: DELETE FROM ja_cn_voucher_number
207: WHERE ledger_id = pn_ledger_id
208: AND (data_source_tag <> 'M' or data_source_tag is null)
209: AND period_name = pv_period_name;
210: END IF; --IF(pv_regenerate_flag = 'Y')
209: AND period_name = pv_period_name;
210: END IF; --IF(pv_regenerate_flag = 'Y')
211: SELECT NVL(MAX(jcvn.voucher_number), 0)
212: INTO ln_voucher_number
213: FROM ja_cn_voucher_number jcvn
214: WHERE jcvn.ledger_id = pn_ledger_id
215: AND jcvn.period_name = pv_period_name;
216: ln_last_header_id := -1;
217: FOR v_row IN voucher_no_bsv_cur LOOP
220: ln_voucher_number := ln_voucher_number + 1;
221: END IF; --IF(ln_je_header_id <> ln_last_header_id)
222:
223: FOR v_row1 IN bsv_legal_entity_cur LOOP
224: INSERT INTO ja_cn_voucher_number
225: (ledger_id,
226: legal_entity_id,
227: period_name,
228: je_header_id,
443: MAX(VOUCHER_NUMBER),
444: MIN(VOUCHER_NUMBER)
445: INTO JOURNAL_AMOUNT, VOUCHER_NUMBER_TO, VOUCHER_NUMBER_FROM
446: FROM (SELECT DISTINCT VOUCHER_NUMBER
447: FROM JA_CN_VOUCHER_NUMBER
448: WHERE PERIOD_NAME = v_row.period_name
449: AND (data_source_tag <> 'M' or data_source_tag is null)
450: AND REQUEST_ID = fnd_global.CONC_REQUEST_ID);
451: IF (JOURNAL_AMOUNT <> 0) THEN
449: AND (data_source_tag <> 'M' or data_source_tag is null)
450: AND REQUEST_ID = fnd_global.CONC_REQUEST_ID);
451: IF (JOURNAL_AMOUNT <> 0) THEN
452: Fnd_Message.Set_Name(Application => 'JA',
453: NAME => 'JA_CN_VOUCHER_NUMBER_HAS_DATA');
454: Fnd_Message.SET_TOKEN(TOKEN => 'PERIOD_NAME',
455: VALUE => v_row.period_name);
456: Fnd_Message.SET_TOKEN(TOKEN => 'VOUCHER_NUMBER_FROM',
457: VALUE => VOUCHER_NUMBER_FROM);
464: --Output error message
465: Fnd_File.Put_Line(Fnd_File.Output, l_Error_Msg);
466: ELSE
467: Fnd_Message.Set_Name(Application => 'JA',
468: NAME => 'JA_CN_VOUCHER_NUMBER_NO_DATA');
469: Fnd_Message.SET_TOKEN(TOKEN => 'PERIOD_NAME', VALUE => v_row.period_name);
470: l_Error_Msg := Fnd_Message.Get;
471:
472: --Output error message