DBA Data[Home] [Help]

APPS.XDP_PROC_CTL dependencies on XDP_ADAPTER

Line 1759: l_ApplChannelName := XDP_ADAPTER_CORE_PIPE.ConstructChannelName

1755: l_PromptValue := 'IGNORE';
1756: end IF;
1757:
1758:
1759: l_ApplChannelName := XDP_ADAPTER_CORE_PIPE.ConstructChannelName
1760: (p_ChannelType => 'APPL',
1761: p_ChannelName => ChannelName);
1762:
1763: l_ReturnChannelName := XDP_ADAPTER_CORE_PIPE.GetReturnChannelName

Line 1763: l_ReturnChannelName := XDP_ADAPTER_CORE_PIPE.GetReturnChannelName

1759: l_ApplChannelName := XDP_ADAPTER_CORE_PIPE.ConstructChannelName
1760: (p_ChannelType => 'APPL',
1761: p_ChannelName => ChannelName);
1762:
1763: l_ReturnChannelName := XDP_ADAPTER_CORE_PIPE.GetReturnChannelName
1764: (p_ChannelName => l_ApplChannelName);
1765:
1766: begin
1767: DBMS_LOB.createtemporary(l_TempLob, TRUE);

Line 1768: xdp_adapter.pv_AdapterExitCode := null;

1764: (p_ChannelName => l_ApplChannelName);
1765:
1766: begin
1767: DBMS_LOB.createtemporary(l_TempLob, TRUE);
1768: xdp_adapter.pv_AdapterExitCode := null;
1769:
1770: -- dbms_output.put_line('Sending: ' || substr(l_ActualStr, 1, 200));
1771: -- dbms_output.put_line('Prompt: ' || substr(l_PromptValue, 1, 200));
1772:

Line 1773: XDP_ADAPTER_CORE.SendApplicationMessage(p_ChannelName => l_ApplChannelName,

1769:
1770: -- dbms_output.put_line('Sending: ' || substr(l_ActualStr, 1, 200));
1771: -- dbms_output.put_line('Prompt: ' || substr(l_PromptValue, 1, 200));
1772:
1773: XDP_ADAPTER_CORE.SendApplicationMessage(p_ChannelName => l_ApplChannelName,
1774: p_Command => l_ActualStr,
1775: p_Response => l_PromptValue);
1776:
1777: -- dbms_output.put_line('Waiting for response...');

Line 1779: XDP_ADAPTER_CORE.WaitForMessage(p_ChannelName => l_ReturnChannelName,

1775: p_Response => l_PromptValue);
1776:
1777: -- dbms_output.put_line('Waiting for response...');
1778: -- dbms_output.put_line('Timeout: ' || to_char(pv_MesgTimeout));
1779: XDP_ADAPTER_CORE.WaitForMessage(p_ChannelName => l_ReturnChannelName,
1780: p_Timeout => pv_MesgTimeout + 5,
1781: p_ResponseMessage => l_RespXML);
1782:
1783: l_Status := XDP_ADAPTER_CORE_XML.DecodeMessage(p_WhattoDecode => 'STATUS',

Line 1783: l_Status := XDP_ADAPTER_CORE_XML.DecodeMessage(p_WhattoDecode => 'STATUS',

1779: XDP_ADAPTER_CORE.WaitForMessage(p_ChannelName => l_ReturnChannelName,
1780: p_Timeout => pv_MesgTimeout + 5,
1781: p_ResponseMessage => l_RespXML);
1782:
1783: l_Status := XDP_ADAPTER_CORE_XML.DecodeMessage(p_WhattoDecode => 'STATUS',
1784: p_XMLMessage => l_RespXML);
1785:
1786: -- dbms_output.put_line('Status: ' || l_Status);
1787:

Line 1789: XDP_ADAPTER_CORE.SendAck(p_ChannelName => l_ApplChannelName);

1785:
1786: -- dbms_output.put_line('Status: ' || l_Status);
1787:
1788: -- dbms_output.put_line('Sending ACK');
1789: XDP_ADAPTER_CORE.SendAck(p_ChannelName => l_ApplChannelName);
1790:
1791: -- dbms_output.put_line('After Sending ACK');
1792: xdp_adapter.pv_AdapterExitCode := XDP_ADAPTER_CORE_XML.DecodeMessage
1793: (p_WhattoDecode => 'EXIT_CODE',

Line 1792: xdp_adapter.pv_AdapterExitCode := XDP_ADAPTER_CORE_XML.DecodeMessage

1788: -- dbms_output.put_line('Sending ACK');
1789: XDP_ADAPTER_CORE.SendAck(p_ChannelName => l_ApplChannelName);
1790:
1791: -- dbms_output.put_line('After Sending ACK');
1792: xdp_adapter.pv_AdapterExitCode := XDP_ADAPTER_CORE_XML.DecodeMessage
1793: (p_WhattoDecode => 'EXIT_CODE',
1794: p_XMLMessage => l_RespXML);
1795:
1796: -- dbms_output.put_line('Exit Code: ' || xdp_adapter.pv_AdapterExitCode);

Line 1796: -- dbms_output.put_line('Exit Code: ' || xdp_adapter.pv_AdapterExitCode);

1792: xdp_adapter.pv_AdapterExitCode := XDP_ADAPTER_CORE_XML.DecodeMessage
1793: (p_WhattoDecode => 'EXIT_CODE',
1794: p_XMLMessage => l_RespXML);
1795:
1796: -- dbms_output.put_line('Exit Code: ' || xdp_adapter.pv_AdapterExitCode);
1797: if (l_Status = 'SUCCESS') then
1798:
1799: l_MoreFlag := XDP_ADAPTER_CORE_XML.DecodeMessage(
1800: p_WhattoDecode => 'MORE_FLAG',

Line 1799: l_MoreFlag := XDP_ADAPTER_CORE_XML.DecodeMessage(

1795:
1796: -- dbms_output.put_line('Exit Code: ' || xdp_adapter.pv_AdapterExitCode);
1797: if (l_Status = 'SUCCESS') then
1798:
1799: l_MoreFlag := XDP_ADAPTER_CORE_XML.DecodeMessage(
1800: p_WhattoDecode => 'MORE_FLAG',
1801: p_XMLMessage => l_RespXML);
1802:
1803: -- dbms_output.put_line('More Flag : ' || l_MoreFlag);

Line 1804: Response := XDP_ADAPTER_CORE_XML.DecodeMessage(p_WhattoDecode => 'DATA',

1800: p_WhattoDecode => 'MORE_FLAG',
1801: p_XMLMessage => l_RespXML);
1802:
1803: -- dbms_output.put_line('More Flag : ' || l_MoreFlag);
1804: Response := XDP_ADAPTER_CORE_XML.DecodeMessage(p_WhattoDecode => 'DATA',
1805: p_XMLMessage => l_RespXML);
1806:
1807: if Response is not null then
1808: -- dbms_output.put_line('After Reponse' || length(Response));

Line 1817: XDP_ADAPTER_CORE.WaitForMessage(

1813: while (l_MoreFlag is not null and l_MoreFlag = 'Y' ) loop
1814:
1815: -- dbms_output.put_line('Waiting for message(LOOP)');
1816: -- dbms_output.put_line('Timeout: ' || to_char(pv_MesgTimeout));
1817: XDP_ADAPTER_CORE.WaitForMessage(
1818: p_ChannelName => l_ReturnChannelName,
1819: p_Timeout => pv_MesgTimeout + 5,
1820: p_ResponseMessage => l_RespXML);
1821:

Line 1822: l_Status := XDP_ADAPTER_CORE_XML.DecodeMessage(

1818: p_ChannelName => l_ReturnChannelName,
1819: p_Timeout => pv_MesgTimeout + 5,
1820: p_ResponseMessage => l_RespXML);
1821:
1822: l_Status := XDP_ADAPTER_CORE_XML.DecodeMessage(
1823: p_WhattoDecode => 'STATUS',
1824: p_XMLMessage => l_RespXML);
1825: -- dbms_output.put_line('Status: (LOOP) ' || l_Status);
1826:

Line 1828: XDP_ADAPTER_CORE.SendAck(p_ChannelName => l_ApplChannelName);

1824: p_XMLMessage => l_RespXML);
1825: -- dbms_output.put_line('Status: (LOOP) ' || l_Status);
1826:
1827: -- dbms_output.put_line('Sending ACK (LOOP)');
1828: XDP_ADAPTER_CORE.SendAck(p_ChannelName => l_ApplChannelName);
1829: -- dbms_output.put_line('After Sending ACK (LOOP)');
1830:
1831: xdp_adapter.pv_AdapterExitCode := XDP_ADAPTER_CORE_XML.DecodeMessage
1832: (p_WhattoDecode => 'EXIT_CODE',

Line 1831: xdp_adapter.pv_AdapterExitCode := XDP_ADAPTER_CORE_XML.DecodeMessage

1827: -- dbms_output.put_line('Sending ACK (LOOP)');
1828: XDP_ADAPTER_CORE.SendAck(p_ChannelName => l_ApplChannelName);
1829: -- dbms_output.put_line('After Sending ACK (LOOP)');
1830:
1831: xdp_adapter.pv_AdapterExitCode := XDP_ADAPTER_CORE_XML.DecodeMessage
1832: (p_WhattoDecode => 'EXIT_CODE',
1833: p_XMLMessage => l_RespXML);
1834:
1835: -- dbms_output.put_line('Exit Code:(LOOP) ' || xdp_adapter.pv_AdapterExitCode);

Line 1835: -- dbms_output.put_line('Exit Code:(LOOP) ' || xdp_adapter.pv_AdapterExitCode);

1831: xdp_adapter.pv_AdapterExitCode := XDP_ADAPTER_CORE_XML.DecodeMessage
1832: (p_WhattoDecode => 'EXIT_CODE',
1833: p_XMLMessage => l_RespXML);
1834:
1835: -- dbms_output.put_line('Exit Code:(LOOP) ' || xdp_adapter.pv_AdapterExitCode);
1836: if (l_Status = 'SUCCESS' ) then
1837:
1838: l_MoreFlag := XDP_ADAPTER_CORE_XML.DecodeMessage(
1839: p_WhattoDecode => 'MORE_FLAG',

Line 1838: l_MoreFlag := XDP_ADAPTER_CORE_XML.DecodeMessage(

1834:
1835: -- dbms_output.put_line('Exit Code:(LOOP) ' || xdp_adapter.pv_AdapterExitCode);
1836: if (l_Status = 'SUCCESS' ) then
1837:
1838: l_MoreFlag := XDP_ADAPTER_CORE_XML.DecodeMessage(
1839: p_WhattoDecode => 'MORE_FLAG',
1840: p_XMLMessage => l_RespXML);
1841:
1842: -- dbms_output.put_line('More Flag: (LOOP) ' || l_MoreFlag);

Line 1843: l_TempResponse := XDP_ADAPTER_CORE_XML.DecodeMessage(

1839: p_WhattoDecode => 'MORE_FLAG',
1840: p_XMLMessage => l_RespXML);
1841:
1842: -- dbms_output.put_line('More Flag: (LOOP) ' || l_MoreFlag);
1843: l_TempResponse := XDP_ADAPTER_CORE_XML.DecodeMessage(
1844: p_WhattoDecode => 'DATA',
1845: p_XMLMessage => l_RespXML);
1846:
1847: if l_TempResponse is not null then

Line 1862: ErrStr := XDP_ADAPTER_CORE_XML.DecodeMessage(

1858: l_TempResponse, 1, 32766 - length(Response) );
1859: end if;
1860:
1861: else
1862: ErrStr := XDP_ADAPTER_CORE_XML.DecodeMessage(
1863: p_WhattoDecode => 'DATA',
1864: p_XMLMessage => l_RespXML);
1865: exit;
1866: end if;

Line 1870: ErrStr := XDP_ADAPTER_CORE_XML.DecodeMessage(

1866: end if;
1867: end loop;
1868:
1869: else
1870: ErrStr := XDP_ADAPTER_CORE_XML.DecodeMessage(
1871: p_WhattoDecode => 'DATA',
1872: p_XMLMessage => l_RespXML);
1873: end if;
1874: exception

Line 1898: XDP_ADAPTER_CORE.SendSync(p_ChannelName => l_ApplChannelName,

1894:
1895: if (l_Status <> 'SESSION_LOST') then
1896:
1897: -- dbms_output.put_line('Sending Sync..');
1898: XDP_ADAPTER_CORE.SendSync(p_ChannelName => l_ApplChannelName,
1899: p_CleanupPipe => 'N');
1900: -- dbms_output.put_line('After Sending Sync..');
1901:
1902: END IF;

Line 1921: (xdp_adapter.pv_AdapterFailure,NULL, 'XDP_PROC_CTL.SEND', 'RESP',

1917: if l_Status = 'SUCCESS' then
1918: null;
1919: elsif (l_Status = 'FAILURE') then
1920: x_Progress := HandleMessageErrors
1921: (xdp_adapter.pv_AdapterFailure,NULL, 'XDP_PROC_CTL.SEND', 'RESP',
1922: l_ReturnChannelName, pv_MesgTimeout, l_LogFlag,
1923: l_ActualStr, l_LogCmd, Response, EncryptFlag, ErrStr);
1924: RAISE e_NeFailureException;
1925:

Line 1928: (xdp_adapter.pv_AdapterTimeout,NULL, 'XDP_PROC_CTL.SEND', 'RESP',

1924: RAISE e_NeFailureException;
1925:
1926: elsif (l_Status = 'TIMEOUT') then
1927: x_Progress := HandleMessageErrors
1928: (xdp_adapter.pv_AdapterTimeout,NULL, 'XDP_PROC_CTL.SEND', 'RESP',
1929: l_ReturnChannelName, pv_MesgTimeout, l_LogFlag,
1930: l_ActualStr, l_LogCmd, Response, EncryptFlag, ErrStr);
1931: RAISE e_NeTimedOutException;
1932:

Line 1935: xdp_adapter.pv_AdapterWarning, NULL, 'XDP_PROC_CTL.SEND', 'RESP',

1931: RAISE e_NeTimedOutException;
1932:
1933: elsif (l_Status = 'WARNING') then
1934: x_Progress := HandleMessageErrors(
1935: xdp_adapter.pv_AdapterWarning, NULL, 'XDP_PROC_CTL.SEND', 'RESP',
1936: l_ReturnChannelName, pv_MesgTimeout, l_LogFlag,
1937: l_ActualStr, l_LogCmd, Response, EncryptFlag, ErrStr);
1938: RAISE e_NeWarningException;
1939:

Line 1942: xdp_adapter.pv_AdapterSessionLost,NULL,'XDP_PROC_CTL.SEND','RESP',

1938: RAISE e_NeWarningException;
1939:
1940: elsif (l_Status = 'SESSION_LOST') then
1941: x_Progress := HandleMessageErrors(
1942: xdp_adapter.pv_AdapterSessionLost,NULL,'XDP_PROC_CTL.SEND','RESP',
1943: l_ReturnChannelName, pv_AckTimeout, l_LogFlag,
1944: l_ActualStr, l_LogCmd, Response, EncryptFlag, ErrStr);
1945: RAISE e_NeSessionLostException;
1946:

Line 2035: ErrCode := xdp_adapter.pv_AdapterFailure;

2031:
2032: RAISE_APPLICATION_ERROR(-20107, x_progress);
2033:
2034: when e_NeFailureException then
2035: ErrCode := xdp_adapter.pv_AdapterFailure;
2036: ErrStr := x_progress;
2037: sdp_internal_err_code := ErrCode;
2038: sdp_internal_err_str := ErrStr;
2039: DBMS_LOB.freetemporary(l_TempLob);

Line 2044: ErrCode := xdp_adapter.pv_AdapterWarning;

2040:
2041: RAISE_APPLICATION_ERROR(-20300, x_progress);
2042:
2043: when e_NeWarningException then
2044: ErrCode := xdp_adapter.pv_AdapterWarning;
2045: ErrStr := x_progress;
2046: sdp_internal_err_code := ErrCode;
2047: sdp_internal_err_str := ErrStr;
2048: DBMS_LOB.freetemporary(l_TempLob);

Line 2053: ErrCode := xdp_adapter.pv_AdapterSessionLost;

2049:
2050: -- RAISE_APPLICATION_ERROR(-20500, x_progress);
2051:
2052: when e_NeSessionLostException then
2053: ErrCode := xdp_adapter.pv_AdapterSessionLost;
2054: ErrStr := x_progress;
2055: sdp_internal_err_code := ErrCode;
2056: sdp_internal_err_str := ErrStr;
2057: DBMS_LOB.freetemporary(l_TempLob);

Line 2060: --update XDP_ADAPTER_REG

2056: sdp_internal_err_str := ErrStr;
2057: DBMS_LOB.freetemporary(l_TempLob);
2058:
2059: --Changed sacsharm 2/19/02 Use update API that is autonomous
2060: --update XDP_ADAPTER_REG
2061: --set adapter_status = 'SESSION_LOST',
2062: -- LAST_UPDATE_DATE = sysdate, LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
2063: -- LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
2064: --where channel_name = ChannelName;

Line 2065: XDP_ADAPTER_CORE_DB.Update_Adapter_Status (

2061: --set adapter_status = 'SESSION_LOST',
2062: -- LAST_UPDATE_DATE = sysdate, LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
2063: -- LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
2064: --where channel_name = ChannelName;
2065: XDP_ADAPTER_CORE_DB.Update_Adapter_Status (
2066: p_ChannelName => ChannelName,
2067: p_Status => XDP_ADAPTER.pv_statusSessionLost);
2068:
2069:

Line 2067: p_Status => XDP_ADAPTER.pv_statusSessionLost);

2063: -- LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
2064: --where channel_name = ChannelName;
2065: XDP_ADAPTER_CORE_DB.Update_Adapter_Status (
2066: p_ChannelName => ChannelName,
2067: p_Status => XDP_ADAPTER.pv_statusSessionLost);
2068:
2069:
2070: when e_NeTimedOutException then
2071: ErrCode := xdp_adapter.pv_AdapterTimeout;

Line 2071: ErrCode := xdp_adapter.pv_AdapterTimeout;

2067: p_Status => XDP_ADAPTER.pv_statusSessionLost);
2068:
2069:
2070: when e_NeTimedOutException then
2071: ErrCode := xdp_adapter.pv_AdapterTimeout;
2072: ErrStr := x_progress;
2073: sdp_internal_err_code := ErrCode;
2074: sdp_internal_err_str := ErrStr;
2075: DBMS_LOB.freetemporary(l_TempLob);

Line 2510: xdp_adapter.pv_AdapterExitCode := null;

2506: begin
2507: ErrCode := 0;
2508: ErrStr := null;
2509:
2510: xdp_adapter.pv_AdapterExitCode := null;
2511:
2512: l_ApplChannelName := XDP_ADAPTER_CORE_PIPE.ConstructChannelName
2513: (p_ChannelType => 'APPL',
2514: p_ChannelName => ChannelName);

Line 2512: l_ApplChannelName := XDP_ADAPTER_CORE_PIPE.ConstructChannelName

2508: ErrStr := null;
2509:
2510: xdp_adapter.pv_AdapterExitCode := null;
2511:
2512: l_ApplChannelName := XDP_ADAPTER_CORE_PIPE.ConstructChannelName
2513: (p_ChannelType => 'APPL',
2514: p_ChannelName => ChannelName);
2515:
2516: l_ReturnChannelName := XDP_ADAPTER_CORE_PIPE.GetReturnChannelName

Line 2516: l_ReturnChannelName := XDP_ADAPTER_CORE_PIPE.GetReturnChannelName

2512: l_ApplChannelName := XDP_ADAPTER_CORE_PIPE.ConstructChannelName
2513: (p_ChannelType => 'APPL',
2514: p_ChannelName => ChannelName);
2515:
2516: l_ReturnChannelName := XDP_ADAPTER_CORE_PIPE.GetReturnChannelName
2517: (p_ChannelName => l_ApplChannelName);
2518:
2519: XDP_ADAPTER_CORE_PIPE.CleanupPipe(p_ChannelName => l_ApplChannelName,
2520: p_CleanReturn => 'Y');

Line 2519: XDP_ADAPTER_CORE_PIPE.CleanupPipe(p_ChannelName => l_ApplChannelName,

2515:
2516: l_ReturnChannelName := XDP_ADAPTER_CORE_PIPE.GetReturnChannelName
2517: (p_ChannelName => l_ApplChannelName);
2518:
2519: XDP_ADAPTER_CORE_PIPE.CleanupPipe(p_ChannelName => l_ApplChannelName,
2520: p_CleanReturn => 'Y');
2521:
2522: XDP_ADAPTER_CORE.SendSync(p_ChannelName => l_ApplChannelName);
2523:

Line 2522: XDP_ADAPTER_CORE.SendSync(p_ChannelName => l_ApplChannelName);

2518:
2519: XDP_ADAPTER_CORE_PIPE.CleanupPipe(p_ChannelName => l_ApplChannelName,
2520: p_CleanReturn => 'Y');
2521:
2522: XDP_ADAPTER_CORE.SendSync(p_ChannelName => l_ApplChannelName);
2523:
2524: XDP_ENGINE.GET_FE_CONFIGINFO ( FEName,
2525: pv_FeID,
2526: pv_FeTypeID,