231: l_gross_cards := trunc (l_replenish_qty / l_size);
232: mydebug('l_gross_cards ' || l_gross_cards);
233: EXCEPTION
234: WHEN ZERO_DIVIDE THEN
235: FND_MESSAGE.SET_NAME('FLM','FLM_NO_REPL_ZERO_SIZE');
236: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
237: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
238: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
239: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
232: mydebug('l_gross_cards ' || l_gross_cards);
233: EXCEPTION
234: WHEN ZERO_DIVIDE THEN
235: FND_MESSAGE.SET_NAME('FLM','FLM_NO_REPL_ZERO_SIZE');
236: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
237: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
238: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
239: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
240: l_msg_data := fnd_message.get;
233: EXCEPTION
234: WHEN ZERO_DIVIDE THEN
235: FND_MESSAGE.SET_NAME('FLM','FLM_NO_REPL_ZERO_SIZE');
236: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
237: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
238: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
239: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
240: l_msg_data := fnd_message.get;
241: fnd_file.put_line(fnd_file.output,l_msg_data);
234: WHEN ZERO_DIVIDE THEN
235: FND_MESSAGE.SET_NAME('FLM','FLM_NO_REPL_ZERO_SIZE');
236: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
237: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
238: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
239: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
240: l_msg_data := fnd_message.get;
241: fnd_file.put_line(fnd_file.output,l_msg_data);
242: mydebug(l_msg_data);
235: FND_MESSAGE.SET_NAME('FLM','FLM_NO_REPL_ZERO_SIZE');
236: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
237: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
238: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
239: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
240: l_msg_data := fnd_message.get;
241: fnd_file.put_line(fnd_file.output,l_msg_data);
242: mydebug(l_msg_data);
243: l_error_count := l_error_count+1;
236: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
237: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
238: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
239: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
240: l_msg_data := fnd_message.get;
241: fnd_file.put_line(fnd_file.output,l_msg_data);
242: mydebug(l_msg_data);
243: l_error_count := l_error_count+1;
244: CONTINUE pull_seq_loop ;
355: mydebug('After replenishing FULL Cards - Others l_net_replenish_cards ' || l_net_replenish_cards);
356: CONTINUE pull_seq_loop WHEN (l_net_replenish_cards = 0);
357:
358: IF (l_net_replenish_cards <> 0) THEN
359: FND_MESSAGE.SET_NAME('FLM','FLM_INSUFFICIENT_REPL_CARDS');
360: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
361: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
362: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
363: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
356: CONTINUE pull_seq_loop WHEN (l_net_replenish_cards = 0);
357:
358: IF (l_net_replenish_cards <> 0) THEN
359: FND_MESSAGE.SET_NAME('FLM','FLM_INSUFFICIENT_REPL_CARDS');
360: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
361: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
362: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
363: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
364: l_msg_data := fnd_message.get;
357:
358: IF (l_net_replenish_cards <> 0) THEN
359: FND_MESSAGE.SET_NAME('FLM','FLM_INSUFFICIENT_REPL_CARDS');
360: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
361: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
362: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
363: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
364: l_msg_data := fnd_message.get;
365: fnd_file.put_line(fnd_file.output,l_msg_data);
358: IF (l_net_replenish_cards <> 0) THEN
359: FND_MESSAGE.SET_NAME('FLM','FLM_INSUFFICIENT_REPL_CARDS');
360: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
361: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
362: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
363: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
364: l_msg_data := fnd_message.get;
365: fnd_file.put_line(fnd_file.output,l_msg_data);
366: mydebug(l_msg_data);
359: FND_MESSAGE.SET_NAME('FLM','FLM_INSUFFICIENT_REPL_CARDS');
360: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
361: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
362: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
363: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
364: l_msg_data := fnd_message.get;
365: fnd_file.put_line(fnd_file.output,l_msg_data);
366: mydebug(l_msg_data);
367: l_error_count := l_error_count+1;
360: FND_MESSAGE.SET_TOKEN('ORG_CODE',l_org_code);
361: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
362: FND_MESSAGE.SET_TOKEN('SUB_CODE',l_Subinventory);
363: FND_MESSAGE.SET_TOKEN('LOCATOR_NAME',l_loc_name);
364: l_msg_data := fnd_message.get;
365: fnd_file.put_line(fnd_file.output,l_msg_data);
366: mydebug(l_msg_data);
367: l_error_count := l_error_count+1;
368: END IF;
372: commit;
373:
374: if l_error_count = 0 then
375: retcode :=1;
376: FND_MESSAGE.SET_NAME('FLM','FLM_SUCCESS_LOGICAL_REPLENISH');
377: errbuf := fnd_message.get;
378: fnd_file.put_line(fnd_file.log,errbuf);
379: l_conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',errbuf);
380: else
373:
374: if l_error_count = 0 then
375: retcode :=1;
376: FND_MESSAGE.SET_NAME('FLM','FLM_SUCCESS_LOGICAL_REPLENISH');
377: errbuf := fnd_message.get;
378: fnd_file.put_line(fnd_file.log,errbuf);
379: l_conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',errbuf);
380: else
381: retcode := 1;
378: fnd_file.put_line(fnd_file.log,errbuf);
379: l_conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',errbuf);
380: else
381: retcode := 1;
382: FND_MESSAGE.SET_NAME('FLM','FLM_WARNINGS_LOGICAL_REPLENISH');
383: errbuf := fnd_message.get;
384: fnd_file.put_line(fnd_file.log,errbuf);
385: l_conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('WARNING',errbuf);
386: end if;
379: l_conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',errbuf);
380: else
381: retcode := 1;
382: FND_MESSAGE.SET_NAME('FLM','FLM_WARNINGS_LOGICAL_REPLENISH');
383: errbuf := fnd_message.get;
384: fnd_file.put_line(fnd_file.log,errbuf);
385: l_conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('WARNING',errbuf);
386: end if;
387: