13: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_CODE';
14: G_NOT_SAME CONSTANT VARCHAR2(200) := 'OKL_CANNOT_BE_SAME';
15:
16: --GLOBAL VARIABLES
17: G_VIEW CONSTANT VARCHAR2(30) := 'OKL_INVOICE_MSSGS_V';
18: G_EXCEPTION_HALT_VALIDATION EXCEPTION;
19:
20: ---------------------------------------------------------------------------
21: -- FUNCTION get_seq_id
270: BEGIN
271: RETURN(get_rec(p_okl_invoice_mssgs_tl_rec, l_row_notfound));
272: END get_rec;
273: ---------------------------------------------------------------------------
274: -- FUNCTION get_rec for: OKL_INVOICE_MSSGS_V
275: ---------------------------------------------------------------------------
276: FUNCTION get_rec (
277: p_imsv_rec IN imsv_rec_type,
278: x_no_data_found OUT NOCOPY BOOLEAN
311: LAST_UPDATE_LOGIN,
312: START_DATE,
313: PKG_NAME,
314: PROC_NAME
315: FROM Okl_Invoice_Mssgs_V
316: WHERE okl_invoice_mssgs_v.id = p_id;
317: l_okl_imsv_pk okl_imsv_pk_csr%ROWTYPE;
318: l_imsv_rec imsv_rec_type;
319: BEGIN
312: START_DATE,
313: PKG_NAME,
314: PROC_NAME
315: FROM Okl_Invoice_Mssgs_V
316: WHERE okl_invoice_mssgs_v.id = p_id;
317: l_okl_imsv_pk okl_imsv_pk_csr%ROWTYPE;
318: l_imsv_rec imsv_rec_type;
319: BEGIN
320: x_no_data_found := TRUE;
367: RETURN(get_rec(p_imsv_rec, l_row_notfound));
368: END get_rec;
369:
370: ---------------------------------------------------------
371: -- FUNCTION null_out_defaults for: OKL_INVOICE_MSSGS_V --
372: ---------------------------------------------------------
373: FUNCTION null_out_defaults (
374: p_imsv_rec IN imsv_rec_type
375: ) RETURN imsv_rec_type IS
477: FUNCTION IS_UNIQUE_PRIO (p_imsv_rec imsv_rec_type) RETURN VARCHAR2
478: IS
479: CURSOR l_ims_csr IS
480: SELECT 'x'
481: FROM okl_invoice_mssgs_v -- nikshah bug 6747706
482: WHERE PRIORITY = p_imsv_rec.priority;
483:
484: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
485: l_dummy VARCHAR2(1);
789: ) RETURN VARCHAR2 IS
790:
791: CURSOR l_imsv_csr IS
792: SELECT 'x'
793: FROM okl_invoice_mssgs_v
794: WHERE name = p_imsv_rec.name
795: AND id <> nvl (p_imsv_rec.id, -99999);
796:
797: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
850: -- Post-Generation Change
851: -- By RDRAGUIL on 24-APR-2001
852: ---------------------------------------------------------------------------
853: ---------------------------------------------------
854: -- Validate_Attributes for:OKL_INVOICE_MSSGS_V --
855: ---------------------------------------------------
856: FUNCTION Validate_Attributes (
857: p_imsv_rec IN imsv_rec_type
858: ) RETURN VARCHAR2 IS
939: -- Post-Generation Change
940: -- By RDRAGUIL on 24-APR-2001
941: ---------------------------------------------------------------------------
942: -----------------------------------------------
943: -- Validate_Record for:OKL_INVOICE_MSSGS_V --
944: -----------------------------------------------
945: FUNCTION Validate_Record (
946: p_imsv_rec IN imsv_rec_type
947: ) RETURN VARCHAR2 IS
1101: ---------------------------------------------------------------------------
1102: -- PROCEDURE validate_row
1103: ---------------------------------------------------------------------------
1104: ------------------------------------------
1105: -- validate_row for:OKL_INVOICE_MSSGS_V --
1106: ------------------------------------------
1107: PROCEDURE validate_row(
1108: p_api_version IN NUMBER,
1109: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1524: '_PVT'
1525: );
1526: END insert_row;
1527: ----------------------------------------
1528: -- insert_row for:OKL_INVOICE_MSSGS_V --
1529: ----------------------------------------
1530: PROCEDURE insert_row(
1531: p_api_version IN NUMBER,
1532: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1560: l_imsv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1561: RETURN(l_imsv_rec);
1562: END fill_who_columns;
1563: --------------------------------------------
1564: -- Set_Attributes for:OKL_INVOICE_MSSGS_V --
1565: --------------------------------------------
1566: FUNCTION Set_Attributes (
1567: p_imsv_rec IN imsv_rec_type,
1568: x_imsv_rec OUT NOCOPY imsv_rec_type
1964: '_PVT'
1965: );
1966: END lock_row;
1967: --------------------------------------
1968: -- lock_row for:OKL_INVOICE_MSSGS_V --
1969: --------------------------------------
1970: PROCEDURE lock_row(
1971: p_api_version IN NUMBER,
1972: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2573: '_PVT'
2574: );
2575: END update_row;
2576: ----------------------------------------
2577: -- update_row for:OKL_INVOICE_MSSGS_V --
2578: ----------------------------------------
2579: PROCEDURE update_row(
2580: p_api_version IN NUMBER,
2581: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2758: END IF;
2759: RETURN(l_return_status);
2760: END populate_new_record;
2761: --------------------------------------------
2762: -- Set_Attributes for:OKL_INVOICE_MSSGS_V --
2763: --------------------------------------------
2764: FUNCTION Set_Attributes (
2765: p_imsv_rec IN imsv_rec_type,
2766: x_imsv_rec OUT NOCOPY imsv_rec_type
3118: '_PVT'
3119: );
3120: END delete_row;
3121: ----------------------------------------
3122: -- delete_row for:OKL_INVOICE_MSSGS_V --
3123: ----------------------------------------
3124: PROCEDURE delete_row(
3125: p_api_version IN NUMBER,
3126: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,