DBA Data[Home] [Help]

APPS.IBY_PAYMENT_ADAPTER_PUB dependencies on UTL_TCP

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

4374: l_host VARCHAR2(4000);
4375: l_port VARCHAR2(80) := NULL;
4376: l_post_info VARCHAR2(2000);
4377:
4378: l_conn UTL_TCP.CONNECTION; -- TCP/IP connection to the Web server
4379: l_ret_val PLS_INTEGER;
4380: l_curr_index NUMBER;
4381: l_index NUMBER := 0;
4382: l_temp_buff VARCHAR2(2000) := NULL;

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

4495: FND_LOG.LEVEL_STATEMENT,
4496: G_DEBUG_MODULE || '.OraCCBatchCapture');
4497:
4498: -- open connection
4499: l_conn := utl_tcp.open_connection(remote_host => l_host,
4500: remote_port => l_port);
4501:
4502: iby_debug_pub.add('opened socket to EC Servlet',
4503: FND_LOG.LEVEL_STATEMENT,

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

4502: iby_debug_pub.add('opened socket to EC Servlet',
4503: FND_LOG.LEVEL_STATEMENT,
4504: G_DEBUG_MODULE || '.OraCCBatchCapture');
4505:
4506: l_ret_val := utl_tcp.write_line(l_conn, l_post_info);
4507: l_ret_val := utl_tcp.write_line(l_conn,'Accept: text/plain');
4508: l_ret_val := utl_tcp.write_line(l_conn,'Content-type: text/plain');
4509:
4510: -- calcuate the content length

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

4503: FND_LOG.LEVEL_STATEMENT,
4504: G_DEBUG_MODULE || '.OraCCBatchCapture');
4505:
4506: l_ret_val := utl_tcp.write_line(l_conn, l_post_info);
4507: l_ret_val := utl_tcp.write_line(l_conn,'Accept: text/plain');
4508: l_ret_val := utl_tcp.write_line(l_conn,'Content-type: text/plain');
4509:
4510: -- calcuate the content length
4511: l_content_len := 0;

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

4504: G_DEBUG_MODULE || '.OraCCBatchCapture');
4505:
4506: l_ret_val := utl_tcp.write_line(l_conn, l_post_info);
4507: l_ret_val := utl_tcp.write_line(l_conn,'Accept: text/plain');
4508: l_ret_val := utl_tcp.write_line(l_conn,'Content-type: text/plain');
4509:
4510: -- calcuate the content length
4511: l_content_len := 0;
4512: l_temp_buff := 'OapfBatchType=oraPmtCapture';

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

4545: iby_debug_pub.add('l_content_len = ' || l_content_len,
4546: FND_LOG.LEVEL_STATEMENT,
4547: G_DEBUG_MODULE || '.OraCCBatchCapture');
4548:
4549: l_ret_val := utl_tcp.write_line(l_conn,'Content-length: '||l_content_len);
4550: l_ret_val := utl_tcp.write_line(l_conn);
4551: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchType=oraPmtCapture');
4552: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchSize='||p_capturetrxn_rec_tbl.count);
4553:

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

4546: FND_LOG.LEVEL_STATEMENT,
4547: G_DEBUG_MODULE || '.OraCCBatchCapture');
4548:
4549: l_ret_val := utl_tcp.write_line(l_conn,'Content-length: '||l_content_len);
4550: l_ret_val := utl_tcp.write_line(l_conn);
4551: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchType=oraPmtCapture');
4552: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchSize='||p_capturetrxn_rec_tbl.count);
4553:
4554: -- Transmits a text line to a service on an open connection.

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

4547: G_DEBUG_MODULE || '.OraCCBatchCapture');
4548:
4549: l_ret_val := utl_tcp.write_line(l_conn,'Content-length: '||l_content_len);
4550: l_ret_val := utl_tcp.write_line(l_conn);
4551: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchType=oraPmtCapture');
4552: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchSize='||p_capturetrxn_rec_tbl.count);
4553:
4554: -- Transmits a text line to a service on an open connection.
4555: -- The newline character sequence will be appended to the message before it is transmitted.

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

4548:
4549: l_ret_val := utl_tcp.write_line(l_conn,'Content-length: '||l_content_len);
4550: l_ret_val := utl_tcp.write_line(l_conn);
4551: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchType=oraPmtCapture');
4552: l_ret_val := utl_tcp.write_line(l_conn,'OapfBatchSize='||p_capturetrxn_rec_tbl.count);
4553:
4554: -- Transmits a text line to a service on an open connection.
4555: -- The newline character sequence will be appended to the message before it is transmitted.
4556: l_curr_index := p_capturetrxn_rec_tbl.first;

Line 4561: 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));

4557: l_index := 0;
4558:
4559: WHILE (l_curr_index <= p_capturetrxn_rec_tbl.last) LOOP
4560:
4561: 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));
4562: l_ret_val := utl_tcp.write_line(l_conn,'OapfECAppId-'||l_index||'='||p_ecapp_id);
4563: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);
4564: --save the trxn_id for return value.
4565: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;

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

4558:
4559: WHILE (l_curr_index <= p_capturetrxn_rec_tbl.last) LOOP
4560:
4561: 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));
4562: l_ret_val := utl_tcp.write_line(l_conn,'OapfECAppId-'||l_index||'='||p_ecapp_id);
4563: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);
4564: --save the trxn_id for return value.
4565: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;
4566: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);

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

4559: WHILE (l_curr_index <= p_capturetrxn_rec_tbl.last) LOOP
4560:
4561: 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));
4562: l_ret_val := utl_tcp.write_line(l_conn,'OapfECAppId-'||l_index||'='||p_ecapp_id);
4563: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);
4564: --save the trxn_id for return value.
4565: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;
4566: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);
4567: l_ret_val := utl_tcp.write_line(l_conn,'OapfMode-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).PmtMode);

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

4562: l_ret_val := utl_tcp.write_line(l_conn,'OapfECAppId-'||l_index||'='||p_ecapp_id);
4563: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);
4564: --save the trxn_id for return value.
4565: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;
4566: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);
4567: l_ret_val := utl_tcp.write_line(l_conn,'OapfMode-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).PmtMode);
4568: IF (p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG IS NOT NULL) THEN
4569: l_ret_val := utl_tcp.write_line(l_conn,'OapfNlsLang-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG);
4570: END IF;

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

4563: l_ret_val := utl_tcp.write_line(l_conn,'OapfTransactionId-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id);
4564: --save the trxn_id for return value.
4565: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;
4566: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);
4567: l_ret_val := utl_tcp.write_line(l_conn,'OapfMode-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).PmtMode);
4568: IF (p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG IS NOT NULL) THEN
4569: l_ret_val := utl_tcp.write_line(l_conn,'OapfNlsLang-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG);
4570: END IF;
4571: IF (p_capturetrxn_rec_tbl(l_curr_index).PmtMode = 'OFFLINE') THEN

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

4565: x_capresp_rec_tbl(l_index).Trxn_ID := p_capturetrxn_rec_tbl(l_curr_index).Trxn_Id;
4566: l_ret_val := utl_tcp.write_line(l_conn,'OapfCurr-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).Currency);
4567: l_ret_val := utl_tcp.write_line(l_conn,'OapfMode-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).PmtMode);
4568: IF (p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG IS NOT NULL) THEN
4569: l_ret_val := utl_tcp.write_line(l_conn,'OapfNlsLang-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG);
4570: END IF;
4571: IF (p_capturetrxn_rec_tbl(l_curr_index).PmtMode = 'OFFLINE') THEN
4572: 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'));
4573: END IF;

Line 4572: 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'));

4568: IF (p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG IS NOT NULL) THEN
4569: l_ret_val := utl_tcp.write_line(l_conn,'OapfNlsLang-'||l_index||'='||p_capturetrxn_rec_tbl(l_curr_index).NLS_LANG);
4570: END IF;
4571: IF (p_capturetrxn_rec_tbl(l_curr_index).PmtMode = 'OFFLINE') THEN
4572: 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'));
4573: END IF;
4574: l_index := l_index + 1;
4575: l_curr_index := p_capturetrxn_rec_tbl.next(l_curr_index);
4576:

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

4575: l_curr_index := p_capturetrxn_rec_tbl.next(l_curr_index);
4576:
4577: END LOOP;
4578:
4579: l_ret_val := utl_tcp.write_line(l_conn);
4580: l_http_body := false;
4581:
4582: BEGIN LOOP
4583: -- read result

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

4580: l_http_body := false;
4581:
4582: BEGIN LOOP
4583: -- read result
4584: l_html := substr(utl_tcp.get_line(l_conn,TRUE),1,3000);
4585: l_position := instr(l_html,'');
4586:
4587: --dbms_output.put_line('l_html body = ' || substr(l_html,1,200));
4588:

Line 4697: WHEN utl_tcp.end_of_input THEN

4693: END IF;
4694: END IF;
4695: END LOOP;
4696: EXCEPTION
4697: WHEN utl_tcp.end_of_input THEN
4698: NULL; -- end of input
4699: END;
4700: utl_tcp.close_connection(l_conn);
4701:

Line 4700: utl_tcp.close_connection(l_conn);

4696: EXCEPTION
4697: WHEN utl_tcp.end_of_input THEN
4698: NULL; -- end of input
4699: END;
4700: utl_tcp.close_connection(l_conn);
4701:
4702: -- Setting API return status to 'U' if response status is not 0.
4703: IF (NOT trxn_status_success(l_batch_status)) THEN
4704: