22: -- PROCEDURE add_language
23: ---------------------------------------------------------------------------
24: PROCEDURE add_language IS
25: BEGIN
26: INSERT INTO OKC_REPORT_PRM_TL (
27: ID,
28: LANGUAGE,
29: SOURCE_LANG,
30: SFWT_FLAG,
44: B.CREATION_DATE,
45: B.LAST_UPDATED_BY,
46: B.LAST_UPDATE_DATE,
47: B.LAST_UPDATE_LOGIN
48: FROM OKC_REPORT_PRM_TL B, FND_LANGUAGES L
49: WHERE L.INSTALLED_FLAG IN ('I', 'B')
50: AND B.LANGUAGE = USERENV('LANG')
51: AND NOT EXISTS(
52: SELECT NULL
49: WHERE L.INSTALLED_FLAG IN ('I', 'B')
50: AND B.LANGUAGE = USERENV('LANG')
51: AND NOT EXISTS(
52: SELECT NULL
53: FROM OKC_REPORT_PRM_TL T
54: WHERE T.ID = B.ID
55: AND T.LANGUAGE = L.LANGUAGE_CODE
56: );
57:
500: ,l_prmv_rec.LAST_UPDATE_DATE
501: ,l_prmv_rec.LAST_UPDATE_LOGIN
502: );
503:
504: INSERT INTO OKC_REPORT_PRM_TL (
505: ID,
506: LANGUAGE,
507: SOURCE_LANG,
508: SFWT_FLAG,
788: ,LAST_UPDATE_DATE = l_prmv_rec.LAST_UPDATE_DATE
789: ,LAST_UPDATE_LOGIN = l_prmv_rec.LAST_UPDATE_LOGIN
790: where ID = l_prmv_rec.ID;
791:
792: UPDATE OKC_REPORT_PRM_TL set
793: SOURCE_LANG = USERENV('LANG')
794: ,SFWT_FLAG = decode(LANGUAGE,USERENV('LANG'),'N','Y')
795: ,PROMPT = l_prmv_rec.PROMPT
796: ,LAST_UPDATED_BY = l_prmv_rec.LAST_UPDATED_BY
888: from OKC_REPORT_PRM_B
889: where ID = p_prmv_rec.ID;
890:
891: delete
892: from OKC_REPORT_PRM_TL
893: where ID = p_prmv_rec.ID;
894:
895: open sql_csr(p_prmv_rec.ID);
896: fetch sql_csr into l_sql_id;