1059: -- FETCH sample_plan_freq_per into l_frequency_per ;
1060: -- CLOSE sample_plan_freq_per ;
1061: --END IF;
1062:
1063: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
1064: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1065: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1066: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1067: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1060: -- CLOSE sample_plan_freq_per ;
1061: --END IF;
1062:
1063: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
1064: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1065: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1066: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1067: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1068: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670 It is SAMPLE_UOM and not SAMPLE_QTY_UOM
1061: --END IF;
1062:
1063: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
1064: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1065: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1066: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1067: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1068: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670 It is SAMPLE_UOM and not SAMPLE_QTY_UOM
1069: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1062:
1063: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
1064: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1065: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1066: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1067: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1068: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670 It is SAMPLE_UOM and not SAMPLE_QTY_UOM
1069: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1070: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1063: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
1064: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1065: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1066: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1067: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1068: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670 It is SAMPLE_UOM and not SAMPLE_QTY_UOM
1069: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1070: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1071: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1064: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1065: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1066: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1067: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1068: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670 It is SAMPLE_UOM and not SAMPLE_QTY_UOM
1069: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1070: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1071: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1072: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
1065: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1066: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1067: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1068: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670 It is SAMPLE_UOM and not SAMPLE_QTY_UOM
1069: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1070: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1071: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1072: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
1073:
1066: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1067: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1068: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670 It is SAMPLE_UOM and not SAMPLE_QTY_UOM
1069: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1070: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1071: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1072: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
1073:
1074: /* Check to see if auto sample creation is enabled and auto docu numbering for the Org*/
1067: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1068: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670 It is SAMPLE_UOM and not SAMPLE_QTY_UOM
1069: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1070: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1071: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1072: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
1073:
1074: /* Check to see if auto sample creation is enabled and auto docu numbering for the Org*/
1075: IF ((l_auto_sample = 'Y') and (l_doc_number = 2)) THEN
1068: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670 It is SAMPLE_UOM and not SAMPLE_QTY_UOM
1069: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1070: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1071: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1072: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
1073:
1074: /* Check to see if auto sample creation is enabled and auto docu numbering for the Org*/
1075: IF ((l_auto_sample = 'Y') and (l_doc_number = 2)) THEN
1076:
1249: END IF;
1250: CLOSE get_reg_sample_num;
1251:
1252: IF (lrsample_name IS not NULL) THEN
1253: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES',
1254: frsample_name || '-' || lrsample_name);
1255: ELSE
1256: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
1257: END IF;
1252: IF (lrsample_name IS not NULL) THEN
1253: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES',
1254: frsample_name || '-' || lrsample_name);
1255: ELSE
1256: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
1257: END IF;
1258:
1259: IF (lasample_name IS not NULL) THEN
1260: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES',
1256: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
1257: END IF;
1258:
1259: IF (lasample_name IS not NULL) THEN
1260: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES',
1261: fasample_name || '-' || lasample_name);
1262: ELSE
1263: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
1264: END IF;
1259: IF (lasample_name IS not NULL) THEN
1260: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES',
1261: fasample_name || '-' || lasample_name);
1262: ELSE
1263: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
1264: END IF;
1265:
1266: IF (lsample_name IS not NULL) THEN
1267: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES',
1263: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
1264: END IF;
1265:
1266: IF (lsample_name IS not NULL) THEN
1267: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES',
1268: fsample_name || '-' || lsample_name);
1269: ELSE
1270: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
1271: END IF;
1266: IF (lsample_name IS not NULL) THEN
1267: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES',
1268: fsample_name || '-' || lsample_name);
1269: ELSE
1270: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
1271: END IF;
1272:
1273: --l_sample_plan := FND_MESSAGE.GET(); RLNAGARA B4905670 Commented this line
1274:
1269: ELSE
1270: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
1271: END IF;
1272:
1273: --l_sample_plan := FND_MESSAGE.GET(); RLNAGARA B4905670 Commented this line
1274:
1275: ELSE
1276: -- IF ((l_auto_sample <> 'Y') or (l_doc_number <> 2))
1277:
1291: END IF; -- IF ((l_auto_sample = 'Y') and (l_doc_number = 2))
1292:
1293: -- Bug 3625651 : populate the workflow attribute with
1294: -- the sampling plan information
1295: l_sample_plan := FND_MESSAGE.GET();
1296:
1297: ELSE
1298: -- l_sample_plan_exists <> 1
1299: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_NONE');
1295: l_sample_plan := FND_MESSAGE.GET();
1296:
1297: ELSE
1298: -- l_sample_plan_exists <> 1
1299: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_NONE');
1300: l_sample_plan := FND_MESSAGE.GET();
1301: l_sample_count := 1; -- just in case
1302:
1303: /* Sampling Event Successfully Created. Set Form Attribute
1296:
1297: ELSE
1298: -- l_sample_plan_exists <> 1
1299: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_NONE');
1300: l_sample_plan := FND_MESSAGE.GET();
1301: l_sample_count := 1; -- just in case
1302:
1303: /* Sampling Event Successfully Created. Set Form Attribute
1304: to the sampling event */
1501: into l_frequency_per;
1502: CLOSE sample_plan_freq_per;
1503: END IF;
1504:
1505: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
1506: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1507: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1508: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1509: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1502: CLOSE sample_plan_freq_per;
1503: END IF;
1504:
1505: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
1506: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1507: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1508: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1509: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1510: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
1503: END IF;
1504:
1505: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
1506: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1507: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1508: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1509: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1510: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
1511: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1504:
1505: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
1506: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1507: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1508: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1509: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1510: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
1511: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1512: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1505: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
1506: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1507: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1508: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1509: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1510: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
1511: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1512: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1513: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1506: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
1507: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1508: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1509: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1510: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
1511: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1512: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1513: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1514: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
1507: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
1508: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1509: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1510: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
1511: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1512: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1513: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1514: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
1515:
1508: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
1509: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1510: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
1511: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1512: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1513: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1514: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
1515:
1516: l_sample_plan_exists := 1;
1509: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
1510: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
1511: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1512: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1513: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1514: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
1515:
1516: l_sample_plan_exists := 1;
1517:
1510: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
1511: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
1512: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
1513: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
1514: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
1515:
1516: l_sample_plan_exists := 1;
1517:
1518: /* Check to see if auto sample creation is enabled */
1641: END IF;
1642: CLOSE get_reg_sample_num;
1643:
1644: IF (lrsample_name is not NULL) THEN
1645: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES',
1646: frsample_name || '-' || lrsample_name);
1647: ELSE
1648: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
1649: END IF;
1644: IF (lrsample_name is not NULL) THEN
1645: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES',
1646: frsample_name || '-' || lrsample_name);
1647: ELSE
1648: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
1649: END IF;
1650:
1651: IF (lasample_name is not NULL) THEN
1652: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES',
1648: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
1649: END IF;
1650:
1651: IF (lasample_name is not NULL) THEN
1652: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES',
1653: fasample_name || '-' || lasample_name);
1654: ELSE
1655: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
1656: END IF;
1651: IF (lasample_name is not NULL) THEN
1652: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES',
1653: fasample_name || '-' || lasample_name);
1654: ELSE
1655: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
1656: END IF;
1657:
1658: IF (lsample_name is not NULL) THEN
1659: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES',
1655: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
1656: END IF;
1657:
1658: IF (lsample_name is not NULL) THEN
1659: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES',
1660: fsample_name || '-' || lsample_name);
1661: ELSE
1662: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
1663: END IF;
1658: IF (lsample_name is not NULL) THEN
1659: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES',
1660: fsample_name || '-' || lsample_name);
1661: ELSE
1662: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
1663: END IF;
1664:
1665: ELSE
1666: /* Sampling Event Successfully Created. Set Form Attribute
1678: '" WF_SAMPLE="Y"';
1679: END IF;
1680: -- bug 4165704: not sure why this is here so I took it out?
1681: --RLNAGARA Uncommented the below line as this is necessary here because we have to show this message in the notification.
1682: l_sample_plan := FND_MESSAGE.GET();
1683: ELSE
1684: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_NONE');
1685: l_sample_plan := FND_MESSAGE.GET();
1686: l_sample_count := 1; -- incase there is no sample plan used
1680: -- bug 4165704: not sure why this is here so I took it out?
1681: --RLNAGARA Uncommented the below line as this is necessary here because we have to show this message in the notification.
1682: l_sample_plan := FND_MESSAGE.GET();
1683: ELSE
1684: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_NONE');
1685: l_sample_plan := FND_MESSAGE.GET();
1686: l_sample_count := 1; -- incase there is no sample plan used
1687:
1688: /* Sampling Event Successfully Created. Set Form Attribute
1681: --RLNAGARA Uncommented the below line as this is necessary here because we have to show this message in the notification.
1682: l_sample_plan := FND_MESSAGE.GET();
1683: ELSE
1684: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_NONE');
1685: l_sample_plan := FND_MESSAGE.GET();
1686: l_sample_count := 1; -- incase there is no sample plan used
1687:
1688: /* Sampling Event Successfully Created. Set Form Attribute
1689: to the sampling event */
2689: END IF;
2690:
2691: -- Bug 4165704: took out reference to wip_sample_plan cursor and put in l_sample_plan_exists
2692: IF l_sample_plan_exists = 1 THEN
2693: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
2694: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
2695: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
2696: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
2697: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
2690:
2691: -- Bug 4165704: took out reference to wip_sample_plan cursor and put in l_sample_plan_exists
2692: IF l_sample_plan_exists = 1 THEN
2693: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
2694: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
2695: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
2696: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
2697: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
2698: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
2691: -- Bug 4165704: took out reference to wip_sample_plan cursor and put in l_sample_plan_exists
2692: IF l_sample_plan_exists = 1 THEN
2693: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
2694: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
2695: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
2696: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
2697: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
2698: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
2699: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
2692: IF l_sample_plan_exists = 1 THEN
2693: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
2694: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
2695: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
2696: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
2697: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
2698: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
2699: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
2700: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
2693: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_INFO');
2694: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
2695: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
2696: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
2697: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
2698: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
2699: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
2700: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
2701: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
2694: FND_MESSAGE.SET_TOKEN('SAMPLE_NO', l_sample_count);
2695: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
2696: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
2697: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
2698: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
2699: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
2700: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
2701: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
2702: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
2695: FND_MESSAGE.SET_TOKEN('SAMPLE_QTY', l_sample_qty);
2696: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
2697: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
2698: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
2699: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
2700: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
2701: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
2702: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
2703: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
2696: FND_MESSAGE.SET_TOKEN('SAMPLE_UOM', l_sample_qty_uom); --RLNAGARA B4905670
2697: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
2698: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
2699: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
2700: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
2701: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
2702: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
2703: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
2704: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
2697: FND_MESSAGE.SET_TOKEN('FREQ_CNT', l_frequency_count);
2698: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
2699: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
2700: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
2701: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
2702: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
2703: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
2704: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
2705:
2698: FND_MESSAGE.SET_TOKEN('ASAMPLE_NO', l_archive_cnt_req);
2699: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
2700: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
2701: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
2702: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
2703: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
2704: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
2705:
2706: --RLNAGARA Bug 5910300 start
2699: FND_MESSAGE.SET_TOKEN('ASAMPLE_QTY', l_archive_qty);
2700: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
2701: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
2702: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
2703: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
2704: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
2705:
2706: --RLNAGARA Bug 5910300 start
2707: IF (l_frequency_type = 'F') THEN
2700: FND_MESSAGE.SET_TOKEN('RSAMPLE_NO', l_reserve_cnt_req);
2701: FND_MESSAGE.SET_TOKEN('RSAMPLE_QTY', l_reserve_qty);
2702: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
2703: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
2704: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
2705:
2706: --RLNAGARA Bug 5910300 start
2707: IF (l_frequency_type = 'F') THEN
2708: UPDATE GMD_WIP_SPEC_VRS
2800:
2801:
2802:
2803:
2804: FND_MESSAGE.SET_TOKEN('FREQ_PER', l_frequency_per);
2805:
2806: /* Check to see if auto sample creation is enabled */
2807: IF ((l_auto_sample = 'Y') and (l_doc_number = 2)) THEN
2808: GMD_AUTO_SAMPLE_PKG.create_samples(l_sampling_events,
2870: END IF;
2871: CLOSE get_reg_sample_num;
2872:
2873: IF (lrsample_name is not NULL) THEN
2874: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES',
2875: frsample_name || '-' || lrsample_name);
2876: ELSE
2877: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
2878: END IF;
2873: IF (lrsample_name is not NULL) THEN
2874: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES',
2875: frsample_name || '-' || lrsample_name);
2876: ELSE
2877: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
2878: END IF;
2879:
2880: IF (lasample_name is not NULL) THEN
2881: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES',
2877: FND_MESSAGE.SET_TOKEN('RESERVE_SAMPLES', frsample_name);
2878: END IF;
2879:
2880: IF (lasample_name is not NULL) THEN
2881: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES',
2882: fasample_name || '-' || lasample_name);
2883: ELSE
2884: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
2885: END IF;
2880: IF (lasample_name is not NULL) THEN
2881: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES',
2882: fasample_name || '-' || lasample_name);
2883: ELSE
2884: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
2885: END IF;
2886:
2887: IF (lsample_name is not NULL) THEN
2888: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES',
2884: FND_MESSAGE.SET_TOKEN('ARCHIVE_SAMPLES', fasample_name);
2885: END IF;
2886:
2887: IF (lsample_name is not NULL) THEN
2888: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES',
2889: fsample_name || '-' || lsample_name);
2890: ELSE
2891: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
2892: END IF;
2887: IF (lsample_name is not NULL) THEN
2888: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES',
2889: fsample_name || '-' || lsample_name);
2890: ELSE
2891: FND_MESSAGE.SET_TOKEN('RGULAR_SAMPLES', fsample_name);
2892: END IF;
2893:
2894: ELSE
2895: /* Sampling Event Successfully Created. Set Form Attribute
2905: l_form := 'GMDQSMPL_EDIT_F:SAMPLING_EVENT_ID="' ||
2906: l_sampling_events.sampling_event_id ||
2907: '" WF_SAMPLE="Y"';
2908: END IF;
2909: l_sample_plan := FND_MESSAGE.GET();
2910:
2911: ELSE
2912: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_NONE');
2913: l_sample_plan := FND_MESSAGE.GET();
2908: END IF;
2909: l_sample_plan := FND_MESSAGE.GET();
2910:
2911: ELSE
2912: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_NONE');
2913: l_sample_plan := FND_MESSAGE.GET();
2914:
2915: l_sample_count := 1; -- just in case
2916: --RLNAGARA B5389806 Only passing sampling_event_id is not enough to create samples.
2909: l_sample_plan := FND_MESSAGE.GET();
2910:
2911: ELSE
2912: FND_MESSAGE.SET_NAME('GMD', 'GMD_SAMPLE_PLAN_NONE');
2913: l_sample_plan := FND_MESSAGE.GET();
2914:
2915: l_sample_count := 1; -- just in case
2916: --RLNAGARA B5389806 Only passing sampling_event_id is not enough to create samples.
2917: --Here we need to pass another parameter called WF_SAMPLE which informs that the sample