334: --SAVEPOINT will never be established
335:
336: --ROLLBACK TO Distribute_WS_Pvt ;
337: ROLLBACK;
338: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
339: p_print_header => FND_API.G_TRUE ) ;
340: retcode := 2 ;
341: --
342: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
342: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
343: --
344: --ROLLBACK TO Distribute_WS_Pvt ;
345: ROLLBACK;
346: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
347: p_print_header => FND_API.G_TRUE ) ;
348: retcode := 2 ;
349: --
350: WHEN OTHERS THEN
357: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,
358: l_api_name ) ;
359: END IF ;
360: --
361: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
362: p_print_header => FND_API.G_TRUE ) ;
363: retcode := 2 ;
364: --
365: END Distribute_WS ;
551: EXCEPTION
552: --
553: WHEN FND_API.G_EXC_ERROR THEN
554: --
555: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
556: p_print_header => FND_API.G_TRUE ) ;
557: retcode := 2 ;
558: --
559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
557: retcode := 2 ;
558: --
559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
560: --
561: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
562: p_print_header => FND_API.G_TRUE ) ;
563: retcode := 2 ;
564: --
565: WHEN OTHERS THEN
568: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,
569: l_api_name ) ;
570: END IF ;
571: --
572: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
573: p_print_header => FND_API.G_TRUE ) ;
574: retcode := 2 ;
575: --
576: END Submit_WS ;
1269: --
1270: WHEN FND_API.G_EXC_ERROR THEN
1271: --
1272: ROLLBACK TO Distribute_BR_Pvt ;
1273: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
1274: p_print_header => FND_API.G_TRUE ) ;
1275: retcode := 2 ;
1276: --
1277: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1276: --
1277: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1278: --
1279: ROLLBACK TO Distribute_BR_Pvt ;
1280: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
1281: p_print_header => FND_API.G_TRUE ) ;
1282: retcode := 2 ;
1283: --
1284: WHEN OTHERS THEN
1289: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,
1290: l_api_name ) ;
1291: END IF ;
1292: --
1293: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
1294: p_print_header => FND_API.G_TRUE ) ;
1295: retcode := 2 ;
1296: --
1297: END Distribute_BR ;
1752: EXCEPTION
1753: --
1754: WHEN FND_API.G_EXC_ERROR THEN
1755: --
1756: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
1757: p_print_header => FND_API.G_TRUE ) ;
1758: retcode := 2 ;
1759: --
1760: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1758: retcode := 2 ;
1759: --
1760: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1761: --
1762: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
1763: p_print_header => FND_API.G_TRUE ) ;
1764: retcode := 2 ;
1765: --
1766: WHEN OTHERS THEN
1770: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,
1771: l_api_name ) ;
1772: END IF ;
1773: --
1774: PSB_MESSAGE_S.Print_Error ( p_mode => FND_FILE.LOG ,
1775: p_print_header => FND_API.G_TRUE ) ;
1776: retcode := 2 ;
1777: --
1778: END Submit_BR ;