75: document in out NOCOPY clob,
76: document_type in out NOCOPY varchar2) IS
77:
78: l_document VARCHAR2(32000) := '';
79: NL VARCHAR2(1) := fnd_global.newline;
80:
81: shipmentNum NUMBER := 1;
82:
83: l_document_id VARCHAR2(30) := document_id;
992: HLC.county = FCL1.LOOKUP_CODE (+) AND
993: HLC.COUNTRY || '_PROVINCE' = FCL1.LOOKUP_TYPE (+) AND
994: DECODE(FCL1.LOOKUP_CODE, NULL, '1', FCL1.SECURITY_GROUP_ID) =
995: DECODE(FCL1.LOOKUP_CODE, NULL, '1',
996: FND_GLOBAL.LOOKUP_SECURITY_GROUP(FCL1.LOOKUP_TYPE,
997: FCL1.VIEW_APPLICATION_ID)) AND
998: DECODE(FCL1.LOOKUP_CODE, NULL, '1', FCL1.VIEW_APPLICATION_ID) =
999: DECODE(FCL1.LOOKUP_CODE, NULL, '1', 3) AND
1000: DECODE(FCL1.LOOKUP_CODE, NULL, '1', FCL1.LANGUAGE) =
1002: HLC.state = FCL2.LOOKUP_CODE (+) AND
1003: HLC.COUNTRY || '_STATE' = FCL2.LOOKUP_TYPE (+) AND
1004: DECODE(FCL2.LOOKUP_CODE, NULL, '1', FCL2.SECURITY_GROUP_ID) =
1005: DECODE(FCL2.LOOKUP_CODE, NULL, '1',
1006: FND_GLOBAL.LOOKUP_SECURITY_GROUP(FCL2.LOOKUP_TYPE,
1007: FCL2.VIEW_APPLICATION_ID)) AND
1008: DECODE(FCL2.LOOKUP_CODE, NULL, '1', FCL2.VIEW_APPLICATION_ID) =
1009: DECODE(FCL2.LOOKUP_CODE, NULL, '1', 3) AND
1010: DECODE(FCL2.LOOKUP_CODE, NULL, '1', FCL2.LANGUAGE) =
1012: HLC.county = FCL3.LOOKUP_CODE (+) AND
1013: HLC.COUNTRY || '_COUNTY' = FCL3.LOOKUP_TYPE (+) AND
1014: DECODE(FCL3.LOOKUP_CODE, NULL, '1', FCL3.SECURITY_GROUP_ID) =
1015: DECODE(FCL3.LOOKUP_CODE, NULL, '1',
1016: FND_GLOBAL.LOOKUP_SECURITY_GROUP(FCL3.LOOKUP_TYPE,
1017: FCL3.VIEW_APPLICATION_ID)) AND
1018: DECODE(FCL3.LOOKUP_CODE, NULL, '1', FCL3.VIEW_APPLICATION_ID) =
1019: DECODE(FCL3.LOOKUP_CODE, NULL, '1', 3) AND
1020: DECODE(FCL3.LOOKUP_CODE, NULL, '1', FCL3.LANGUAGE) =
1029: end;
1030:
1031: -- Bug 3637864. Need to display both promised and needby date
1032: /*Modified as part of bug 7551115 changing date format*/
1033: l_promised_date := to_char(l_line_loc.promised_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1034: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1035: l_needby_date := to_char(l_line_loc.need_by_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1036: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1037:
1030:
1031: -- Bug 3637864. Need to display both promised and needby date
1032: /*Modified as part of bug 7551115 changing date format*/
1033: l_promised_date := to_char(l_line_loc.promised_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1034: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1035: l_needby_date := to_char(l_line_loc.need_by_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1036: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1037:
1038: if (l_line_loc.un_number_id is not null) then
1031: -- Bug 3637864. Need to display both promised and needby date
1032: /*Modified as part of bug 7551115 changing date format*/
1033: l_promised_date := to_char(l_line_loc.promised_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1034: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1035: l_needby_date := to_char(l_line_loc.need_by_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1036: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1037:
1038: if (l_line_loc.un_number_id is not null) then
1039: begin
1032: /*Modified as part of bug 7551115 changing date format*/
1033: l_promised_date := to_char(l_line_loc.promised_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1034: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1035: l_needby_date := to_char(l_line_loc.need_by_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1036: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1037:
1038: if (l_line_loc.un_number_id is not null) then
1039: begin
1040: select un_number into l_un_number from po_un_numbers pun
1485:
1486: -- PO has been cancelled
1487: if (l_line_loc.cancel_flag = 'Y') then
1488: /*Modified as part of bug 7551115 changing date format*/
1489: l_document := l_document || '
' || fnd_message.get_string('PO', 'PO_WF_NOTIF_PO_CANCELLED_ON') || ' ' || to_char(l_line_loc.cancel_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1490: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''')|| NL;
1491: l_document := l_document || '
' || fnd_message.get_string('PO', 'PO_WF_NOTIF_QTY_ORDERED') || ' ' || l_line_loc.quantity || NL;
1492: l_document := l_document || '
' || fnd_message.get_string('PO', 'PO_WF_NOTIF_QTY_CANCELLED') || ' ' || l_line_loc.quantity_cancelled || NL;
1493: end if;
1486: -- PO has been cancelled
1487: if (l_line_loc.cancel_flag = 'Y') then
1488: /*Modified as part of bug 7551115 changing date format*/
1489: l_document := l_document || '
' || fnd_message.get_string('PO', 'PO_WF_NOTIF_PO_CANCELLED_ON') || ' ' || to_char(l_line_loc.cancel_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1490: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''')|| NL;
1491: l_document := l_document || '
' || fnd_message.get_string('PO', 'PO_WF_NOTIF_QTY_ORDERED') || ' ' || l_line_loc.quantity || NL;
1492: l_document := l_document || '
' || fnd_message.get_string('PO', 'PO_WF_NOTIF_QTY_CANCELLED') || ' ' || l_line_loc.quantity_cancelled || NL;
1493: end if;
1494:
1585: * the document type is PA.
1586: */
1587: /*Modified as part of bug 7551115 changing date format*/
1588: IF ((l_document_type = 'PA') and (x_subtype = 'BLANKET')) THEN
1589: l_start_date := to_char(l_line_loc.start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1590: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1591: l_end_date := to_char(l_line_loc.end_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1592: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1593: l_document := l_document || '
1586: */
1587: /*Modified as part of bug 7551115 changing date format*/
1588: IF ((l_document_type = 'PA') and (x_subtype = 'BLANKET')) THEN
1589: l_start_date := to_char(l_line_loc.start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1590: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1591: l_end_date := to_char(l_line_loc.end_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1592: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1593: l_document := l_document || '
1587: /*Modified as part of bug 7551115 changing date format*/
1588: IF ((l_document_type = 'PA') and (x_subtype = 'BLANKET')) THEN
1589: l_start_date := to_char(l_line_loc.start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1590: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1591: l_end_date := to_char(l_line_loc.end_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1592: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1593: l_document := l_document || '
1588: IF ((l_document_type = 'PA') and (x_subtype = 'BLANKET')) THEN
1589: l_start_date := to_char(l_line_loc.start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1590: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1591: l_end_date := to_char(l_line_loc.end_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1592: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1593: l_document := l_document || '
1850: * the document type is PA.
1851: */
1852: /*Modified as part of bug 7551115 changing date format*/
1853: IF ((l_document_type = 'PA') and (x_subtype = 'BLANKET')) THEN
1854: l_start_date := to_char(l_line_loc.start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1855: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1856: l_end_date := to_char(l_line_loc.end_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1857: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1858:
1851: */
1852: /*Modified as part of bug 7551115 changing date format*/
1853: IF ((l_document_type = 'PA') and (x_subtype = 'BLANKET')) THEN
1854: l_start_date := to_char(l_line_loc.start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1855: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1856: l_end_date := to_char(l_line_loc.end_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1857: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1858:
1859: l_document := l_document || '
1852: /*Modified as part of bug 7551115 changing date format*/
1853: IF ((l_document_type = 'PA') and (x_subtype = 'BLANKET')) THEN
1854: l_start_date := to_char(l_line_loc.start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1855: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1856: l_end_date := to_char(l_line_loc.end_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1857: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1858:
1859: l_document := l_document || '
1853: IF ((l_document_type = 'PA') and (x_subtype = 'BLANKET')) THEN
1854: l_start_date := to_char(l_line_loc.start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1855: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1856: l_end_date := to_char(l_line_loc.end_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
1857: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
1858:
1859: l_document := l_document || '
2134: fetch shipment_release_cursor into l_line_loc;
2135: exit when shipment_blanket_cursor%notfound;
2136: END IF;
2137: /*Modified as part of bug 7551115 changing date format*/
2138: l_date := to_char(nvl(l_line_loc.need_by_date, l_line_loc.promised_date),FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
2139: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
2140:
2141: if (l_line_loc.un_number_id is not null) then
2142: select un_number into l_un_number from po_un_numbers pun
2135: exit when shipment_blanket_cursor%notfound;
2136: END IF;
2137: /*Modified as part of bug 7551115 changing date format*/
2138: l_date := to_char(nvl(l_line_loc.need_by_date, l_line_loc.promised_date),FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
2139: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
2140:
2141: if (l_line_loc.un_number_id is not null) then
2142: select un_number into l_un_number from po_un_numbers pun
2143: where pun.un_number_id = l_line_loc.un_number_id;
2217:
2218: -- PO has been cancelled
2219: if (l_line_loc.cancel_flag = 'Y') then
2220: /*Modified as part of bug 7551115 changing date format*/
2221: l_document := l_document || fnd_message.get_string('PO', 'PO_WF_NOTIF_PO_CANCELLED_ON') || ' ' || to_char(l_line_loc.cancel_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
2222: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
2223: l_document := l_document || fnd_message.get_string('PO', 'PO_WF_NOTIF_QTY_ORDERED') || ' ' || l_line_loc.quantity || NL;
2224: l_document := l_document || fnd_message.get_string('PO', 'PO_WF_NOTIF_QTY_CANCELLED') || ' ' || l_line_loc.quantity_cancelled || NL;
2225: end if;
2218: -- PO has been cancelled
2219: if (l_line_loc.cancel_flag = 'Y') then
2220: /*Modified as part of bug 7551115 changing date format*/
2221: l_document := l_document || fnd_message.get_string('PO', 'PO_WF_NOTIF_PO_CANCELLED_ON') || ' ' || to_char(l_line_loc.cancel_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
2222: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''');
2223: l_document := l_document || fnd_message.get_string('PO', 'PO_WF_NOTIF_QTY_ORDERED') || ' ' || l_line_loc.quantity || NL;
2224: l_document := l_document || fnd_message.get_string('PO', 'PO_WF_NOTIF_QTY_CANCELLED') || ' ' || l_line_loc.quantity_cancelled || NL;
2225: end if;
2226:
2577: document in out NOCOPY varchar2,
2578: document_type in out NOCOPY varchar2) IS
2579:
2580:
2581: NL VARCHAR2(1) := fnd_global.newline;
2582:
2583: l_document VARCHAR2(32000) := '';
2584: x_display_type varchar2(60);
2585:
3088: HLC.county = FCL1.LOOKUP_CODE (+) AND
3089: HLC.COUNTRY || '_PROVINCE' = FCL1.LOOKUP_TYPE (+) AND
3090: DECODE(FCL1.LOOKUP_CODE, NULL, '1', FCL1.SECURITY_GROUP_ID) =
3091: DECODE(FCL1.LOOKUP_CODE, NULL, '1',
3092: FND_GLOBAL.LOOKUP_SECURITY_GROUP(FCL1.LOOKUP_TYPE,
3093: FCL1.VIEW_APPLICATION_ID)) AND
3094: DECODE(FCL1.LOOKUP_CODE, NULL, '1', FCL1.VIEW_APPLICATION_ID) =
3095: DECODE(FCL1.LOOKUP_CODE, NULL, '1', 3) AND
3096: DECODE(FCL1.LOOKUP_CODE, NULL, '1', FCL1.LANGUAGE) =
3098: HLC.state = FCL2.LOOKUP_CODE (+) AND
3099: HLC.COUNTRY || '_STATE' = FCL2.LOOKUP_TYPE (+) AND
3100: DECODE(FCL2.LOOKUP_CODE, NULL, '1', FCL2.SECURITY_GROUP_ID) =
3101: DECODE(FCL2.LOOKUP_CODE, NULL, '1',
3102: FND_GLOBAL.LOOKUP_SECURITY_GROUP(FCL2.LOOKUP_TYPE,
3103: FCL2.VIEW_APPLICATION_ID)) AND
3104: DECODE(FCL2.LOOKUP_CODE, NULL, '1', FCL2.VIEW_APPLICATION_ID) =
3105: DECODE(FCL2.LOOKUP_CODE, NULL, '1', 3) AND
3106: DECODE(FCL2.LOOKUP_CODE, NULL, '1', FCL2.LANGUAGE) =
3108: HLC.county = FCL3.LOOKUP_CODE (+) AND
3109: HLC.COUNTRY || '_COUNTY' = FCL3.LOOKUP_TYPE (+) AND
3110: DECODE(FCL3.LOOKUP_CODE, NULL, '1', FCL3.SECURITY_GROUP_ID) =
3111: DECODE(FCL3.LOOKUP_CODE, NULL, '1',
3112: FND_GLOBAL.LOOKUP_SECURITY_GROUP(FCL3.LOOKUP_TYPE,
3113: FCL3.VIEW_APPLICATION_ID)) AND
3114: DECODE(FCL3.LOOKUP_CODE, NULL, '1', FCL3.VIEW_APPLICATION_ID) =
3115: DECODE(FCL3.LOOKUP_CODE, NULL, '1', 3) AND
3116: DECODE(FCL3.LOOKUP_CODE, NULL, '1', FCL3.LANGUAGE) =
3372: HLC.county = FCL1.LOOKUP_CODE (+) AND
3373: HLC.COUNTRY || '_PROVINCE' = FCL1.LOOKUP_TYPE (+) AND
3374: DECODE(FCL1.LOOKUP_CODE, NULL, '1', FCL1.SECURITY_GROUP_ID) =
3375: DECODE(FCL1.LOOKUP_CODE, NULL, '1',
3376: FND_GLOBAL.LOOKUP_SECURITY_GROUP(FCL1.LOOKUP_TYPE,
3377: FCL1.VIEW_APPLICATION_ID)) AND
3378: DECODE(FCL1.LOOKUP_CODE, NULL, '1', FCL1.VIEW_APPLICATION_ID) =
3379: DECODE(FCL1.LOOKUP_CODE, NULL, '1', 3) AND
3380: DECODE(FCL1.LOOKUP_CODE, NULL, '1', FCL1.LANGUAGE) =
3382: HLC.state = FCL2.LOOKUP_CODE (+) AND
3383: HLC.COUNTRY || '_STATE' = FCL2.LOOKUP_TYPE (+) AND
3384: DECODE(FCL2.LOOKUP_CODE, NULL, '1', FCL2.SECURITY_GROUP_ID) =
3385: DECODE(FCL2.LOOKUP_CODE, NULL, '1',
3386: FND_GLOBAL.LOOKUP_SECURITY_GROUP(FCL2.LOOKUP_TYPE,
3387: FCL2.VIEW_APPLICATION_ID)) AND
3388: DECODE(FCL2.LOOKUP_CODE, NULL, '1', FCL2.VIEW_APPLICATION_ID) =
3389: DECODE(FCL2.LOOKUP_CODE, NULL, '1', 3) AND
3390: DECODE(FCL2.LOOKUP_CODE, NULL, '1', FCL2.LANGUAGE) =
3392: HLC.county = FCL3.LOOKUP_CODE (+) AND
3393: HLC.COUNTRY || '_COUNTY' = FCL3.LOOKUP_TYPE (+) AND
3394: DECODE(FCL3.LOOKUP_CODE, NULL, '1', FCL3.SECURITY_GROUP_ID) =
3395: DECODE(FCL3.LOOKUP_CODE, NULL, '1',
3396: FND_GLOBAL.LOOKUP_SECURITY_GROUP(FCL3.LOOKUP_TYPE,
3397: FCL3.VIEW_APPLICATION_ID)) AND
3398: DECODE(FCL3.LOOKUP_CODE, NULL, '1', FCL3.VIEW_APPLICATION_ID) =
3399: DECODE(FCL3.LOOKUP_CODE, NULL, '1', 3) AND
3400: DECODE(FCL3.LOOKUP_CODE, NULL, '1', FCL3.LANGUAGE) =
3495:
3496: begin
3497:
3498: select bill_to_location_id, vendor_site_id, vendor_id, segment1,
3499: revision_num, to_char(creation_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3500: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || ''''),
3501: to_char(revised_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3502: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || ''''),
3503: ship_via_lookup_code, freight_terms_lookup_code, FOB_LOOKUP_CODE,
3496: begin
3497:
3498: select bill_to_location_id, vendor_site_id, vendor_id, segment1,
3499: revision_num, to_char(creation_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3500: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || ''''),
3501: to_char(revised_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3502: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || ''''),
3503: ship_via_lookup_code, freight_terms_lookup_code, FOB_LOOKUP_CODE,
3504: nvl(vendor_contact_id, -99), terms_id,
3497:
3498: select bill_to_location_id, vendor_site_id, vendor_id, segment1,
3499: revision_num, to_char(creation_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3500: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || ''''),
3501: to_char(revised_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3502: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || ''''),
3503: ship_via_lookup_code, freight_terms_lookup_code, FOB_LOOKUP_CODE,
3504: nvl(vendor_contact_id, -99), terms_id,
3505: to_char(start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3498: select bill_to_location_id, vendor_site_id, vendor_id, segment1,
3499: revision_num, to_char(creation_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3500: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || ''''),
3501: to_char(revised_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3502: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || ''''),
3503: ship_via_lookup_code, freight_terms_lookup_code, FOB_LOOKUP_CODE,
3504: nvl(vendor_contact_id, -99), terms_id,
3505: to_char(start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3506: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''') ,
3501: to_char(revised_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3502: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || ''''),
3503: ship_via_lookup_code, freight_terms_lookup_code, FOB_LOOKUP_CODE,
3504: nvl(vendor_contact_id, -99), terms_id,
3505: to_char(start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3506: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''') ,
3507: to_char(end_date, FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3508: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''') ,
3509: blanket_total_amount
3502: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || ''''),
3503: ship_via_lookup_code, freight_terms_lookup_code, FOB_LOOKUP_CODE,
3504: nvl(vendor_contact_id, -99), terms_id,
3505: to_char(start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3506: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''') ,
3507: to_char(end_date, FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3508: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''') ,
3509: blanket_total_amount
3510: into l_bill_to_id, l_vendor_site_id, l_vendor_id,
3503: ship_via_lookup_code, freight_terms_lookup_code, FOB_LOOKUP_CODE,
3504: nvl(vendor_contact_id, -99), terms_id,
3505: to_char(start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3506: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''') ,
3507: to_char(end_date, FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3508: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''') ,
3509: blanket_total_amount
3510: into l_bill_to_id, l_vendor_site_id, l_vendor_id,
3511: l_po_number, l_po_revision, l_date_of_order, l_date_of_revision,
3504: nvl(vendor_contact_id, -99), terms_id,
3505: to_char(start_date,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3506: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''') ,
3507: to_char(end_date, FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK', fnd_global.user_id),
3508: 'NLS_CALENDAR = ''' || NVL(FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) , 'GREGORIAN' ) || '''') ,
3509: blanket_total_amount
3510: into l_bill_to_id, l_vendor_site_id, l_vendor_id,
3511: l_po_number, l_po_revision, l_date_of_order, l_date_of_revision,
3512: l_ship_via_lookup_code, l_freight_terms_lc, l_fob_lookup_code, l_vendor_contact_id,
3562: if (l_document_type = 'RELEASE') then
3563:
3564: begin
3565: select release_num,
3566: to_char(revised_date ,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK',fnd_global.user_id),
3567: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) ,'GREGORIAN' ) || ''''),
3568: revision_num
3569: into l_release_num, l_date_of_revision, l_po_revision
3570: from po_releases
3563:
3564: begin
3565: select release_num,
3566: to_char(revised_date ,FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK',fnd_global.user_id),
3567: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) ,'GREGORIAN' ) || ''''),
3568: revision_num
3569: into l_release_num, l_date_of_revision, l_po_revision
3570: from po_releases
3571: where po_release_id = l_document_id;
3570: from po_releases
3571: where po_release_id = l_document_id;
3572:
3573: /* Fix for 2341675 by davidng */
3574: select to_char(release_date , FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK',fnd_global.user_id),
3575: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) ,'GREGORIAN') || '''')
3576: into l_date_of_order
3577: from po_releases
3578: where po_release_id = l_document_id;
3571: where po_release_id = l_document_id;
3572:
3573: /* Fix for 2341675 by davidng */
3574: select to_char(release_date , FND_PROFILE.VALUE_SPECIFIC('ICX_DATE_FORMAT_MASK',fnd_global.user_id),
3575: 'NLS_CALENDAR = ''' || NVL( FND_PROFILE.VALUE_SPECIFIC('FND_FORMS_USER_CALENDAR', fnd_global.user_id) ,'GREGORIAN') || '''')
3576: into l_date_of_order
3577: from po_releases
3578: where po_release_id = l_document_id;
3579: /* End fix*/
4572: v_filehandle UTL_FILE.FILE_TYPE;
4573: l_filedir varchar2(2000) := null;
4574: l_filename varchar2(2000) := null;
4575: v_terms varchar2(4000) := null;
4576: NL VARCHAR2(1) := fnd_global.newline;
4577: l_document varchar2(32000);
4578: x_progress varchar2(3);
4579: x_display_type varchar2(60);
4580:
4703: END;
4704: --EMAILPO FPH END--
4705:
4706:
4707: -- bug 3128426: removed call to fnd_global.apps_initialize
4708: -- instead, use fnd_profile.value_specific to get
4709: -- profile values w/o resetting the app context
4710: l_filedir := FND_PROFILE.VALUE_SPECIFIC(
4711: name => 'PO_EMAIL_TERMS_DIR_NAME'
4741: /* open the file */
4742: v_filehandle := UTL_FILE.FOPEN(l_filedir,l_filename_lang,'r');
4743: EXCEPTION WHEN OTHERS THEN
4744: BEGIN
4745: l_filename_lang := l_filename || '_' || fnd_global.base_language;
4746: v_filehandle := UTL_FILE.FOPEN(l_filedir,l_filename_lang, 'r');
4747: EXCEPTION WHEN OTHERS THEN
4748: v_filehandle := UTL_FILE.FOPEN(l_filedir,l_filename, 'r');
4749: END;