137: where del.cust_account_id = in_id;
138: l_party number;
139: BEGIN
140: IF PG_DEBUG < 10 THEN
141: iex_debug_pub.LogMessage ('IEXTTVWB:get_party_id');
142: END IF;
143: IF PG_DEBUG < 10 THEN
144: iex_debug_pub.LogMessage ('get_party_id: ' || 'IEXTTVWB:account_id='||p_account_id);
145: END IF;
140: IF PG_DEBUG < 10 THEN
141: iex_debug_pub.LogMessage ('IEXTTVWB:get_party_id');
142: END IF;
143: IF PG_DEBUG < 10 THEN
144: iex_debug_pub.LogMessage ('get_party_id: ' || 'IEXTTVWB:account_id='||p_account_id);
145: END IF;
146: open c_party(p_account_id);
147: fetch c_party into l_party;
148: if c_party%found then
146: open c_party(p_account_id);
147: fetch c_party into l_party;
148: if c_party%found then
149: IF PG_DEBUG < 10 THEN
150: iex_debug_pub.LogMessage ('get_party_id: ' || 'IEXTTVWB:party='||l_party);
151: END IF;
152: else
153: IF PG_DEBUG < 10 THEN
154: iex_debug_pub.LogMessage ('get_party_id: ' || 'IEXTTVWB:notfound');
150: iex_debug_pub.LogMessage ('get_party_id: ' || 'IEXTTVWB:party='||l_party);
151: END IF;
152: else
153: IF PG_DEBUG < 10 THEN
154: iex_debug_pub.LogMessage ('get_party_id: ' || 'IEXTTVWB:notfound');
155: END IF;
156: l_party := 0;
157: END if;
158: close c_party;