DBA Data[Home] [Help]

APPS.GMD_COA_DATA_OM_NEW dependencies on FND_MSG_PUB

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

51:
52: /* Global variables */
53: COA_ID NUMBER:=0;
54: G_PKG_NAME CONSTANT VARCHAR2(30):='GMD_COA_DATA_OM_NEW';
55: G_tmp BOOLEAN := FND_MSG_PUB.Check_Msg_Level(0) ; -- temp call to initialize the
56: -- msg level threshhold gobal
57: -- variable.
58: G_debug_level NUMBER(2) := FND_MSG_PUB.G_Msg_Level_Threshold; -- Use this variable everywhere
59: -- to decide to log a debug msg.

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

54: G_PKG_NAME CONSTANT VARCHAR2(30):='GMD_COA_DATA_OM_NEW';
55: G_tmp BOOLEAN := FND_MSG_PUB.Check_Msg_Level(0) ; -- temp call to initialize the
56: -- msg level threshhold gobal
57: -- variable.
58: G_debug_level NUMBER(2) := FND_MSG_PUB.G_Msg_Level_Threshold; -- Use this variable everywhere
59: -- to decide to log a debug msg.
60:
61:
62: PROCEDURE PUT_SPEC_IN_LOG(p_spec_id IN NUMBER,

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

135: p_hdr_rec.report_title,
136: p_hdr_rec.spec_hdr_text_code, -- Bug # 4260445
137: X_user_id, SYSDATE, SYSDATE, X_user_id, X_login_id
138: );
139: --log_msg('Message level is ...'||FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
140: --log_msg('debug level is ...'||G_debug_level);
141: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
142: log_msg('procedure insert_hdr_rec, inserted into hdr table...');
143: END IF;

Line 141: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

137: X_user_id, SYSDATE, SYSDATE, X_user_id, X_login_id
138: );
139: --log_msg('Message level is ...'||FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
140: --log_msg('debug level is ...'||G_debug_level);
141: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
142: log_msg('procedure insert_hdr_rec, inserted into hdr table...');
143: END IF;
144: PrintLn('End procedure insert_hdr_rec');
145: PrintLn('Calling procedure Populate_hdr_Text'); -- Bug # 4260445

Line 184: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

180: text_cur_rec.paragraph_code,
181: text_cur_rec.line_no,
182: text_cur_rec.text);
183: END LOOP;
184: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
185: log_msg('inserted into populate_hdr_text...');
186: END IF;
187:
188: PrintLn('End procedure populate_hdr_text');

Line 242: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

238: text_cur_rec.paragraph_code,
239: text_cur_rec.line_no,
240: text_cur_rec.text);
241: END LOOP;
242: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
243: log_msg('inserted into populate_text...');
244: END IF;
245:
246: PrintLn('End procedure populate_text');

Line 551: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

547: l_detail_rec.report_precision := l_get_cust_test.report_precision;
548: ELSE
549: l_detail_rec.report_precision := c_spec_rec.report_precision;
550: END IF;
551: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
552: log_msg('populate_spec, report preicion is ...'||l_detail_rec.report_precision);
553: END IF;
554:
555: PrintLn('c_spec_rec.test_type = '||c_spec_rec.test_type);

Line 730: FND_MSG_PUB.Add;

726: PROCEDURE log_msg(p_msg_text IN VARCHAR2) IS
727: BEGIN
728: FND_MESSAGE.SET_NAME('GMI','GMI_DEBUG_API');
729: FND_MESSAGE.SET_TOKEN('MSG',p_msg_text);
730: FND_MSG_PUB.Add;
731: END log_msg ;
732:
733: PROCEDURE put_spec_in_log(p_spec_id IN NUMBER,
734: x_return_status OUT NOCOPY VARCHAR2) IS

Line 754: FND_MSG_PUB.Add;

750: PrintLn('GMD_QC_SPEC_NAME');
751: FND_MESSAGE.SET_NAME('GMD','GMD_QC_SPEC_NAME');
752: FND_MESSAGE.SET_TOKEN('SPEC_NAME' ,l_spec_name);
753: FND_MESSAGE.SET_TOKEN('SPEC_VERSION',l_spec_vers);
754: FND_MSG_PUB.Add;
755: PrintLn('End Procedure put_spec_in_log');
756: EXCEPTION
757: WHEN OTHERS THEN
758: PrintLn('GMD_COA_DATA.PUT_SPEC_IN_LOG '|| SUBSTR(SQLERRM,1,100));

Line 799: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

