31:
32: select ASO_WFNOTIFICATION_S1.NEXTVAL into wf_itemkey_seq from dual;
33: wf_itemkey := 'ASO_USER_' || wf_itemkey_seq;
34:
35: wf_engine.CreateProcess ( itemtype => 'ASO_USER',
36: itemkey => wf_itemkey,
37: process => 'ASO_NOTIFY_USER' );
38:
39: wf_engine.SetItemUserKey ( itemtype => 'ASO_USER',
35: wf_engine.CreateProcess ( itemtype => 'ASO_USER',
36: itemkey => wf_itemkey,
37: process => 'ASO_NOTIFY_USER' );
38:
39: wf_engine.SetItemUserKey ( itemtype => 'ASO_USER',
40: itemkey => wf_itemkey,
41: userkey => 'ASO User Notification ' || wf_itemkey_seq );
42:
43: wf_engine.SetItemAttrText ( itemtype => 'ASO_USER',
39: wf_engine.SetItemUserKey ( itemtype => 'ASO_USER',
40: itemkey => wf_itemkey,
41: userkey => 'ASO User Notification ' || wf_itemkey_seq );
42:
43: wf_engine.SetItemAttrText ( itemtype => 'ASO_USER',
44: itemkey => wf_itemkey,
45: aname => 'ROLE_TO_NOTIFY',
46: avalue => p_user_name );
47:
44: itemkey => wf_itemkey,
45: aname => 'ROLE_TO_NOTIFY',
46: avalue => p_user_name );
47:
48: wf_engine.SetItemAttrText ( itemtype => 'ASO_USER',
49: itemkey => wf_itemkey,
50: aname => 'NOTIFICATION_SUBJECT',
51: avalue => p_subject );
52:
49: itemkey => wf_itemkey,
50: aname => 'NOTIFICATION_SUBJECT',
51: avalue => p_subject );
52:
53: wf_engine.SetItemAttrText ( itemtype => 'ASO_USER',
54: itemkey => wf_itemkey,
55: aname => 'NOTIFICATION_BODY',
56: avalue => p_body );
57:
54: itemkey => wf_itemkey,
55: aname => 'NOTIFICATION_BODY',
56: avalue => p_body );
57:
58: wf_engine.SetItemOwner ( itemtype => 'ASO_USER',
59: itemkey => wf_itemkey,
60: owner => p_user_name );
61:
62: wf_engine.StartProcess ( itemtype => 'ASO_USER',
58: wf_engine.SetItemOwner ( itemtype => 'ASO_USER',
59: itemkey => wf_itemkey,
60: owner => p_user_name );
61:
62: wf_engine.StartProcess ( itemtype => 'ASO_USER',
63: itemkey => wf_itemkey );
64:
65:
66: EXCEPTION
113: notification_preference => 'MAILTEXT',
114: email_address => p_email_list,
115: expiration_date => sysdate + 1 );
116:
117: wf_engine.CreateProcess ( itemtype => 'ASO_MAIL',
118: itemkey => wf_itemkey,
119: process => 'ASO_SEND_EMAIL' );
120:
121: wf_engine.SetItemUserKey ( itemtype => 'ASO_MAIL',
117: wf_engine.CreateProcess ( itemtype => 'ASO_MAIL',
118: itemkey => wf_itemkey,
119: process => 'ASO_SEND_EMAIL' );
120:
121: wf_engine.SetItemUserKey ( itemtype => 'ASO_MAIL',
122: itemkey => wf_itemkey,
123: userkey => 'ASO Email Notification' || wf_itemkey_seq );
124:
125: wf_engine.SetItemAttrText ( itemtype => 'ASO_MAIL',
121: wf_engine.SetItemUserKey ( itemtype => 'ASO_MAIL',
122: itemkey => wf_itemkey,
123: userkey => 'ASO Email Notification' || wf_itemkey_seq );
124:
125: wf_engine.SetItemAttrText ( itemtype => 'ASO_MAIL',
126: itemkey => wf_itemkey,
127: aname => 'ROLE_TO_NOTIFY',
128: avalue => role_name );
129:
126: itemkey => wf_itemkey,
127: aname => 'ROLE_TO_NOTIFY',
128: avalue => role_name );
129:
130: wf_engine.SetItemAttrText ( itemtype => 'ASO_MAIL',
131: itemkey => wf_itemkey,
132: aname => 'NOTIFICATION_SUBJECT',
133: avalue => p_subject );
134:
131: itemkey => wf_itemkey,
132: aname => 'NOTIFICATION_SUBJECT',
133: avalue => p_subject );
134:
135: wf_engine.SetItemAttrText ( itemtype => 'ASO_MAIL',
136: itemkey => wf_itemkey,
137: aname => 'NOTIFICATION_BODY',
138: avalue => p_body );
139:
136: itemkey => wf_itemkey,
137: aname => 'NOTIFICATION_BODY',
138: avalue => p_body );
139:
140: wf_engine.SetItemOwner ( itemtype => 'ASO_MAIL',
141: itemkey => wf_itemkey,
142: owner => role_name );
143:
144: wf_engine.StartProcess ( itemtype => 'ASO_MAIL',
140: wf_engine.SetItemOwner ( itemtype => 'ASO_MAIL',
141: itemkey => wf_itemkey,
142: owner => role_name );
143:
144: wf_engine.StartProcess ( itemtype => 'ASO_MAIL',
145: itemkey => wf_itemkey );
146:
147: EXCEPTION
148: