41:
42: END Validate_Amount;
43:
44: PROCEDURE create_trx_contracts(p_api_version IN NUMBER
45: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
46: ,x_return_status OUT NOCOPY VARCHAR2
47: ,x_msg_count OUT NOCOPY NUMBER
48: ,x_msg_data OUT NOCOPY VARCHAR2
49: ,p_tcnv_rec IN tcnv_rec_type
97:
98: IF (p_tcnv_rec.Amount IS NULL) OR
99: (p_tcnv_rec.Amount = OKL_Api.G_MISS_NUM) OR
100: (p_tcnv_rec.Amount = 0) THEN
101: OKC_Api.SET_MESSAGE(p_app_name => 'OKC'
102: ,p_msg_name => g_required_value
103: ,p_token1 => g_col_name_token
104: ,p_token1_value => 'AMOUNT');
105: x_return_status := OKL_Api.G_RET_STS_ERROR;
205:
206:
207:
208: PROCEDURE create_trx_contracts(p_api_version IN NUMBER,
209: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
210: x_return_status OUT NOCOPY VARCHAR2,
211: x_msg_count OUT NOCOPY NUMBER,
212: x_msg_data OUT NOCOPY VARCHAR2,
213: p_tcnv_rec IN tcnv_rec_type,
424:
425:
426:
427: PROCEDURE create_trx_contracts(p_api_version IN NUMBER,
428: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
429: x_return_status OUT NOCOPY VARCHAR2,
430: x_msg_count OUT NOCOPY NUMBER,
431: x_msg_data OUT NOCOPY VARCHAR2,
432: p_tcnv_tbl IN tcnv_tbl_type,
479:
480:
481:
482: PROCEDURE create_trx_cntrct_lines(p_api_version IN NUMBER,
483: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
484: x_return_status OUT NOCOPY VARCHAR2,
485: x_msg_count OUT NOCOPY NUMBER,
486: x_msg_data OUT NOCOPY VARCHAR2,
487: p_tclv_rec IN tclv_rec_type,
524:
525:
526:
527: PROCEDURE create_trx_cntrct_lines(p_api_version IN NUMBER,
528: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
529: x_return_status OUT NOCOPY VARCHAR2,
530: x_msg_count OUT NOCOPY NUMBER,
531: x_msg_data OUT NOCOPY VARCHAR2,
532: p_tclv_tbl IN tclv_tbl_type,
572:
573:
574:
575: PROCEDURE update_trx_contracts( p_api_version IN NUMBER
576: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
577: ,x_return_status OUT NOCOPY VARCHAR2
578: ,x_msg_count OUT NOCOPY NUMBER
579: ,x_msg_data OUT NOCOPY VARCHAR2
580: ,p_tcnv_rec IN tcnv_rec_type
621: END;
622:
623:
624: PROCEDURE update_trx_contracts(p_api_version IN NUMBER,
625: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
626: x_return_status OUT NOCOPY VARCHAR2,
627: x_msg_count OUT NOCOPY NUMBER,
628: x_msg_data OUT NOCOPY VARCHAR2,
629: p_tcnv_rec IN tcnv_rec_type,
669:
670:
671: BEGIN
672:
673: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
674: G_PKG_NAME,
675: p_init_msg_list,
676: l_api_version,
677: p_api_version,
676: l_api_version,
677: p_api_version,
678: '_PVT',
679: x_return_status);
680: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
681: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
682: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
683: RAISE Okc_Api.G_EXCEPTION_ERROR;
684: END IF;
677: p_api_version,
678: '_PVT',
679: x_return_status);
680: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
681: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
682: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
683: RAISE Okc_Api.G_EXCEPTION_ERROR;
684: END IF;
685:
678: '_PVT',
679: x_return_status);
680: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
681: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
682: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
683: RAISE Okc_Api.G_EXCEPTION_ERROR;
684: END IF;
685:
686: -- Allow update only if Status is not cancelled.
679: x_return_status);
680: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
681: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
682: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
683: RAISE Okc_Api.G_EXCEPTION_ERROR;
684: END IF;
685:
686: -- Allow update only if Status is not cancelled.
687:
797:
798:
799:
800: PROCEDURE update_trx_contracts(p_api_version IN NUMBER,
801: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
802: x_return_status OUT NOCOPY VARCHAR2,
803: x_msg_count OUT NOCOPY NUMBER,
804: x_msg_data OUT NOCOPY VARCHAR2,
805: p_tcnv_tbl IN tcnv_tbl_type,
847:
848:
849:
850: PROCEDURE update_trx_cntrct_lines(p_api_version IN NUMBER,
851: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
852: x_return_status OUT NOCOPY VARCHAR2,
853: x_msg_count OUT NOCOPY NUMBER,
854: x_msg_data OUT NOCOPY VARCHAR2,
855: p_tclv_rec IN tclv_rec_type,
887: END;
888:
889:
890: PROCEDURE update_trx_cntrct_lines(p_api_version IN NUMBER,
891: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
892: x_return_status OUT NOCOPY VARCHAR2,
893: x_msg_count OUT NOCOPY NUMBER,
894: x_msg_data OUT NOCOPY VARCHAR2,
895: p_tclv_tbl IN tclv_tbl_type,
911:
912: END;
913:
914: PROCEDURE delete_trx_contracts(p_api_version IN NUMBER,
915: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
916: x_return_status OUT NOCOPY VARCHAR2,
917: x_msg_count OUT NOCOPY NUMBER,
918: x_msg_data OUT NOCOPY VARCHAR2,
919: p_tcnv_rec IN tcnv_rec_type)
933: END;
934:
935:
936: PROCEDURE delete_trx_contracts(p_api_version IN NUMBER,
937: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
938: x_return_status OUT NOCOPY VARCHAR2,
939: x_msg_count OUT NOCOPY NUMBER,
940: x_msg_data OUT NOCOPY VARCHAR2,
941: p_tcnv_tbl IN tcnv_tbl_type)
957: END;
958:
959:
960: PROCEDURE delete_trx_cntrct_lines(p_api_version IN NUMBER,
961: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
962: x_return_status OUT NOCOPY VARCHAR2,
963: x_msg_count OUT NOCOPY NUMBER,
964: x_msg_data OUT NOCOPY VARCHAR2,
965: p_tclv_rec IN tclv_rec_type)
980: END;
981:
982:
983: PROCEDURE delete_trx_cntrct_lines(p_api_version IN NUMBER,
984: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
985: x_return_status OUT NOCOPY VARCHAR2,
986: x_msg_count OUT NOCOPY NUMBER,
987: x_msg_data OUT NOCOPY VARCHAR2,
988: p_tclv_tbl IN tclv_tbl_type)