eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_SCHEDULE_PUB dependencies on PA_UTILS

Line 112: PA_UTILS.Add_Message ('PA', 'PA_SCH_FROM_OR_TO_DATE_NULL');

108: -- If p_exception_type_code = 'CHANGE_DURATION', at least one of start_date or end_date
109: -- should not be null. The reason is that if both are null, actually it wouldn't update anything.
110: IF (p_exception_type_code = 'CHANGE_DURATION' AND
111: p_change_start_date IS NULL AND p_change_end_date IS NULL) THEN
112: PA_UTILS.Add_Message ('PA', 'PA_SCH_FROM_OR_TO_DATE_NULL');
113: RAISE FND_API.G_EXC_ERROR;
114: END IF;
115:
116: -- If p_exception_type_code = 'CHANGE_HOURS' or 'CHANGE_WORK_PATTERN' or 'CHANGE_STATUS',

Line 121: PA_UTILS.Add_Message ('PA', 'PA_SCH_FROM_TO_DATE_NULL');

117: -- End date or Start date should not be null.
118: IF ( (p_exception_type_code = 'CHANGE_HOURS' OR p_exception_type_code = 'CHANGE_WORK_PATTERN' OR
119: p_exception_type_code = 'CHANGE_STATUS') AND
120: (p_change_start_date IS NULL OR p_change_end_date IS NULL) )THEN
121: PA_UTILS.Add_Message ('PA', 'PA_SCH_FROM_TO_DATE_NULL');
122: RAISE FND_API.G_EXC_ERROR;
123: END IF;
124:
125: -- If this api has been called from the page which has start_date, end_date input, call

Line 132: PA_UTILS.Add_Message ('PA', l_err_msg_code);

128: PA_SCHEDULE_UTILS.validate_date_range (p_change_start_date, p_change_end_date, l_x_return_status, l_err_msg_code);
129:
130: -- If validate_date_range fails, put error message into error stack and stop to process.
131: IF (l_x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
132: PA_UTILS.Add_Message ('PA', l_err_msg_code);
133: RAISE FND_API.G_EXC_ERROR;
134: END IF;
135: END IF;
136:

Line 144: PA_UTILS.Add_Message ('PA', 'PA_SCH_ASGN_STATUS_NULL');

140: -- mass update: if both 'p_requirement_status_code' and 'p_assignment_status_code' are null.
141: IF ( (p_exception_type_code = 'SHIFT_DURATION' OR p_exception_type_code = 'CHANGE_STATUS') AND
142: (p_requirement_status_code is NULL AND p_assignment_status_code is NULL AND
143: p_mass_update_flag = FND_API.G_TRUE) ) THEN
144: PA_UTILS.Add_Message ('PA', 'PA_SCH_ASGN_STATUS_NULL');
145: RAISE FND_API.G_EXC_ERROR;
146: END IF;
147:
148: -- validations when p_exception_type_code = 'CHANGE_HOURS'

Line 158: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_NULL');

154: -- the 0 to 100 percent
155: IF (p_change_hours_type_code = 'HOURS') THEN
156:
157: IF (p_hrs_per_day IS NULL) THEN
158: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_NULL');
159: RAISE FND_API.G_EXC_ERROR;
160: ELSIF (p_hrs_per_day NOT BETWEEN 0 AND 24 ) THEN
161: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_OUT_OF_RANGE');
162: RAISE FND_API.G_EXC_ERROR;

Line 161: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_OUT_OF_RANGE');

157: IF (p_hrs_per_day IS NULL) THEN
158: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_NULL');
159: RAISE FND_API.G_EXC_ERROR;
160: ELSIF (p_hrs_per_day NOT BETWEEN 0 AND 24 ) THEN
161: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_OUT_OF_RANGE');
162: RAISE FND_API.G_EXC_ERROR;
163: END IF;
164:
165: ELSIF (p_change_hours_type_code = 'PERCENTAGE') THEN

Line 167: PA_UTILS.Add_Message ('PA', 'PA_SCH_PERCENTAGE_NULL');

163: END IF;
164:
165: ELSIF (p_change_hours_type_code = 'PERCENTAGE') THEN
166: IF (p_calendar_percent IS NULL) THEN
167: PA_UTILS.Add_Message ('PA', 'PA_SCH_PERCENTAGE_NULL');
168: RAISE FND_API.G_EXC_ERROR;
169: ELSIF (p_calendar_percent NOT BETWEEN 0 AND 100 ) THEN
170: PA_UTILS.Add_Message ('PA', 'PA_SCH_PERCENTAGE_OUT_OF_RANGE');
171: RAISE FND_API.G_EXC_ERROR;

Line 170: PA_UTILS.Add_Message ('PA', 'PA_SCH_PERCENTAGE_OUT_OF_RANGE');

166: IF (p_calendar_percent IS NULL) THEN
167: PA_UTILS.Add_Message ('PA', 'PA_SCH_PERCENTAGE_NULL');
168: RAISE FND_API.G_EXC_ERROR;
169: ELSIF (p_calendar_percent NOT BETWEEN 0 AND 100 ) THEN
170: PA_UTILS.Add_Message ('PA', 'PA_SCH_PERCENTAGE_OUT_OF_RANGE');
171: RAISE FND_API.G_EXC_ERROR;
172: END IF;
173:
174: -- Value/ID validation for calendar_name/id entered through 'OTHER' text input field on

Line 180: PA_UTILS.Add_Message ('PA', 'PA_OTHER_CALENDAR_NULL');

176: IF (p_change_calendar_type_code = 'OTHER') THEN
177:
178: -- IF both calendar_name and calendar_id are null, error out.
179: IF (p_change_calendar_name is NULL AND p_change_calendar_id IS NULL) THEN
180: PA_UTILS.Add_Message ('PA', 'PA_OTHER_CALENDAR_NULL');
181: RAISE FND_API.G_EXC_ERROR;
182: END IF;
183:
184: PA_CALENDAR_UTILS.Check_Calendar_Name_Or_Id(

Line 194: PA_UTILS.Add_Message ('PA', l_err_msg_code);

190: ,x_error_message_code => l_err_msg_code);
191:
192: -- If calendar_name/id validation fails, put error message into error stack.
193: IF (l_x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
194: PA_UTILS.Add_Message ('PA', l_err_msg_code);
195: RAISE FND_API.G_EXC_ERROR;
196: END IF;
197: END IF; -- IF(p_change_calendar_type_code = 'OTHER')
198: END IF; -- ELSIF (p_change_hours_type_code = 'PERCENTAGE')

Line 210: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_ALL_NULL');

206: IF (p_monday_hours IS NULL AND p_tuesday_hours IS NULL AND
207: p_wednesday_hours IS NULL AND p_thursday_hours IS NULL AND
208: p_friday_hours IS NULL AND p_saturday_hours IS NULL AND
209: p_sunday_hours IS NULL) THEN
210: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_ALL_NULL');
211: RAISE FND_API.G_EXC_ERROR;
212: END IF;
213:
214: -- if anyday hours is not null and not valid number(between 0 and 24), throw an errors.

Line 222: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_OUT_OF_RANGE');

218: (p_thursday_hours IS NOT NULL AND (p_thursday_hours NOT BETWEEN 0 AND 24)) OR
219: (p_friday_hours IS NOT NULL AND (p_friday_hours NOT BETWEEN 0 AND 24)) OR
220: (p_saturday_hours IS NOT NULL AND (p_saturday_hours NOT BETWEEN 0 AND 24)) OR
221: (p_sunday_hours IS NOT NULL AND (p_sunday_hours NOT BETWEEN 0 AND 24)) ) THEN
222: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_OUT_OF_RANGE');
223: RAISE FND_API.G_EXC_ERROR;
224: END IF;
225:
226: -- Cross-row validation when p_last_row_flag = 'Y'

Line 236: PA_UTILS.Add_Message ('PA', 'PA_SCH_OVERLAP_WORK_PATTERN');

232: OR (p_change_end_date_tbl(j) >= p_change_start_date_tbl(i) AND p_change_end_date_tbl(j) <= p_change_end_date_tbl(i))
233: OR (p_change_start_date_tbl(j) <= p_change_start_date_tbl(i) AND p_change_end_date_tbl(j) >= p_change_end_date_tbl(i))
234: OR (p_change_start_date_tbl(j) >= p_change_start_date_tbl(i) AND p_change_end_date_tbl(j) <= p_change_end_date_tbl(i)))
235: THEN
236: PA_UTILS.Add_Message ('PA', 'PA_SCH_OVERLAP_WORK_PATTERN');
237: RAISE FND_API.G_EXC_ERROR;
238: END IF;
239: END LOOP;
240: END LOOP;

Line 353: PA_UTILS.Add_Message( p_app_short_name => 'PA'

349: ELSE -- Bug 6411422
350:
351: --l_profile_begin_date := to_date(fnd_profile.value('PA_UTL_START_DATE'), 'DD/MM/YYYY'); /* commenting for For Bug 7304151 */
352: l_profile_begin_date := to_date(fnd_profile.value('PA_UTL_START_DATE'), 'DD/MM/YYYY', 'NLS_DATE_LANGUAGE=AMERICAN'); /*Adding For Bug 7304151*/
353: PA_UTILS.Add_Message( p_app_short_name => 'PA'
354: ,p_msg_name => 'PA_INVALID_ASSIGN_START_DATE'
355: ,p_token1 => 'PROFILE_DATE'
356: ,p_value1 => l_profile_begin_date );
357: RAISE FND_API.G_EXC_ERROR;

Line 742: PA_UTILS.Add_Message ('PA', 'PA_NO_ASGMT');

738: l_success_assignment_id_tbl(i) := null;
739:
740: -- add appropriate error message to the error stack as raise error where the error will be
741: -- copied to the error table.
742: PA_UTILS.Add_Message ('PA', 'PA_NO_ASGMT');
743: RAISE FND_API.G_EXC_ERROR;
744:
745: -- If there is only record for the assignment_id, call single_update_schedule after security check
746: -- if necessary.

Line 867: PA_UTILS.Add_Message ('PA', 'PA_STATUS_CODE_NOT_FOUND');

863:
864: EXCEPTION
865: -- need to catch error for system_status_code being not found
866: WHEN NO_DATA_FOUND THEN
867: PA_UTILS.Add_Message ('PA', 'PA_STATUS_CODE_NOT_FOUND');
868:
869: -- save the error message to the proper table so that we can retrive them later
870: -- from workflow notification page.
871: PA_MESSAGE_UTILS.save_messages

Line 1289: PA_UTILS.Add_Message('PA', l_error_message_code);

1285: End If;
1286:
1287: EXCEPTION
1288: WHEN l_ei_asgn_out_of_range THEN
1289: PA_UTILS.Add_Message('PA', l_error_message_code);
1290: x_return_status := FND_API.G_RET_STS_ERROR;
1291: x_msg_data := l_error_message_code;
1292: x_msg_count := FND_MSG_PUB.Count_Msg;
1293: If x_msg_count = 1 THEN

Line 1304: PA_UTILS.Add_Message('PA', l_error_message_code);

1300: p_msg_index_out => l_msg_index_out );
1301: x_msg_data := l_data ; -- 4537865 : NOCOPY related change
1302: End If;
1303: WHEN l_resource_cc_error_u THEN
1304: PA_UTILS.Add_Message('PA', l_error_message_code);
1305: x_return_status := FND_API.G_RET_STS_ERROR;
1306: x_msg_data := l_error_message_code;
1307: x_msg_count := FND_MSG_PUB.Count_Msg;
1308: If x_msg_count = 1 THEN

Line 1319: PA_UTILS.Add_Message('PA', 'CROSS_CHARGE_VALIDATION_FAILED');

