146: ROLLBACK TO Close_REC_SP;
147:
148: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
149:
150: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
151:
152: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
153:
154: END IF;
148: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
149:
150: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
151:
152: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
153:
154: END IF;
155:
156: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => p_msg_count, p_data => p_msg_data );
152: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
153:
154: END IF;
155:
156: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => p_msg_count, p_data => p_msg_data );
157:
158: END;
159:
160: --
401: ROLLBACK TO Close_PO_SP;
402:
403: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
404:
405: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
406:
407: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
408:
409: END IF;
403: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
404:
405: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
406:
407: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
408:
409: END IF;
410:
411: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => p_msg_count, p_data => p_msg_data );
407: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
408:
409: END IF;
410:
411: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => p_msg_count, p_data => p_msg_data );
412:
413: END;
414:
415: END LOOP;
612: ROLLBACK TO Close_REL_SP;
613:
614: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
615:
616: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
617:
618: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
619:
620: END IF;
614: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
615:
616: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
617:
618: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
619:
620: END IF;
621:
622: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => p_msg_count, p_data => p_msg_data );
618: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
619:
620: END IF;
621:
622: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => p_msg_count, p_data => p_msg_data );
623:
624: END;
625:
626: fnd_file.put_line(fnd_file.output, rpad(l_po_num || '-' || l_rel_num,26) || l_doc_type);
646: ROLLBACK TO Close_SP;
647:
648: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
649:
650: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
651:
652: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
653:
654: END IF;
648: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
649:
650: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
651:
652: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
653:
654: END IF;
655:
656: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => p_msg_count, p_data => p_msg_data );
652: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
653:
654: END IF;
655:
656: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => p_msg_count, p_data => p_msg_data );
657:
658: END po_close_documents;
659:
660: --------------------------------------------------------------------------------------------------
790: ROLLBACK TO Print;
791:
792: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
793:
794: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
795:
796: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
797:
798: END IF;
792: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
793:
794: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
795:
796: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
797:
798: END IF;
799:
800: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => p_msg_count, p_data => p_msg_data );
796: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_log_head );
797:
798: END IF;
799:
800: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => p_msg_count, p_data => p_msg_data );
801:
802: END Print_Output;
803:
804: --------------------------------------------------------------------------------------------------