795: IF (c_sampling_event_rec.SAMPLE_ACTIVE_CNT=1) THEN
796: for c_simple_result_rec in c_simple_result(c_sampling_event_rec.sampling_event_id) loop
797: PrintLn('In c_simple_result LOOP');
798: p_sample_id := c_simple_result_rec.sample_id;
799: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
800: log_msg('getLatestSample sample for spec_id '|| p_sample_id);
801: END IF;
802: PrintLn('getLatestSample sample for spec_id '|| p_sample_id);
803: PrintLn('RETURN End Procedure getLatestSample');

Line 808: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

804: RETURN;
805: END LOOP;
806: ELSE
807: p_event_spec_disp_id := c_sampling_event_rec.event_spec_disp_id;
808: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
809: log_msg('getLatestSample p_event_spec_disp_id for spec_id '|| p_event_spec_disp_id);
810: END IF;
811: PrintLn('getLatestSample p_event_spec_disp_id for spec_id '|| p_event_spec_disp_id);
812: PrintLn('RETURN End Procedure getLatestSample');

Line 955: --FND_MSG_PUB.initialize;

951: BEGIN
952: PrintLn('Begin Procedure get_result_match_for_spec');
953: PrintLn('p_spec_id = '||p_spec_id);
954: x_return_status := FND_API.G_RET_STS_SUCCESS;
955: --FND_MSG_PUB.initialize;
956:
957: l_position := '010';
958: PrintLn('l_position = '||l_position);
959: IF p_spec_id IS NULL THEN

Line 983: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

979: p_lots(l_lot_counter).event_spec_disp_id,
980: p_lots(l_lot_counter).sample_id);
981: PrintLn('The value of event_spec_disp_id after latest sample is '||p_lots(l_lot_counter).event_spec_disp_id);
982: PrintLn('The value of sample_id after latest sample is '||p_lots(l_lot_counter).sample_id);
983: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
984: log_msg('The value of event_spec_disp_id after latest sample is '||p_lots(l_lot_counter).event_spec_disp_id);
985: log_msg('The value of sample_id after latest sample is '||p_lots(l_lot_counter).sample_id);
986: END IF;
987:

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

1128: EXCEPTION
1129: WHEN REQ_FIELDS_MISSING THEN
1130: PrintLn('GMD_REQ_FIELD_MIS , PACKAGE , GMD_SPEC_MATCH_GRP.GET_RESULT_MATCH_FOR_SPEC');
1131: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_SPEC_MATCH_GRP.GET_RESULT_MATCH_FOR_SPEC');
1132: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1133: x_return_status := FND_API.G_RET_STS_ERROR ;
1134: WHEN INVALID_LOT THEN
1135: PrintLn('GMD_INVALID_LOT , LOT_NUMBER = '||p_lots(l_lot_counter).lot_number);
1136: gmd_api_pub.log_message('GMD_INVALID_LOT','LOT',to_char(p_lots(l_lot_counter).lot_number));

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

1133: x_return_status := FND_API.G_RET_STS_ERROR ;
1134: WHEN INVALID_LOT THEN
1135: PrintLn('GMD_INVALID_LOT , LOT_NUMBER = '||p_lots(l_lot_counter).lot_number);
1136: gmd_api_pub.log_message('GMD_INVALID_LOT','LOT',to_char(p_lots(l_lot_counter).lot_number));
1137: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1138: x_return_status := FND_API.G_RET_STS_ERROR ;
1139: WHEN OTHERS THEN
1140: PrintLn('GMD_API_ERROR , PACKAGE , GMD_SPEC_MATCH_GRP.GET_RESULT_MATCH_FOR_SPEC , ERROR '||SUBSTR(SQLERRM,1,100)||' l_position = '||l_position);
1141: 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 1142: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);

1138: x_return_status := FND_API.G_RET_STS_ERROR ;
1139: WHEN OTHERS THEN
1140: PrintLn('GMD_API_ERROR , PACKAGE , GMD_SPEC_MATCH_GRP.GET_RESULT_MATCH_FOR_SPEC , ERROR '||SUBSTR(SQLERRM,1,100)||' l_position = '||l_position);
1141: 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);
1142: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1144: END get_result_match_for_spec ;
1145:
1146:

Line 1178: FND_MSG_PUB.Add;

1174: PrintLn('GMD_QC_SAMPLE_NO');
1175: FND_MESSAGE.SET_NAME('GMD','GMD_QC_SAMPLE_NO');
1176: FND_MESSAGE.SET_TOKEN('ORGN_CODE' ,l_sample_rec.organization_code);
1177: FND_MESSAGE.SET_TOKEN('SAMPLE_NO',l_sample_rec.sample_no);
1178: FND_MSG_PUB.Add;
1179: END LOOP;
1180: ELSE
1181: FOR l_sample_rec in c_samples LOOP
1182: PrintLn('In c_samples2 LOOP');

Line 1187: FND_MSG_PUB.Add;

