394: ROLLBACK TO Apply_CM;
395:
396: -- Display_Parameters;
397: x_return_status := FND_API.G_RET_STS_ERROR ;
398: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
399: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.CM_APPLICATION'||SQLERRM);
400: FND_MSG_PUB.Add;
401:
402: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
395:
396: -- Display_Parameters;
397: x_return_status := FND_API.G_RET_STS_ERROR ;
398: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
399: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.CM_APPLICATION'||SQLERRM);
400: FND_MSG_PUB.Add;
401:
402: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
403: p_count => x_msg_count,
479: --If only one error message on the stack,
480: --retrive it
481:
482: x_return_status := FND_API.G_RET_STS_ERROR ;
483: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
484: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
485: FND_MSG_PUB.Add;
486:
487: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
480: --retrive it
481:
482: x_return_status := FND_API.G_RET_STS_ERROR ;
483: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
484: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
485: FND_MSG_PUB.Add;
486:
487: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
488: p_count => x_msg_count,
492: RETURN;
493:
494: ELSE
495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
496: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
497: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
498: FND_MSG_PUB.Add;
499: END IF;
500:
493:
494: ELSE
495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
496: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
497: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
498: FND_MSG_PUB.Add;
499: END IF;
500:
501: IF PG_DEBUG in ('Y', 'C') THEN
760: ROLLBACK TO Unapply_CM;
761:
762: -- Display_Parameters;
763: x_return_status := FND_API.G_RET_STS_ERROR ;
764: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
765: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE_CM_APP : '||SQLERRM);
766: FND_MSG_PUB.Add;
767:
768: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
761:
762: -- Display_Parameters;
763: x_return_status := FND_API.G_RET_STS_ERROR ;
764: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
765: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE_CM_APP : '||SQLERRM);
766: FND_MSG_PUB.Add;
767:
768: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
769: p_count => x_msg_count,
837:
838: ROLLBACK TO Unapply_CM;
839:
840: x_return_status := FND_API.G_RET_STS_ERROR ;
841: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
842: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY : '||SQLERRM);
843: FND_MSG_PUB.Add;
844:
845: --If only one error message on the stack,
838: ROLLBACK TO Unapply_CM;
839:
840: x_return_status := FND_API.G_RET_STS_ERROR ;
841: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
842: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY : '||SQLERRM);
843: FND_MSG_PUB.Add;
844:
845: --If only one error message on the stack,
846: --retrive it
853: RETURN;
854:
855: ELSE
856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
857: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
858: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY : '||SQLERRM);
859: FND_MSG_PUB.Add;
860: END IF;
861:
854:
855: ELSE
856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
857: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
858: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY : '||SQLERRM);
859: FND_MSG_PUB.Add;
860: END IF;
861:
862: IF PG_DEBUG in ('Y', 'C') THEN