[Home] [Help]
2997: -- Bug 2757672
2998: select wcs.carrier_id,
2999: wcs.service_level,
3000: wcs.mode_of_transport
3001: from wsh_carrier_services wcs,
3002: wsh_org_carrier_services wocs,
3003: wsh_carriers_v wcv
3004: where wcs.carrier_service_id = wocs.carrier_service_id
3005: and wcs.carrier_id = wcv.carrier_id
3015: -- Bug 2757672
3016: select wcs.carrier_id,
3017: wcs.service_level,
3018: wcs.mode_of_transport
3019: from wsh_carrier_services wcs,
3020: wsh_org_carrier_services wocs,
3021: wsh_carriers_v wcv
3022: where wcs.carrier_service_id = wocs.carrier_service_id
3023: and wcs.carrier_id = wcv.carrier_id
3031: --
3032: cursor l_dlvy_carrier_services_csr is
3033: -- Bug 2757672
3034: select wcs.ship_method_code
3035: from wsh_carrier_services wcs,
3036: wsh_org_carrier_services wocs,
3037: wsh_carriers_v wcv
3038: where wcs.carrier_service_id = wocs.carrier_service_id
3039: and wcs.carrier_id = wcv.carrier_id
3059: --if caller is TP use below cursor (no org check)
3060: cursor l_dlvy_carrier_services_csr_tp is
3061: -- Bug 2757672
3062: select wcs.ship_method_code
3063: from wsh_carrier_services wcs,
3064: wsh_org_carrier_services wocs,
3065: wsh_carriers_v wcv
3066: where wcs.carrier_service_id = wocs.carrier_service_id
3067: and wcs.carrier_id = wcv.carrier_id
3099: -- Bug 2757672
3100: select wcs.carrier_id,
3101: wcs.service_level,
3102: wcs.mode_of_transport
3103: from wsh_carrier_services wcs,
3104: wsh_carriers_v wcv
3105: where wcs.ship_method_code = x_ship_method_code
3106: and wcs.carrier_id = wcv.carrier_id
3107: and nvl(wcs.enabled_flag, 'N') = 'Y'
3110: --
3111: cursor l_trip_carrier_services_csr is
3112: -- Bug 2757672
3113: select distinct wcs.ship_method_code
3114: from wsh_carrier_services wcs,
3115: wsh_carriers_v wcv
3116: where wcs.carrier_id = x_carrier_id
3117: and wcs.carrier_id = wcv.carrier_id
3118: and nvl(wcs.enabled_flag, 'N') = 'Y'
5073: -- Bug#3880569: Adding a new procedure Validate_Active_SM
5074: --========================================================================
5075: -- PROCEDURE : Validate_Active_SM
5076: --
5077: -- COMMENT : Validates Active Ship_Method_Code/Name against wsh_carrier_services.
5078: -- If both values are specified then only Ship_Method_Code is used
5079: --========================================================================
5080:
5081: PROCEDURE Validate_Active_SM
5085:
5086: CURSOR check_ship_method IS
5087: select flv.lookup_code ship_method_code,
5088: flv.meaning
5089: from fnd_lookup_values_vl flv, wsh_carrier_services wcs
5090: where flv.lookup_code = wcs.ship_method_code
5091: and wcs.ship_method_code = p_ship_method_code
5092: and flv.lookup_type = 'SHIP_METHOD'
5093: and flv.view_application_id = 3
5094: and wcs.enabled_flag='Y'
5095: UNION ALL
5096: select flv.lookup_code ship_method_code,
5097: flv.meaning
5098: from fnd_lookup_values_vl flv, wsh_carrier_services wcs
5099: where flv.lookup_code = wcs.ship_method_code
5100: and NVL(p_ship_method_code,FND_API.G_MISS_CHAR) = FND_API.G_MISS_CHAR
5101: and flv.lookup_type = 'SHIP_METHOD'
5102: and flv.view_application_id = 3
5981: --
5982: select ship_method_code
5983: into x_ship_method_code
5984: from wsh_carriers wc,
5985: wsh_carrier_services wcs,
5986: wsh_org_carrier_services wocs
5987: where wocs.organization_id = p_organization_id
5988: and wocs.carrier_service_id = wcs.carrier_service_id
5989: and wcs.mode_of_transport = p_mode_of_transport