30: PG_DEBUG VARCHAR2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
31: lb_sub lb_sub_rec;
32:
33: FUNCTION validate_transmission( p_new_transmission IN VARCHAR2,
34: p_transmission_name IN ar_transmissions.transmission_name%TYPE)
35: RETURN NUMBER IS
36: l_transmission_exists VARCHAR2(1);
37: l_transmission_id ar_transmissions.transmission_id%TYPE;
38: l_requested_lockbox_id ar_transmissions.requested_lockbox_id%TYPE;
33: FUNCTION validate_transmission( p_new_transmission IN VARCHAR2,
34: p_transmission_name IN ar_transmissions.transmission_name%TYPE)
35: RETURN NUMBER IS
36: l_transmission_exists VARCHAR2(1);
37: l_transmission_id ar_transmissions.transmission_id%TYPE;
38: l_requested_lockbox_id ar_transmissions.requested_lockbox_id%TYPE;
39: l_requested_format_id ar_transmissions.requested_trans_format_id%TYPE;
40: l_status ar_transmissions.status%TYPE;
41: l_orig_request_id NUMBER;
34: p_transmission_name IN ar_transmissions.transmission_name%TYPE)
35: RETURN NUMBER IS
36: l_transmission_exists VARCHAR2(1);
37: l_transmission_id ar_transmissions.transmission_id%TYPE;
38: l_requested_lockbox_id ar_transmissions.requested_lockbox_id%TYPE;
39: l_requested_format_id ar_transmissions.requested_trans_format_id%TYPE;
40: l_status ar_transmissions.status%TYPE;
41: l_orig_request_id NUMBER;
42: l_msg_text fnd_new_messages.message_text%type;
35: RETURN NUMBER IS
36: l_transmission_exists VARCHAR2(1);
37: l_transmission_id ar_transmissions.transmission_id%TYPE;
38: l_requested_lockbox_id ar_transmissions.requested_lockbox_id%TYPE;
39: l_requested_format_id ar_transmissions.requested_trans_format_id%TYPE;
40: l_status ar_transmissions.status%TYPE;
41: l_orig_request_id NUMBER;
42: l_msg_text fnd_new_messages.message_text%type;
43: BEGIN
36: l_transmission_exists VARCHAR2(1);
37: l_transmission_id ar_transmissions.transmission_id%TYPE;
38: l_requested_lockbox_id ar_transmissions.requested_lockbox_id%TYPE;
39: l_requested_format_id ar_transmissions.requested_trans_format_id%TYPE;
40: l_status ar_transmissions.status%TYPE;
41: l_orig_request_id NUMBER;
42: l_msg_text fnd_new_messages.message_text%type;
43: BEGIN
44: IF PG_DEBUG IN ('Y', 'C') THEN
62: l_requested_lockbox_id,
63: l_requested_format_id,
64: l_orig_request_id,
65: l_status
66: FROM ar_transmissions
67: WHERE transmission_name = p_transmission_name;
68: EXCEPTION
69: WHEN NO_DATA_FOUND THEN
70: l_transmission_exists := 'N';
472: P_ERRBUF OUT NOCOPY VARCHAR2,
473: P_RETCODE OUT NOCOPY NUMBER,
474: p_org_id IN NUMBER,
475: p_new_transmission IN VARCHAR2,
476: p_transmission_name IN ar_transmissions.transmission_name%TYPE,
477: p_submit_import IN VARCHAR2 DEFAULT 'N',
478: p_transmission_format IN ar_transmission_formats.transmission_format_id%TYPE,
479: p_data_file IN VARCHAR2,
480: p_control_file IN VARCHAR2,