509: NULL,
510: NULL
511: );
512:
513: -- insert a record in the AHL_WARRANTY_CONTRACTS_TL table
514: INSERT INTO AHL_WARRANTY_CONTRACTS_TL
515: (
516: WARRANTY_CONTRACT_ID,
517: LANGUAGE,
510: NULL
511: );
512:
513: -- insert a record in the AHL_WARRANTY_CONTRACTS_TL table
514: INSERT INTO AHL_WARRANTY_CONTRACTS_TL
515: (
516: WARRANTY_CONTRACT_ID,
517: LANGUAGE,
518: SOURCE_LANG,
544: AND AWTL.LANGUAGE (+) = L.LANGUAGE_CODE
545: AND L.INSTALLED_FLAG IN ('I', 'B')
546: AND NOT EXISTS
547: (SELECT 'X'
548: FROM AHL_WARRANTY_CONTRACTS_TL T
549: WHERE T.WARRANTY_CONTRACT_ID = l_warranty_contract_id
550: AND T.LANGUAGE = L.LANGUAGE_CODE);
551:
552: -- populate the OUT parameter
852: -- Type : Public
853: -- Function : Procedure created using utility:$FND_TOP/bin/AFTBLGEN
854: -- To add language dependent rows to tables.
855: -- This procedure adds rows in below two tables
856: -- AHL_WARRANTY_CONTRACTS_TL
857: -- AHL_WARRANTY_CONT_CTR_TL
858: -- Pre-reqs :
859: -- Parameters :
860: --
862:
863: PROCEDURE ADD_LANGUAGE
864: is
865: begin
866: -- for table AHL_WARRANTY_CONTRACTS_TL
867: delete from AHL_WARRANTY_CONTRACTS_TL T
868: where not exists
869: (select NULL
870: from AHL_WARRANTY_CONTRACTS_B B
863: PROCEDURE ADD_LANGUAGE
864: is
865: begin
866: -- for table AHL_WARRANTY_CONTRACTS_TL
867: delete from AHL_WARRANTY_CONTRACTS_TL T
868: where not exists
869: (select NULL
870: from AHL_WARRANTY_CONTRACTS_B B
871: where B.WARRANTY_CONTRACT_ID = T.WARRANTY_CONTRACT_ID
870: from AHL_WARRANTY_CONTRACTS_B B
871: where B.WARRANTY_CONTRACT_ID = T.WARRANTY_CONTRACT_ID
872: );
873:
874: update AHL_WARRANTY_CONTRACTS_TL T set (
875: REMARKS,
876: DESCRIPTION,
877: TERMS_AND_CONDITIONS,
878: REACTION_AND_RESOL_TIME,
882: B.DESCRIPTION,
883: B.TERMS_AND_CONDITIONS,
884: B.REACTION_AND_RESOL_TIME,
885: B.SERVICE_LEVEL_AGREEMENT
886: from AHL_WARRANTY_CONTRACTS_TL B
887: where B.WARRANTY_CONTRACT_ID = T.WARRANTY_CONTRACT_ID
888: and B.LANGUAGE = T.SOURCE_LANG)
889: where (
890: T.WARRANTY_CONTRACT_ID,
891: T.LANGUAGE
892: ) in (select
893: SUBT.WARRANTY_CONTRACT_ID,
894: SUBT.LANGUAGE
895: from AHL_WARRANTY_CONTRACTS_TL SUBB, AHL_WARRANTY_CONTRACTS_TL SUBT
896: where SUBB.WARRANTY_CONTRACT_ID = SUBT.WARRANTY_CONTRACT_ID
897: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
898: and (SUBB.REMARKS <> SUBT.REMARKS
899: or (SUBB.REMARKS is null and SUBT.REMARKS is not null)
911: or (SUBB.SERVICE_LEVEL_AGREEMENT is null and SUBT.SERVICE_LEVEL_AGREEMENT is not null)
912: or (SUBB.SERVICE_LEVEL_AGREEMENT is not null and SUBT.SERVICE_LEVEL_AGREEMENT is null)
913: ));
914:
915: insert into AHL_WARRANTY_CONTRACTS_TL (
916: WARRANTY_CONTRACT_ID,
917: LAST_UPDATE_DATE,
918: LAST_UPDATED_BY,
919: CREATION_DATE,
939: B.REACTION_AND_RESOL_TIME,
940: B.SERVICE_LEVEL_AGREEMENT,
941: L.LANGUAGE_CODE,
942: B.SOURCE_LANG
943: from AHL_WARRANTY_CONTRACTS_TL B, FND_LANGUAGES L
944: where L.INSTALLED_FLAG in ('I', 'B')
945: and B.LANGUAGE = userenv('LANG')
946: and not exists
947: (select NULL
944: where L.INSTALLED_FLAG in ('I', 'B')
945: and B.LANGUAGE = userenv('LANG')
946: and not exists
947: (select NULL
948: from AHL_WARRANTY_CONTRACTS_TL T
949: where T.WARRANTY_CONTRACT_ID = B.WARRANTY_CONTRACT_ID
950: and T.LANGUAGE = L.LANGUAGE_CODE);
951:
952: -- for table AHL_WARRANTY_CONT_CTR_TL