DBA Data[Home] [Help]

APPS.GMD_COA_DATA_OM_NEW dependencies on FND_MSG_PUB

Line 94: G_tmp BOOLEAN := FND_MSG_PUB.Check_Msg_Level(0) ; -- temp call to initialize the

90:
91: /* Global variables */
92: COA_ID NUMBER:=0;
93: G_PKG_NAME CONSTANT VARCHAR2(30):='GMD_COA_DATA_OM_NEW';
94: G_tmp BOOLEAN := FND_MSG_PUB.Check_Msg_Level(0) ; -- temp call to initialize the
95: -- msg level threshhold gobal
96: -- variable.
97: G_debug_level NUMBER(2) := FND_MSG_PUB.G_Msg_Level_Threshold; -- Use this variable everywhere
98: -- to decide to log a debug msg.

Line 97: G_debug_level NUMBER(2) := FND_MSG_PUB.G_Msg_Level_Threshold; -- Use this variable everywhere

93: G_PKG_NAME CONSTANT VARCHAR2(30):='GMD_COA_DATA_OM_NEW';
94: G_tmp BOOLEAN := FND_MSG_PUB.Check_Msg_Level(0) ; -- temp call to initialize the
95: -- msg level threshhold gobal
96: -- variable.
97: G_debug_level NUMBER(2) := FND_MSG_PUB.G_Msg_Level_Threshold; -- Use this variable everywhere
98: -- to decide to log a debug msg.
99:
100:
101: PROCEDURE PUT_SPEC_IN_LOG(p_spec_id IN NUMBER,

Line 178: --log_msg('Message level is ...'||FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);

174: p_hdr_rec.report_title,
175: p_hdr_rec.spec_hdr_text_code, -- Bug # 4260445
176: X_user_id, SYSDATE, SYSDATE, X_user_id, X_login_id
177: );
178: --log_msg('Message level is ...'||FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
179: --log_msg('debug level is ...'||G_debug_level);
180: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
181: log_msg('procedure insert_hdr_rec, inserted into hdr table...');
182: END IF;

Line 180: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

176: X_user_id, SYSDATE, SYSDATE, X_user_id, X_login_id
177: );
178: --log_msg('Message level is ...'||FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
179: --log_msg('debug level is ...'||G_debug_level);
180: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
181: log_msg('procedure insert_hdr_rec, inserted into hdr table...');
182: END IF;
183: PrintLn('End procedure insert_hdr_rec');
184: PrintLn('Calling procedure Populate_hdr_Text'); -- Bug # 4260445

Line 223: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

219: text_cur_rec.paragraph_code,
220: text_cur_rec.line_no,
221: text_cur_rec.text);
222: END LOOP;
223: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
224: log_msg('inserted into populate_hdr_text...');
225: END IF;
226:
227: PrintLn('End procedure populate_hdr_text');

Line 281: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

277: text_cur_rec.paragraph_code,
278: text_cur_rec.line_no,
279: text_cur_rec.text);
280: END LOOP;
281: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
282: log_msg('inserted into populate_text...');
283: END IF;
284:
285: PrintLn('End procedure populate_text');

Line 594: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

590: l_detail_rec.report_precision := l_get_cust_test.report_precision;
591: ELSE
592: l_detail_rec.report_precision := c_spec_rec.report_precision;
593: END IF;
594: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
595: log_msg('populate_spec, report preicion is ...'||l_detail_rec.report_precision);
596: END IF;
597:
598: PrintLn('c_spec_rec.test_type = '||c_spec_rec.test_type);

Line 773: FND_MSG_PUB.Add;

769: PROCEDURE log_msg(p_msg_text IN VARCHAR2) IS
770: BEGIN
771: FND_MESSAGE.SET_NAME('GMI','GMI_DEBUG_API');
772: FND_MESSAGE.SET_TOKEN('MSG',p_msg_text);
773: FND_MSG_PUB.Add;
774: END log_msg ;
775:
776: PROCEDURE put_spec_in_log(p_spec_id IN NUMBER,
777: x_return_status OUT NOCOPY VARCHAR2) IS

Line 797: FND_MSG_PUB.Add;

793: PrintLn('GMD_QC_SPEC_NAME');
794: FND_MESSAGE.SET_NAME('GMD','GMD_QC_SPEC_NAME');
795: FND_MESSAGE.SET_TOKEN('SPEC_NAME' ,l_spec_name);
796: FND_MESSAGE.SET_TOKEN('SPEC_VERSION',l_spec_vers);
797: FND_MSG_PUB.Add;
798: PrintLn('End Procedure put_spec_in_log');
799: EXCEPTION
800: WHEN OTHERS THEN
801: PrintLn('GMD_COA_DATA.PUT_SPEC_IN_LOG '|| SUBSTR(SQLERRM,1,100));

Line 857: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

