DBA Data[Home] [Help]

APPS.IBY_PAYMENT_ADAPTER_PUB dependencies on UTL_TCP

Line 4699: l_conn UTL_TCP.CONNECTION; -- TCP/IP connection to the Web server

4695: l_host VARCHAR2(4000);
4696: l_port VARCHAR2(80) := NULL;
4697: l_post_info VARCHAR2(2000);
4698:
4699: l_conn UTL_TCP.CONNECTION; -- TCP/IP connection to the Web server
4700: l_ret_val PLS_INTEGER;
4701: l_curr_index NUMBER;
4702: l_index NUMBER := 0;
4703: l_temp_buff VARCHAR2(2000) := NULL;

Line 4820: l_conn := utl_tcp.open_connection(remote_host => l_host,

4816: FND_LOG.LEVEL_STATEMENT,
4817: G_DEBUG_MODULE || '.OraCCBatchCapture');
4818:
4819: -- open connection
4820: l_conn := utl_tcp.open_connection(remote_host => l_host,
4821: remote_port => l_port);
4822:
4823: iby_debug_pub.add('opened socket to EC Servlet',
4824: FND_LOG.LEVEL_STATEMENT,

Line 4827: l_ret_val := utl_tcp.write_line(l_conn, l_post_info);

4823: iby_debug_pub.add('opened socket to EC Servlet',
4824: FND_LOG.LEVEL_STATEMENT,
4825: G_DEBUG_MODULE || '.OraCCBatchCapture');
4826:
4827: l_ret_val := utl_tcp.write_line(l_conn, l_post_info);
4828: l_ret_val := utl_tcp.write_line(l_conn,'Accept: text/plain');
4829: l_ret_val := utl_tcp.write_line(l_conn,'Content-type: text/plain');
4830:
4831: -- calcuate the content length

Line 4828: l_ret_val := utl_tcp.write_line(l_conn,'Accept: text/plain');

4824: FND_LOG.LEVEL_STATEMENT,
4825: G_DEBUG_MODULE || '.OraCCBatchCapture');
4826:
4827: l_ret_val := utl_tcp.write_line(l_conn, l_post_info);
4828: l_ret_val := utl_tcp.write_line(l_conn,'Accept: text/plain');
4829: l_ret_val := utl_tcp.write_line(l_conn,'Content-type: text/plain');
4830:
4831: -- calcuate the content length
4832: l_content_len := 0;

Line 4829: l_ret_val := utl_tcp.write_line(l_conn,'Content-type: text/plain');

4825: G_DEBUG_MODULE || '.OraCCBatchCapture');
4826:
4827: l_ret_val := utl_tcp.write_line(l_conn, l_post_info);
4828: l_ret_val := utl_tcp.write_line(l_conn,'Accept: text/plain');
4829: l_ret_val := utl_tcp.write_line(l_conn,'Content-type: text/plain');
4830:
4831: -- calcuate the content length
4832: l_content_len := 0;
4833: l_temp_buff := 'OapfBatchType=oraPmtCapture';

Line 4870: l_ret_val := utl_tcp.write_line(l_conn,'Content-length: '||l_content_len);

4866: iby_debug_pub.add('l_content_len = ' || l_content_len,
4867: FND_LOG.LEVEL_STATEMENT,
4868: G_DEBUG_MODULE || '.OraCCBatchCapture');
4869:
4870: l_ret_val := utl_tcp.write_line(l_conn,'Content-length: '||l_content_len);
4871: l_ret_val := utl_tcp.write_line(l_conn);
4872: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchType=oraPmtCapture');
4873: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchSize='||p_capturetrxn_rec_tbl.count);
4874:

Line 4871: l_ret_val := utl_tcp.write_line(l_conn);

4867: FND_LOG.LEVEL_STATEMENT,
4868: G_DEBUG_MODULE || '.OraCCBatchCapture');
4869:
4870: l_ret_val := utl_tcp.write_line(l_conn,'Content-length: '||l_content_len);
4871: l_ret_val := utl_tcp.write_line(l_conn);
4872: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchType=oraPmtCapture');
4873: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchSize='||p_capturetrxn_rec_tbl.count);
4874:
4875: -- Transmits a text line to a service on an open connection.

