DBA Data[Home] [Help]

APPS.WF_MAILER_PARAMETER dependencies on WF_MAILER_PARAMETER

Line 1: package body WF_MAILER_PARAMETER as

1: package body WF_MAILER_PARAMETER as
2: /* $Header: wfmlrpb.pls 120.10 2007/11/16 05:43:16 dgadhira ship $ */
3: --------------------------------------------------------------------------
4: /*
5: ** PRIVATE global variables

Line 26: from WF_MAILER_PARAMETERS

22: BEGIN
23: begin
24: select VALUE
25: into lValue
26: from WF_MAILER_PARAMETERS
27: where NAME = pName
28: and PARAMETER = pParam;
29: exception
30: when no_data_found then

Line 33: from WF_MAILER_PARAMETERS wp

29: exception
30: when no_data_found then
31: select VALUE
32: into lValue
33: from WF_MAILER_PARAMETERS wp
34: where NAME = DEFAULT_NAME
35: and parameter = pParam;
36: when others then raise;
37: end;

Line 41: wf_core.Context('Wf_Mailer_Parameters', 'GetValue', pName, pParam);

37: end;
38: return lValue;
39: EXCEPTION
40: when others then
41: wf_core.Context('Wf_Mailer_Parameters', 'GetValue', pName, pParam);
42: raise;
43: END GetValue;
44:
45: -- GetValue - To return a parameter value where the parameter

Line 137: wf_core.Context('Wf_Mailer_Parameters', 'GetValue', to_char(pNID),

133: END IF;
134: return lValue;
135: EXCEPTION
136: when others then
137: wf_core.Context('Wf_Mailer_Parameters', 'GetValue', to_char(pNID),
138: pName, pParam);
139: raise;
140: END GetValue;
141:

Line 152: FROM wf_mailer_parameters

148: pParams IN OUT NOCOPY wf_mailer_params_tbl_type)
149: IS
150: CURSOR c IS
151: SELECT name, parameter, value, required
152: FROM wf_mailer_parameters
153: WHERE name = pName
154: UNION
155: SELECT pName name, parameter, value, required
156: FROM wf_mailer_parameters

Line 156: FROM wf_mailer_parameters

152: FROM wf_mailer_parameters
153: WHERE name = pName
154: UNION
155: SELECT pName name, parameter, value, required
156: FROM wf_mailer_parameters
157: WHERE name = '-WF_DEFAULT-'
158: AND parameter NOT IN (SELECT parameter
159: FROM wf_mailer_parameters
160: WHERE name = pName);

Line 159: FROM wf_mailer_parameters

155: SELECT pName name, parameter, value, required
156: FROM wf_mailer_parameters
157: WHERE name = '-WF_DEFAULT-'
158: AND parameter NOT IN (SELECT parameter
159: FROM wf_mailer_parameters
160: WHERE name = pName);
161:
162: i PLS_INTEGER;
163:

Line 176: wf_core.Context('Wf_Mailer_Parameters', 'GetValues', pName);

172: END LOOP;
173:
174: EXCEPTION
175: when others then
176: wf_core.Context('Wf_Mailer_Parameters', 'GetValues', pName);
177: raise;
178: END GetValues;
179:
180: -- PRIVATE

Line 193: FROM wf_mailer_parameters

189: lexists := 0;
190: BEGIN
191: SELECT COUNT(*)
192: INTO lexists
193: FROM wf_mailer_parameters
194: WHERE name = pName
195: AND parameter = pParameter;
196: UPDATE wf_mailer_parameters
197: SET value = pValue,

Line 196: UPDATE wf_mailer_parameters

192: INTO lexists
193: FROM wf_mailer_parameters
194: WHERE name = pName
195: AND parameter = pParameter;
196: UPDATE wf_mailer_parameters
197: SET value = pValue,
198: required = pRequired,
199: cb = pCB,
200: allow_reload = pAllowReload

Line 208: INSERT INTO wf_mailer_parameters

204: WHEN NO_DATA_FOUND THEN
205: lexists := 0;
206: END;
207: IF lexists = 0 THEN
208: INSERT INTO wf_mailer_parameters
209: (name, parameter, value, required, cb, allow_reload)
210: VALUES (pName, pParameter, pValue, pRequired, pCB, pAllowReload);
211: END IF;
212: EXCEPTION

Line 227: UPDATE wf_mailer_parameters

223: pvalue IN VARCHAR2)
224: IS
225: BEGIN
226: if (pName is not null and pvalue is not null) then
227: UPDATE wf_mailer_parameters
228: SET value = pvalue
229: where name = pName
230: and parameter = pParam;
231: if SQL%notfound then

Line 233: wf_mailer_parameters

229: where name = pName
230: and parameter = pParam;
231: if SQL%notfound then
232: INSERT INTO
233: wf_mailer_parameters
234: (name, parameter, value, required, cb, allow_reload)
235: SELECT pName,
236: pParam,
237: pvalue,

Line 241: FROM wf_mailer_parameters wp

237: pvalue,
238: wp.required,
239: wp.cb,
240: wp.allow_reload
241: FROM wf_mailer_parameters wp
242: WHERE NAME = default_name
243: and parameter = pParam;
244: end if;
245: end if;

Line 247: DELETE wf_mailer_parameters

243: and parameter = pParam;
244: end if;
245: end if;
246: if pvalue is null then
247: DELETE wf_mailer_parameters
248: WHERE name = pName
249: AND parameter = pParam;
250: end if;
251: EXCEPTION

Line 253: wf_core.Context('Wf_Mailer_Parameters', 'PutValue', pName, pParam);

249: AND parameter = pParam;
250: end if;
251: EXCEPTION
252: when others then
253: wf_core.Context('Wf_Mailer_Parameters', 'PutValue', pName, pParam);
254: raise;
255: END PutValue;
256:
257:

Line 258: -- Validate - To use the call back within the wf_mailer_parameters

254: raise;
255: END PutValue;
256:
257:
258: -- Validate - To use the call back within the wf_mailer_parameters
259: -- in order to provide some validation on the parameter
260: -- IN
261: -- Parameter to be checked
262: -- value to check

Line 275: FROM wf_mailer_parameters

271: BEGIN
272: BEGIN
273: SELECT cb
274: INTO funName
275: FROM wf_mailer_parameters
276: WHERE name = default_name
277: AND parameter = pParam;
278: pResult := valid_param;
279: EXCEPTION

Line 299: wf_core.Context('Wf_Mailer_Parameters', 'Validate', pParam, pValue);

295: END IF;
296:
297: EXCEPTION
298: when others then
299: wf_core.Context('Wf_Mailer_Parameters', 'Validate', pParam, pValue);
300: raise;
301: END Validate;
302:
303:

Line 325: wf_core.Context('Wf_Mailer_Parameters', 'PutValue', pName, pParam);

321: END IF;
322: END IF;
323: EXCEPTION
324: when others then
325: wf_core.Context('Wf_Mailer_Parameters', 'PutValue', pName, pParam);
326: raise;
327: END PutValue;
328:
329: -- PutValues - Assign a PL/SQL table of parameters value to the Parameter

Line 347: wf_core.Context('Wf_Mailer_Parameters', 'PutValues', pName);

343: pParams(i).ERRMSG);
344: END LOOP;
345: EXCEPTION
346: when others then
347: wf_core.Context('Wf_Mailer_Parameters', 'PutValues', pName);
348: raise;
349: END PutValues;
350:
351: -- get_mailer_tags_c - Return the REF Cursor for the list of tags

Line 407: wf_core.Context('Wf_Mailer_Parameters', 'GetTAGs', pName);

403: end loop;
404:
405: EXCEPTION
406: when others then
407: wf_core.Context('Wf_Mailer_Parameters', 'GetTAGs', pName);
408: raise;
409: END GetTags;
410:
411:

Line 489: wf_core.Context('Wf_Mailer_Parameters', 'PutTAGs', pName,

485: end if;
486:
487: EXCEPTION
488: when others then
489: wf_core.Context('Wf_Mailer_Parameters', 'PutTAGs', pName,
490: to_char(ptag_id), paction, ppattern);
491: raise;
492: END PutTag;
493:

Line 664: wf_core.Context('Wf_Mailer_Parameters', 'GetValues', pName);

660: pParam39 := params(39).Parameter; pValue39 := params(39).Value;
661: pParam40 := params(40).Parameter; pValue40 := params(40).Value;
662: EXCEPTION
663: WHEN Others THEN
664: wf_core.Context('Wf_Mailer_Parameters', 'GetValues', pName);
665: raise;
666: END GetValues;
667:
668:

Line 805: wf_core.Context('Wf_Mailer_Parameters', 'PutValues', pName);

801: putValue(pName, pParam40, pValue40, pResult40);
802:
803: EXCEPTION
804: WHEN Others THEN
805: wf_core.Context('Wf_Mailer_Parameters', 'PutValues', pName);
806: raise;
807: END PutValues;
808:
809: -- ValidSTR

Line 826: FROM wf_mailer_parameters

822: BEGIN
823:
824: SELECT value, required
825: into l_default, l_required
826: FROM wf_mailer_parameters
827: WHERE name = default_name
828: AND parameter = pParam;
829: IF (pValue IS NULL or pValue = '') AND l_required = 'Y' THEN
830: wf_core.token('PARAMETER', pParam);

Line 842: wf_core.Context('Wf_Mailer_Parameters', 'ValidStr', pParam, pValue,

838: pResult := valid_param;
839: END IF;
840: EXCEPTION
841: WHEN Others THEN
842: wf_core.Context('Wf_Mailer_Parameters', 'ValidStr', pParam, pValue,
843: pResult);
844: raise;
845: END ValidSTR;
846:

Line 879: wf_core.Context('Wf_Mailer_Parameters', 'ValidINT', pParam, pValue,

875: END IF;
876:
877: EXCEPTION
878: WHEN Others THEN
879: wf_core.Context('Wf_Mailer_Parameters', 'ValidINT', pParam, pValue,
880: pResult);
881: raise;
882: END ValidINT;
883:

Line 906: wf_core.Context('Wf_Mailer_Parameters', 'ValidLOG', pParam, pValue,

902: pResult := valid_param;
903: END IF;
904: EXCEPTION
905: WHEN Others THEN
906: wf_core.Context('Wf_Mailer_Parameters', 'ValidLOG', pParam, pValue,
907: pResult);
908: raise;
909: END ValidLOG;
910:

Line 932: wf_core.Context('Wf_Mailer_Parameters', 'ValidPROTOCOL',

928: pResult := valid_param;
929: END IF;
930: EXCEPTION
931: WHEN Others THEN
932: wf_core.Context('Wf_Mailer_Parameters', 'ValidPROTOCOL',
933: pParam, pValue, pResult);
934: raise;
935: END ValidPROTOCOL;
936:

Line 967: wf_core.Context('Wf_Mailer_Parameters', 'ValidPROTOCOL',

963: pResult := valid_param;
964: END IF;
965: EXCEPTION
966: WHEN Others THEN
967: wf_core.Context('Wf_Mailer_Parameters', 'ValidPROTOCOL',
968: pParam, pValue, pResult);
969: raise;
970: END ValidSENDARG;
971:

Line 1042: wf_core.Context('Wf_Mailer_Parameters', 'GetValueForCorr',

1038: return l_value;
1039:
1040: EXCEPTION
1041: when others then
1042: wf_core.Context('Wf_Mailer_Parameters', 'GetValueForCorr',
1043: 'CorrId:'||l_corrid, 'Parameter:'||pName);
1044: raise;
1045: END GetValueForCorr;
1046:

Line 1087: wf_core.Context('Wf_Mailer_Parameters', 'GetValueForCorr',

1083:
1084:
1085: EXCEPTION
1086: when others then
1087: wf_core.Context('Wf_Mailer_Parameters', 'GetValueForCorr',
1088: 'pNid: '||pNid, 'CorrId:'||pCorrId,
1089: 'Parameter:'||pName);
1090: raise;
1091: END GetValueForCorr;

Line 1093: end WF_MAILER_PARAMETER;

1089: 'Parameter:'||pName);
1090: raise;
1091: END GetValueForCorr;
1092:
1093: end WF_MAILER_PARAMETER;