853: IF (c_sampling_event_rec.SAMPLE_ACTIVE_CNT=1) THEN
854: for c_simple_result_rec in c_simple_result(c_sampling_event_rec.sampling_event_id) loop -- take out this loop and try - compile on vis02
855: PrintLn('In c_simple_result LOOP');
856: p_sample_id := c_simple_result_rec.sample_id;
857: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
858: log_msg('getLatestSample sample for spec_id '|| p_sample_id);
859: END IF;
860: PrintLn('getLatestSample sample_id for spec_id '|| p_sample_id);
861: PrintLn('getLatestSample sample no for spec_id '|| c_simple_result_rec.sample_no);

Line 867: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

863: RETURN;
864: END LOOP;
865: ELSE
866: p_event_spec_disp_id := c_sampling_event_rec.event_spec_disp_id;
867: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
868: log_msg('getLatestSample p_event_spec_disp_id for spec_id '|| p_event_spec_disp_id);
869: END IF;
870: PrintLn('getLatestSample p_event_spec_disp_id for spec_id '|| p_event_spec_disp_id);
871: PrintLn('RETURN End Procedure getLatestSample');

Line 1022: --FND_MSG_PUB.initialize;

1018: BEGIN
1019: PrintLn('Begin Procedure get_result_match_for_spec');
1020: PrintLn('p_spec_id = '||p_spec_id);
1021: x_return_status := FND_API.G_RET_STS_SUCCESS;
1022: --FND_MSG_PUB.initialize;
1023:
1024: l_position := '010';
1025: PrintLn('l_position = '||l_position);
1026: IF p_spec_id IS NULL THEN

Line 1052: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

1048: p_lots(l_lot_counter).event_spec_disp_id,
1049: p_lots(l_lot_counter).sample_id);
1050: PrintLn('The value of event_spec_disp_id after latest sample is '||p_lots(l_lot_counter).event_spec_disp_id);
1051: PrintLn('The value of sample_id after latest sample is '||p_lots(l_lot_counter).sample_id);
1052: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
1053: log_msg('The value of event_spec_disp_id after latest sample is '||p_lots(l_lot_counter).event_spec_disp_id);
1054: log_msg('The value of sample_id after latest sample is '||p_lots(l_lot_counter).sample_id);
1055: END IF;
1056:

Line 1203: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);

1199: EXCEPTION
1200: WHEN REQ_FIELDS_MISSING THEN
1201: PrintLn('GMD_REQ_FIELD_MIS , PACKAGE , GMD_SPEC_MATCH_GRP.GET_RESULT_MATCH_FOR_SPEC');
1202: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_SPEC_MATCH_GRP.GET_RESULT_MATCH_FOR_SPEC');
1203: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1204: x_return_status := FND_API.G_RET_STS_ERROR ;
1205: WHEN INVALID_LOT THEN
1206: PrintLn('GMD_INVALID_LOT , LOT_NUMBER = '||p_lots(l_lot_counter).lot_number);
1207: gmd_api_pub.log_message('GMD_INVALID_LOT','LOT',to_char(p_lots(l_lot_counter).lot_number));

Line 1208: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);

1204: x_return_status := FND_API.G_RET_STS_ERROR ;
1205: WHEN INVALID_LOT THEN
1206: PrintLn('GMD_INVALID_LOT , LOT_NUMBER = '||p_lots(l_lot_counter).lot_number);
1207: gmd_api_pub.log_message('GMD_INVALID_LOT','LOT',to_char(p_lots(l_lot_counter).lot_number));
1208: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1209: x_return_status := FND_API.G_RET_STS_ERROR ;
1210: WHEN OTHERS THEN
1211: PrintLn('GMD_API_ERROR , PACKAGE , GMD_SPEC_MATCH_GRP.GET_RESULT_MATCH_FOR_SPEC , ERROR '||SUBSTR(SQLERRM,1,100)||' l_position = '||l_position);
1212: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SPEC_MATCH_GRP.GET_RESULT_MATCH_FOR_SPEC','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_position);

Line 1213: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);

1209: x_return_status := FND_API.G_RET_STS_ERROR ;
1210: WHEN OTHERS THEN
1211: PrintLn('GMD_API_ERROR , PACKAGE , GMD_SPEC_MATCH_GRP.GET_RESULT_MATCH_FOR_SPEC , ERROR '||SUBSTR(SQLERRM,1,100)||' l_position = '||l_position);
1212: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SPEC_MATCH_GRP.GET_RESULT_MATCH_FOR_SPEC','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_position);
1213: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1215: END get_result_match_for_spec ;
1216:
1217:

Line 1249: FND_MSG_PUB.Add;

1245: PrintLn('GMD_QC_SAMPLE_NO');
1246: FND_MESSAGE.SET_NAME('GMD','GMD_QC_SAMPLE_NO');
1247: FND_MESSAGE.SET_TOKEN('ORGN_CODE' ,l_sample_rec.organization_code);
1248: FND_MESSAGE.SET_TOKEN('SAMPLE_NO',l_sample_rec.sample_no);
1249: FND_MSG_PUB.Add;
1250: END LOOP;
1251: ELSE
1252: FOR l_sample_rec in c_samples LOOP
1253: PrintLn('In c_samples2 LOOP');

