Kbase P8914: The getJMSptnInfo call in initializeObject of adm2/messaging.p function returns empty value.
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
10/03/2003 |
|
Status: Unverified
FACT(s) (Environment):
Dynamics 1.1A
Dynamics 2.0A
Windows 32 Intel
Windows NT 32 Intel/Windows 2000
SYMPTOM(s):
The JMS Service defined for the Dynamics session does not establish connection
The getJMSptnInfo call in initializeObject of adm2/messaging.p function returns empty value.
CAUSE:
The getJMSPartition and getJMSPtnInfo are being left for the backward compatibility and they do not return the valid data.
FIX:
In order to get the connection parameters for the adm2/messaging.p super procedure to be able to create the JMS session, edit the InitializeObject internal procedure and add:
DEFINE VARIABLE cServiceList AS CHARACTER NO-UNDO.
DEFINE VARIABLE cConnParam AS CHARACTER NO-UNDO.
cServiceList = DYNAMIC-FUNCTION('getservicelist', INPUT 'JMS')
cConnParam = DYNAMIC-FUNCTION('getConnectionParams', INPUT cServiceList).
and change the following statement:
ASSIGN
cAppServerComm = ENTRY(1, cPartitionInfo, CHR(3))
cBrokerURL = ENTRY(2, cPartitionInfo, CHR(3)).
into this:
ASSIGN
cAppServerComm = ENTRY(3, cConnParam, CHR(3))
cBrokerURL = ENTRY(1, cConnParam, CHR(3)).