41: for i in c_get_del(l_request_id)
42: LOOP
43: select iex_del_wf_s.nextval INTO l_seq from dual;
44: l_key := l_event_name ||'-'||i.delinquency_id || '-'||l_seq;
45: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
46: write_log(FND_LOG.LEVEL_STATEMENT,' EVENT KEY ' ||l_key );
47: write_log(FND_LOG.LEVEL_STATEMENT,'****************************************');
48: write_log(FND_LOG.LEVEL_STATEMENT,
49: ' STATUS =' ||i.status
42: LOOP
43: select iex_del_wf_s.nextval INTO l_seq from dual;
44: l_key := l_event_name ||'-'||i.delinquency_id || '-'||l_seq;
45: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
46: write_log(FND_LOG.LEVEL_STATEMENT,' EVENT KEY ' ||l_key );
47: write_log(FND_LOG.LEVEL_STATEMENT,'****************************************');
48: write_log(FND_LOG.LEVEL_STATEMENT,
49: ' STATUS =' ||i.status
50: ||' PARTY = ' ||i.party_cust_id
43: select iex_del_wf_s.nextval INTO l_seq from dual;
44: l_key := l_event_name ||'-'||i.delinquency_id || '-'||l_seq;
45: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
46: write_log(FND_LOG.LEVEL_STATEMENT,' EVENT KEY ' ||l_key );
47: write_log(FND_LOG.LEVEL_STATEMENT,'****************************************');
48: write_log(FND_LOG.LEVEL_STATEMENT,
49: ' STATUS =' ||i.status
50: ||' PARTY = ' ||i.party_cust_id
51: ||' ACCOUNT = ' ||i.cust_account_id
44: l_key := l_event_name ||'-'||i.delinquency_id || '-'||l_seq;
45: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
46: write_log(FND_LOG.LEVEL_STATEMENT,' EVENT KEY ' ||l_key );
47: write_log(FND_LOG.LEVEL_STATEMENT,'****************************************');
48: write_log(FND_LOG.LEVEL_STATEMENT,
49: ' STATUS =' ||i.status
50: ||' PARTY = ' ||i.party_cust_id
51: ||' ACCOUNT = ' ||i.cust_account_id
52: ||' BILL_TO =' ||i.customer_site_use_id
79: to_char(i.delinquency_id),
80: l_parameter_list);
81:
82:
83: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
84: write_log(FND_LOG.LEVEL_STATEMENT,
85: ' Before Launching Event ');
86: END IF;
87:
80: l_parameter_list);
81:
82:
83: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
84: write_log(FND_LOG.LEVEL_STATEMENT,
85: ' Before Launching Event ');
86: END IF;
87:
88: wf_event.raise(p_event_name => l_event_name
100: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '***********************************************');
101:
102: EXCEPTION
103: WHEN OTHERS THEN
104: write_log(FND_LOG.LEVEL_UNEXPECTED,
105: 'Raise Delinquency Event Concurrent program raised exception '
106: || sqlerrm);
107: close c_get_del;
108: END RAISE_EVENT;
119:
120: BEGIN
121: l_enabled := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'), 'N');
122: if (l_enabled = 'N') then
123: l_MsgLevel := FND_LOG.LEVEL_UNEXPECTED;
124: else
125: l_MsgLevel := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
126: end if;
127:
121: l_enabled := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'), 'N');
122: if (l_enabled = 'N') then
123: l_MsgLevel := FND_LOG.LEVEL_UNEXPECTED;
124: else
125: l_MsgLevel := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
126: end if;
127:
128:
129: END IEX_DEL_CREATE_EVT_PVT;