Line 1258: FND_MSG_PUB.Add;

1254: PrintLn('GMD_QC_SAMPLE_NO');
1255: FND_MESSAGE.SET_NAME('GMD','GMD_QC_SAMPLE_NO');
1256: FND_MESSAGE.SET_TOKEN('ORGN_CODE' ,l_sample_rec.organization_code);
1257: FND_MESSAGE.SET_TOKEN('SAMPLE_NO',l_sample_rec.sample_no);
1258: FND_MSG_PUB.Add;
1259: END LOOP;
1260: END IF;
1261: PrintLn('End Procedure add_sample_to_log');
1262: END add_sample_to_log;

Line 1384: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

1380: PrintLn('call_spec_match, GMD_SPEC_MATCH_GRP.FIND_INVENTORY_SPEC , l_return_status '||l_return_status);
1381: PrintLn('call_spec_match, GMD_SPEC_MATCH_GRP.FIND_INVENTORY_SPEC , x_message_data '||x_message_data);
1382: END IF;
1383:
1384: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
1385: log_msg('call_spec_match, GMD_SPEC_MATCH_GRP.FIND_INVENTORY_SPEC , Spec_id '||x_spec_id);
1386: log_msg('call_spec_match, GMD_SPEC_MATCH_GRP.FIND_INVENTORY_SPEC , x_message_data '||x_message_data);
1387: log_msg('call_spec_match, GMD_SPEC_MATCH_GRP.FIND_INVENTORY_SPEC , l_return_status '||l_return_status);
1388: log_msg('The parameters for inventory=>inventory_item_id, lot_number, subinventory '||

Line 1397: FND_MSG_PUB.Add;

1393: END IF;
1394: IF (x_return_flag = FALSE) THEN
1395: PrintLn('GMD_QC_NO_SPEC_FOUND');
1396: FND_MESSAGE.SET_NAME('GMD','GMD_QC_NO_SPEC_FOUND');
1397: FND_MSG_PUB.Add;
1398: PrintLn('RETURN End Procedure call_spec_match');
1399: RETURN;
1400: ELSE
1401: coa_id := coa_id + 1;

Line 1445: FND_MSG_PUB.Add;

1441: -- IF (p_hdr_rec.lot_number IS NULL OR l_coa_type='C') THEN
1442: IF (l_coa_type='C') OR (l_lot_ctl = 2 AND p_hdr_rec.lot_number IS NULL) THEN
1443: PrintLn('GMD_QC_COA_NO_LOT');
1444: FND_MESSAGE.SET_NAME('GMD','GMD_QC_COA_NO_LOT');
1445: FND_MSG_PUB.Add;
1446: p_hdr_rec.report_title := 'COC';
1447:
1448: PrintLn('p_hdr_rec.report_title = '||p_hdr_rec.report_title);
1449: PrintLn('Calling Procedure insert_hdr_rec');

Line 1508: FND_MSG_PUB.Add;

1504: l_lot_tbl(1).sample_id);
1505: ELSE
1506: PrintLn('GMD_QC_COA_NO_ACCEPTED_SAMPLE');
1507: FND_MESSAGE.SET_NAME('GMD','GMD_QC_COA_NO_ACCEPTED_SAMPLE');
1508: FND_MSG_PUB.Add;
1509:
1510: p_hdr_rec.report_title := 'COC';
1511:
1512: PrintLn('p_hdr_rec.report_title = '||p_hdr_rec.report_title);

Line 2240: FND_MSG_PUB.Initialize;

2236: PrintLn('param_rec.spec_id = '||param_rec.spec_id);
2237: PrintLn('param_rec.ship_to_site_id = '||param_rec.ship_to_site_id); -- Bug# 5399406
2238:
2239: IF FND_API.to_boolean(p_init_msg_list) THEN
2240: FND_MSG_PUB.Initialize;
2241: END IF;
2242:
2243: -- Standard call to check for call compatibility.
2244: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

Line 2281: FND_MSG_PUB.Count_AND_GET

2277: PrintLn('Calling Procedure call_spec_match');
2278: call_spec_match(hdr_rec,
2279: x_return_status);
2280: END IF;
2281: FND_MSG_PUB.Count_AND_GET
2282: (p_count => x_msg_count, p_data => x_msg_data);
2283: PrintLn('End Procedure populate_coa_data');
2284: EXCEPTION
2285:

Line 2290: FND_MSG_PUB.Count_AND_GET

2286: WHEN OTHERS THEN
2287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2288: PrintLn('GMD_COA_DATA.POPULATE_COA_DATA '|| SUBSTR(SQLERRM,1,100));
2289: log_msg('GMD_COA_DATA.POPULATE_COA_DATA '|| SUBSTR(SQLERRM,1,100));
2290: FND_MSG_PUB.Count_AND_GET
2291: (p_count => x_msg_count, p_data => x_msg_data);
2292: END populate_coa_data;
2293: -- /*************************************************************************
2294: -- # PROC