Line 4872: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchType=oraPmtCapture');

4868: G_DEBUG_MODULE || '.OraCCBatchCapture');
4869:
4870: l_ret_val := utl_tcp.write_line(l_conn,'Content-length: '||l_content_len);
4871: l_ret_val := utl_tcp.write_line(l_conn);
4872: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchType=oraPmtCapture');
4873: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchSize='||p_capturetrxn_rec_tbl.count);
4874:
4875: -- Transmits a text line to a service on an open connection.
4876: -- The newline character sequence will be appended to the message before it is transmitted.

Line 4873: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchSize='||p_capturetrxn_rec_tbl.count);

4869:
4870: l_ret_val := utl_tcp.write_line(l_conn,'Content-length: '||l_content_len);
4871: l_ret_val := utl_tcp.write_line(l_conn);
4872: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchType=oraPmtCapture');
4873: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchSize='||p_capturetrxn_rec_tbl.count);
4874:
4875: -- Transmits a text line to a service on an open connection.
4876: -- The newline character sequence will be appended to the message before it is transmitted.
4877: l_curr_index := p_capturetrxn_rec_tbl.first;

Line 4882: l_ret_val := utl_tcp.write_line(l_conn,'OapfPrice-'||l_index||'='||FND_NUMBER.NUMBER_TO_CANONICAL(p_capturetrxn_rec_tbl(l_curr_index).Price));

4878: l_index := 0;
4879:
4880: WHILE (l_curr_index <= p_capturetrxn_rec_tbl.last) LOOP
4881:
4882: l_ret_val := utl_tcp.write_line(l_conn,'OapfPrice-'||l_index||'='||FND_NUMBER.NUMBER_TO_CANONICAL(p_capturetrxn_rec_tbl(l_curr_index).Price));
4883: l_ret_val := utl_tcp.write_line(l_conn,'OapfECAppId-'||l_index||'='||p_ecapp_id);
4884: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);
4885: --save the trxn_id for return value.
4886: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;

Line 4883: l_ret_val := utl_tcp.write_line(l_conn,'OapfECAppId-'||l_index||'='||p_ecapp_id);

4879:
4880: WHILE (l_curr_index <= p_capturetrxn_rec_tbl.last) LOOP
4881:
4882: l_ret_val := utl_tcp.write_line(l_conn,'OapfPrice-'||l_index||'='||FND_NUMBER.NUMBER_TO_CANONICAL(p_capturetrxn_rec_tbl(l_curr_index).Price));
4883: l_ret_val := utl_tcp.write_line(l_conn,'OapfECAppId-'||l_index||'='||p_ecapp_id);
4884: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);
4885: --save the trxn_id for return value.
4886: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;
4887: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);

Line 4884: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);

4880: WHILE (l_curr_index <= p_capturetrxn_rec_tbl.last) LOOP
4881:
4882: l_ret_val := utl_tcp.write_line(l_conn,'OapfPrice-'||l_index||'='||FND_NUMBER.NUMBER_TO_CANONICAL(p_capturetrxn_rec_tbl(l_curr_index).Price));
4883: l_ret_val := utl_tcp.write_line(l_conn,'OapfECAppId-'||l_index||'='||p_ecapp_id);
4884: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);
4885: --save the trxn_id for return value.
4886: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;
4887: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);
4888: l_ret_val := utl_tcp.write_line(l_conn,'OapfMode-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).PmtMode);

Line 4887: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);

4883: l_ret_val := utl_tcp.write_line(l_conn,'OapfECAppId-'||l_index||'='||p_ecapp_id);
4884: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);
4885: --save the trxn_id for return value.
4886: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;
4887: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);
4888: l_ret_val := utl_tcp.write_line(l_conn,'OapfMode-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).PmtMode);
4889: IF (p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG IS NOT NULL) THEN
4890: l_ret_val := utl_tcp.write_line(l_conn,'OapfNlsLang-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG);
4891: END IF;

Line 4888: l_ret_val := utl_tcp.write_line(l_conn,'OapfMode-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).PmtMode);

4884: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);
4885: --save the trxn_id for return value.
4886: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;
4887: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);
4888: l_ret_val := utl_tcp.write_line(l_conn,'OapfMode-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).PmtMode);
4889: IF (p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG IS NOT NULL) THEN
4890: l_ret_val := utl_tcp.write_line(l_conn,'OapfNlsLang-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG);
4891: END IF;
4892: IF (p_capturetrxn_rec_tbl(l_curr_index).PmtMode = 'OFFLINE') THEN

Line 4890: l_ret_val := utl_tcp.write_line(l_conn,'OapfNlsLang-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG);

4886: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;
4887: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);
4888: l_ret_val := utl_tcp.write_line(l_conn,'OapfMode-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).PmtMode);
4889: IF (p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG IS NOT NULL) THEN
4890: l_ret_val := utl_tcp.write_line(l_conn,'OapfNlsLang-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG);
4891: END IF;
4892: IF (p_capturetrxn_rec_tbl(l_curr_index).PmtMode = 'OFFLINE') THEN
4893: l_ret_val := utl_tcp.write_line(l_conn,'OapfSchedDate-'||l_index||'='||to_char(p_capturetrxn_rec_tbl(l_curr_index).Settlement_Date, 'YYYY-MM-DD'));
4894: END IF;

Line 4893: l_ret_val := utl_tcp.write_line(l_conn,'OapfSchedDate-'||l_index||'='||to_char(p_capturetrxn_rec_tbl(l_curr_index).Settlement_Date, 'YYYY-MM-DD'));

4889: IF (p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG IS NOT NULL) THEN
4890: l_ret_val := utl_tcp.write_line(l_conn,'OapfNlsLang-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG);
4891: END IF;
4892: IF (p_capturetrxn_rec_tbl(l_curr_index).PmtMode = 'OFFLINE') THEN
4893: l_ret_val := utl_tcp.write_line(l_conn,'OapfSchedDate-'||l_index||'='||to_char(p_capturetrxn_rec_tbl(l_curr_index).Settlement_Date, 'YYYY-MM-DD'));
4894: END IF;
4895: l_index := l_index + 1;
4896: l_curr_index := p_capturetrxn_rec_tbl.next(l_curr_index);
4897:

Line 4900: l_ret_val := utl_tcp.write_line(l_conn);

4896: l_curr_index := p_capturetrxn_rec_tbl.next(l_curr_index);
4897:
4898: END LOOP;
4899:
4900: l_ret_val := utl_tcp.write_line(l_conn);
4901: l_http_body := false;
4902:
4903: BEGIN LOOP
4904: -- read result

Line 4905: l_html := substr(utl_tcp.get_line(l_conn,TRUE),1,3000);

4901: l_http_body := false;
4902:
4903: BEGIN LOOP
4904: -- read result
4905: l_html := substr(utl_tcp.get_line(l_conn,TRUE),1,3000);
4906: l_position := instr(l_html,'');
4907:
4908: --dbms_output.put_line('l_html body = ' || substr(l_html,1,200));
4909:

Line 5018: WHEN utl_tcp.end_of_input THEN

5014: END IF;
5015: END IF;
5016: END LOOP;
5017: EXCEPTION
5018: WHEN utl_tcp.end_of_input THEN
5019: NULL; -- end of input
5020: END;
5021: utl_tcp.close_connection(l_conn);
5022:

Line 5021: utl_tcp.close_connection(l_conn);

5017: EXCEPTION
5018: WHEN utl_tcp.end_of_input THEN
5019: NULL; -- end of input
5020: END;
5021: utl_tcp.close_connection(l_conn);
5022:
5023: -- Setting API return status to 'U' if response status is not 0.
5024: IF (NOT trxn_status_success(l_batch_status)) THEN
5025: