376: ROLLBACK TO Apply_CM;
377:
378: -- Display_Parameters;
379: x_return_status := FND_API.G_RET_STS_ERROR ;
380: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
381: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.CM_APPLICATION'||SQLERRM);
382: FND_MSG_PUB.Add;
383:
384: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
377:
378: -- Display_Parameters;
379: x_return_status := FND_API.G_RET_STS_ERROR ;
380: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
381: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.CM_APPLICATION'||SQLERRM);
382: FND_MSG_PUB.Add;
383:
384: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
385: p_count => x_msg_count,
461: --If only one error message on the stack,
462: --retrive it
463:
464: x_return_status := FND_API.G_RET_STS_ERROR ;
465: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
466: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
467: FND_MSG_PUB.Add;
468:
469: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
462: --retrive it
463:
464: x_return_status := FND_API.G_RET_STS_ERROR ;
465: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
466: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
467: FND_MSG_PUB.Add;
468:
469: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
470: p_count => x_msg_count,
474: RETURN;
475:
476: ELSE
477: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
478: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
479: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
480: FND_MSG_PUB.Add;
481: END IF;
482:
475:
476: ELSE
477: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
478: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
479: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
480: FND_MSG_PUB.Add;
481: END IF;
482:
483: IF PG_DEBUG in ('Y', 'C') THEN
696: ROLLBACK TO Unapply_CM;
697:
698: -- Display_Parameters;
699: x_return_status := FND_API.G_RET_STS_ERROR ;
700: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
701: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE_CM_APP : '||SQLERRM);
702: FND_MSG_PUB.Add;
703:
704: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
697:
698: -- Display_Parameters;
699: x_return_status := FND_API.G_RET_STS_ERROR ;
700: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
701: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE_CM_APP : '||SQLERRM);
702: FND_MSG_PUB.Add;
703:
704: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
705: p_count => x_msg_count,
772:
773: ROLLBACK TO Unapply_CM;
774:
775: x_return_status := FND_API.G_RET_STS_ERROR ;
776: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
777: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY : '||SQLERRM);
778: FND_MSG_PUB.Add;
779:
780: --If only one error message on the stack,
773: ROLLBACK TO Unapply_CM;
774:
775: x_return_status := FND_API.G_RET_STS_ERROR ;
776: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
777: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY : '||SQLERRM);
778: FND_MSG_PUB.Add;
779:
780: --If only one error message on the stack,
781: --retrive it
788: RETURN;
789:
790: ELSE
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
793: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY : '||SQLERRM);
794: FND_MSG_PUB.Add;
795: END IF;
796:
789:
790: ELSE
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
793: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY : '||SQLERRM);
794: FND_MSG_PUB.Add;
795: END IF;
796:
797: IF PG_DEBUG in ('Y', 'C') THEN