1315: p_msg_index_out => l_msg_index_out );
1316: x_msg_data := l_data ; -- 4537865 : NOCOPY related change
1317: End If;
1318: WHEN l_resource_cc_error_e THEN
1319: PA_UTILS.Add_Message('PA', 'CROSS_CHARGE_VALIDATION_FAILED');
1320: x_return_status := FND_API.G_RET_STS_ERROR;
1321: x_msg_data := 'CROSS_CHARGE_VALIDATION_FAILED';
1322: x_msg_count := FND_MSG_PUB.Count_Msg;
1323: If x_msg_count = 1 THEN

Line 1334: PA_UTILS.Add_Message( 'PA', 'PA_RESOURCE_OUT_OF_RANGE');

1330: p_msg_index_out => l_msg_index_out );
1331: x_msg_data := l_data ; -- 4537865 : NOCOPY related change
1332: End If;
1333: WHEN l_resource_out_of_range THEN
1334: PA_UTILS.Add_Message( 'PA', 'PA_RESOURCE_OUT_OF_RANGE');
1335: x_return_status := FND_API.G_RET_STS_ERROR;
1336: x_msg_data := 'PA_RESOURCE_OUT_OF_RANGE';
1337: x_msg_count := FND_MSG_PUB.Count_Msg;
1338: If x_msg_count = 1 THEN

Line 1349: PA_UTILS.add_message('PA','PA_XC_RECORD_CHANGED');

1345: p_msg_index_out => l_msg_index_out );
1346: x_msg_data := l_data ; -- 4537865 : NOCOPY related change
1347: End If;
1348: WHEN l_stale_asmt_data THEN
1349: PA_UTILS.add_message('PA','PA_XC_RECORD_CHANGED');
1350: x_return_status := FND_API.G_RET_STS_ERROR;
1351: x_msg_data := 'PA_XC_RECORD_CHANGED';
1352: x_msg_count := FND_MSG_PUB.Count_Msg;
1353: If x_msg_count = 1 THEN

Line 1364: PA_UTILS.add_message('PA','PA_SCH_ASGN_STATUS_NULL');

1360: p_msg_index_out => l_msg_index_out );
1361: x_msg_data := l_data ; -- 4537865 : NOCOPY related change
1362: End If;
1363: WHEN l_assignment_status_null THEN
1364: PA_UTILS.add_message('PA','PA_SCH_ASGN_STATUS_NULL');
1365: x_return_status := FND_API.G_RET_STS_ERROR;
1366: x_msg_data := 'PA_SCH_ASGN_STATUS_NULL';
1367: x_msg_count := FND_MSG_PUB.Count_Msg;
1368: If x_msg_count = 1 THEN

Line 1379: PA_UTILS.add_message('PA','PA_SCH_INVALID_FROM_DATE',

1375: p_msg_index_out => l_msg_index_out );
1376: x_msg_data := l_data ; -- 4537865 : NOCOPY related change
1377: End If;
1378: WHEN l_out_of_range_from_date THEN
1379: PA_UTILS.add_message('PA','PA_SCH_INVALID_FROM_DATE',
1380: 'ASMT_TYPE_POSS', l_asgn_req_poss_text,
1381: 'ASMT_TYPE', l_asgn_req_text);
1382: x_msg_data := 'PA_SCH_INVALID_FROM_DATE';
1383: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1396: PA_UTILS.add_message('PA','PA_SCH_INVALID_TO_DATE',

1392: p_msg_index_out => l_msg_index_out );
1393: x_msg_data := l_data; -- 4537865 : NOCOPY related change
1394: End If;
1395: WHEN l_out_of_range_to_date THEN
1396: PA_UTILS.add_message('PA','PA_SCH_INVALID_TO_DATE',
1397: 'ASMT_TYPE_POSS', l_asgn_req_poss_text,
1398: 'ASMT_TYPE', l_asgn_req_text);
1399: x_return_status := FND_API.G_RET_STS_ERROR;
1400: x_msg_data := 'PA_SCH_INVALID_TO_DATE';

Line 1413: PA_UTILS.Add_Message( p_app_short_name => 'PA',

1409: p_msg_index_out => l_msg_index_out );
1410: x_msg_data := l_data; -- 4537865 : NOCOPY related change
1411: End If;
1412: WHEN l_asgn_stus_not_for_proj_stus THEN
1413: PA_UTILS.Add_Message( p_app_short_name => 'PA',
1414: p_msg_name => 'PA_ASGN_STUS_NOT_FOR_PROJ_STUS',
1415: p_token1 => 'PROJ_STATUS',
1416: p_value1 => l_project_status_name,
1417: p_token2 => 'ASGN_STATUS',

Line 1592: PA_UTILS.add_message('PA','PA_SCH_INVALID_FROM_TO_DATE',

1588: End If;
1589:
1590: EXCEPTION
1591: WHEN l_out_of_range_date THEN
1592: PA_UTILS.add_message('PA','PA_SCH_INVALID_FROM_TO_DATE',
1593: 'ASMT_TYPE', l_asgn_req_text);
1594: x_return_status := FND_API.G_RET_STS_ERROR;
1595: x_msg_data := 'PA_SCH_INVALID_FROM_TO_DATE';
1596: x_msg_count := FND_MSG_PUB.Count_Msg;

Line 1856: PA_UTILS.add_message('PA','PA_SCH_INVALID_FROM_TO_DATE',

1852: End If;
1853:
1854: EXCEPTION
1855: WHEN l_out_of_range_date THEN
1856: PA_UTILS.add_message('PA','PA_SCH_INVALID_FROM_TO_DATE',
1857: 'ASMT_TYPE', l_asgn_req_text);
1858: x_return_status := FND_API.G_RET_STS_ERROR;
1859: x_msg_data := 'PA_SCH_INVALID_FROM_TO_DATE';
1860: x_msg_count := FND_MSG_PUB.Count_Msg;

Line 1989: PA_UTILS.Add_Message ('PA', 'PA_SCH_ASGN_STATUS_NULL'); -- is this message okay?

1985: PA_SCHEDULE_UTILS.log_message(1,'Start of Change_Status ... ');
1986:
1987: -- p_assignment_status_code should not be null
1988: IF (p_assignment_status_code is NULL) THEN
1989: PA_UTILS.Add_Message ('PA', 'PA_SCH_ASGN_STATUS_NULL'); -- is this message okay?
1990: RAISE FND_API.G_EXC_ERROR;
1991: END IF;
1992:
1993: -- The passed dates should fall between the assignment start date and assignment end date */

Line 2120: PA_UTILS.add_message('PA','PA_XC_RECORD_CHANGED');

2116: p_data => x_msg_data,
2117: p_msg_index_out => l_msg_index_out );
2118: END IF;
2119: WHEN l_stale_asmt_data THEN
2120: PA_UTILS.add_message('PA','PA_XC_RECORD_CHANGED');
2121: x_return_status := FND_API.G_RET_STS_ERROR;
2122: x_msg_data := 'PA_XC_RECORD_CHANGED';
2123: x_msg_count := FND_MSG_PUB.Count_Msg;
2124: If x_msg_count = 1 THEN

Line 2135: PA_UTILS.add_message('PA','PA_INVALID_ASGN_CANCELLED_DATE',

2131: p_msg_index_out => l_msg_index_out );
2132: x_msg_data := l_data ; -- 4537865 : NOCOPY related change
2133: End If;
2134: WHEN l_invalid_asgn_cancelled_date THEN
2135: PA_UTILS.add_message('PA','PA_INVALID_ASGN_CANCELLED_DATE',
2136: 'ASMT_TYPE_POSS', l_asgn_req_poss_text,
2137: 'A_OR_AN', l_a_an_text,
2138: 'ASMT_TYPE', l_asgn_req_text);
2139: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2153: PA_UTILS.add_message('PA','PA_SCH_INVALID_FROM_TO_DATE',

2149: p_msg_index_out => l_msg_index_out );
2150: x_msg_data := l_data ; -- 4537865 : NOCOPY related change
2151: End If;
2152: WHEN l_out_of_range_date THEN
2153: PA_UTILS.add_message('PA','PA_SCH_INVALID_FROM_TO_DATE',
2154: 'ASMT_TYPE', l_asgn_req_text);
2155: x_return_status := FND_API.G_RET_STS_ERROR;
2156: x_msg_data := 'PA_SCH_INVALID_FROM_TO_DATE';
2157: x_msg_count := FND_MSG_PUB.Count_Msg;

Line 2169: PA_UTILS.Add_Message( p_app_short_name => 'PA',

2165: p_msg_index_out => l_msg_index_out );
2166: x_msg_data := l_data ; -- 4537865 : NOCOPY related change
2167: End If;
2168: WHEN l_asgn_stus_not_for_proj_stus THEN
2169: PA_UTILS.Add_Message( p_app_short_name => 'PA',
2170: p_msg_name => 'PA_ASGN_STUS_NOT_FOR_PROJ_STUS',
2171: p_token1 => 'PROJ_STATUS',
2172: p_value1 => l_project_status_name,
2173: p_token2 => 'ASGN_STATUS',

Line 2352: PA_UTILS.add_message('PA','PA_CALENDAR_INVALID_AMBIGOUS');

2348:
2349:
2350: EXCEPTION
2351: WHEN l_invalid_duplicate_cal_name THEN
2352: PA_UTILS.add_message('PA','PA_CALENDAR_INVALID_AMBIGOUS');
2353: x_return_status := FND_API.G_RET_STS_ERROR;
2354: x_msg_data := 'PA_CALENDAR_INVALID_AMBIGOUS';
2355: x_msg_count := FND_MSG_PUB.Count_Msg;
2356: If x_msg_count = 1 THEN

Line 2367: PA_UTILS.add_message('PA','PA_SCH_FROM_TO_DATE_NULL');

2363: p_msg_index_out => l_msg_index_out );
2364: x_msg_data := l_data ; -- 4537865 : NOCOPY related change
2365: End If;
2366: WHEN l_from_to_date_null THEN
2367: PA_UTILS.add_message('PA','PA_SCH_FROM_TO_DATE_NULL');
2368: x_return_status := FND_API.G_RET_STS_ERROR;
2369: x_msg_data := 'PA_SCH_FROM_TO_DATE_NULL';
2370: x_msg_count := FND_MSG_PUB.Count_Msg;
2371: If x_msg_count = 1 THEN

Line 3165: PA_UTILS.add_message('PA','PA_INVALID_PROFILE_CALENDAR_ID');

3161:
3162: EXCEPTION
3163: WHEN l_invalid_default_calendar THEN
3164: PA_SCHEDULE_UTILS.log_message(1,'ERROR: invalid calendar id at profile option ..');
3165: PA_UTILS.add_message('PA','PA_INVALID_PROFILE_CALENDAR_ID');
3166: x_return_status := FND_API.G_RET_STS_ERROR;
3167: x_msg_data := 'PA_INVALID_PROFILE_CALENDAR_ID';
3168: x_msg_count := FND_MSG_PUB.Count_Msg;
3169:

Line 3186: PA_UTILS.add_message('PA','PA_INVALID_PROFILE_CALENDAR_ID');

3182: x_msg_data := l_data ; -- 4537865
3183: End If;
3184: WHEN l_null_default_calendar THEN
3185: PA_SCHEDULE_UTILS.log_message(1,'ERROR: Null calendar id at profile option ..');
3186: PA_UTILS.add_message('PA','PA_INVALID_PROFILE_CALENDAR_ID');
3187: x_return_status := FND_API.G_RET_STS_ERROR;
3188: x_msg_data := 'PA_NULL_PROFILE_CALENDAR_ID';
3189: x_msg_count := FND_MSG_PUB.Count_Msg;
3190:

Line 3536: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_OUT_OF_RANGE');

3532: END IF;
3533: -- Bug 3235656 : Added the below condition to show error
3534: FOR i IN p_hours_table.FIRST .. p_hours_table.LAST LOOP
3535: IF (p_hours_table(i) < 0 OR p_hours_table(i) > 24) THEN
3536: PA_UTILS.Add_Message ('PA', 'PA_SCH_HOURS_OUT_OF_RANGE');
3537: RAISE FND_API.G_EXC_ERROR;
3538: END IF;
3539: END LOOP;
3540: