164: where criteria_set_id = x_criteria_set_id);
165:
166: If (x_ledger_id = 1) Then
167: FND_MESSAGE.Set_name('SQLGL','GL_AR_LEDGER_CRITERIA_SET_ASSG');
168: APP_EXCEPTION.RAISE_EXCEPTION;
169: Return(False);
170: END IF;
171: Return (True);
172: EXCEPTION
169: Return(False);
170: END IF;
171: Return (True);
172: EXCEPTION
173: WHEN app_exceptions.application_exception THEN
174: RAISE;
175:
176: When NO_DATA_FOUND THEN
177: NULL;