1183: PrintLn('GMD_QC_SAMPLE_NO');
1184: FND_MESSAGE.SET_NAME('GMD','GMD_QC_SAMPLE_NO');
1185: FND_MESSAGE.SET_TOKEN('ORGN_CODE' ,l_sample_rec.organization_code);
1186: FND_MESSAGE.SET_TOKEN('SAMPLE_NO',l_sample_rec.sample_no);
1187: FND_MSG_PUB.Add;
1188: END LOOP;
1189: END IF;
1190: PrintLn('End Procedure add_sample_to_log');
1191: END add_sample_to_log;

Line 1296: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

1292: PrintLn('call_spec_match, GMD_SPEC_MATCH_GRP.FIND_INVENTORY_SPEC , l_return_status '||l_return_status);
1293: PrintLn('call_spec_match, GMD_SPEC_MATCH_GRP.FIND_INVENTORY_SPEC , x_message_data '||x_message_data);
1294: END IF;
1295:
1296: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
1297: log_msg('call_spec_match, GMD_SPEC_MATCH_GRP.FIND_INVENTORY_SPEC , Spec_id '||x_spec_id);
1298: log_msg('call_spec_match, GMD_SPEC_MATCH_GRP.FIND_INVENTORY_SPEC , x_message_data '||x_message_data);
1299: log_msg('call_spec_match, GMD_SPEC_MATCH_GRP.FIND_INVENTORY_SPEC , l_return_status '||l_return_status);
1300: log_msg('The parameters for inventory=>inventory_item_id, lot_number, subinventory '||

Line 1309: FND_MSG_PUB.Add;

1305: END IF;
1306: IF (x_return_flag = FALSE) THEN
1307: PrintLn('GMD_QC_NO_SPEC_FOUND');
1308: FND_MESSAGE.SET_NAME('GMD','GMD_QC_NO_SPEC_FOUND');
1309: FND_MSG_PUB.Add;
1310: PrintLn('RETURN End Procedure call_spec_match');
1311: RETURN;
1312: ELSE
1313: coa_id := coa_id + 1;

Line 1357: FND_MSG_PUB.Add;

1353: -- IF (p_hdr_rec.lot_number IS NULL OR l_coa_type='C') THEN
1354: IF (l_coa_type='C') OR (l_lot_ctl = 2 AND p_hdr_rec.lot_number IS NULL) THEN
1355: PrintLn('GMD_QC_COA_NO_LOT');
1356: FND_MESSAGE.SET_NAME('GMD','GMD_QC_COA_NO_LOT');
1357: FND_MSG_PUB.Add;
1358: p_hdr_rec.report_title := 'COC';
1359:
1360: PrintLn('p_hdr_rec.report_title = '||p_hdr_rec.report_title);
1361: PrintLn('Calling Procedure insert_hdr_rec');

Line 1418: FND_MSG_PUB.Add;

1414: l_lot_tbl(1).sample_id);
1415: ELSE
1416: PrintLn('GMD_QC_COA_NO_ACCEPTED_SAMPLE');
1417: FND_MESSAGE.SET_NAME('GMD','GMD_QC_COA_NO_ACCEPTED_SAMPLE');
1418: FND_MSG_PUB.Add;
1419:
1420: p_hdr_rec.report_title := 'COC';
1421:
1422: PrintLn('p_hdr_rec.report_title = '||p_hdr_rec.report_title);

Line 1885: FND_MSG_PUB.Initialize;

1881: PrintLn('param_rec.spec_id = '||param_rec.spec_id);
1882: PrintLn('param_rec.ship_to_site_id = '||param_rec.ship_to_site_id); -- Bug# 5399406
1883:
1884: IF FND_API.to_boolean(p_init_msg_list) THEN
1885: FND_MSG_PUB.Initialize;
1886: END IF;
1887:
1888: -- Standard call to check for call compatibility.
1889: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

Line 1926: FND_MSG_PUB.Count_AND_GET

1922: PrintLn('Calling Procedure call_spec_match');
1923: call_spec_match(hdr_rec,
1924: x_return_status);
1925: END IF;
1926: FND_MSG_PUB.Count_AND_GET
1927: (p_count => x_msg_count, p_data => x_msg_data);
1928: PrintLn('End Procedure populate_coa_data');
1929: EXCEPTION
1930:

Line 1935: FND_MSG_PUB.Count_AND_GET

1931: WHEN OTHERS THEN
1932: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1933: PrintLn('GMD_COA_DATA.POPULATE_COA_DATA '|| SUBSTR(SQLERRM,1,100));
1934: log_msg('GMD_COA_DATA.POPULATE_COA_DATA '|| SUBSTR(SQLERRM,1,100));
1935: FND_MSG_PUB.Count_AND_GET
1936: (p_count => x_msg_count, p_data => x_msg_data);
1937: END populate_coa_data;
1938: -- /*************************************************************************
1939: -- # PROC