[Search for users] [Overall Top Noters] [List of all Conferences] [Download this site]

Conference iosg::all-in-1_v30

Title:*OLD* ALL-IN-1 (tm) Support Conference
Notice:Closed - See Note 4331.l to move to IOSG::ALL-IN-1
Moderator:IOSG::PYE
Created:Thu Jan 30 1992
Last Modified:Tue Jan 23 1996
Last Successful Update:Fri Jun 06 1997
Number of topics:4343
Total number of notes:18308

1023.0. "ALL-IN-1 V3.0 <---> Rally EXT LINK" by BRSISD::ROOSEN () Fri Jul 10 1992 13:56


		< Cross referenced in RALLY conference>


Hi,

I'm in big s**t. 2 years ago I introduced the OAMAILBOX in a rally application,
which send A1 mails to an employee. At this moment I'm creating a new rally 
application in which I've to simulate the functionalities of EBD, i.e. sending
mails to a list of employees depending on certain values.
I took over the external link of the older application which works fine in the
live-environments.When I compile tha ADL-procedure inwhere I call the external 
link I get following error message:

*******************************************************************************
                        ADL Error Report

 Error line number: 35

 Error line text:
                                                         CALL OAMAILBOX_EXT;
                                                                           ^

 Error text:
 An action was invoked with an incorrect number of arguments, as compared
 to the definition of that action.
 ADL compilation error 14493.

 Do you want to edit the ADL text? Y

********************************************************************************


The following is a extract of the ADL where the call is done:

********************************************************************************

IPR_MAIL := 'IPR_MAIL_1';
CALL_CMD('Next record');
ADRES_CLUS := APPROVE_FORM.APPR_LOCATION;
FULL_NAME := SUBSTR(APPROVE_FORM.APPR_FIRST_NAME,0)||' '||SUBSTR(.........
DEFINE_LOGICAL('ADDRESSEE',FULL_NAME,'LNM$JOB');
DEFINE_LOGICAL('ADRES_CLUS',ADRES_CLUS,'LNM$JOB');
DEFINE_LOGICAL('IPR_MAIL',IPR_MAIL,'LNM$JOB');
CALL OAMAILBOX_EXT;
APPROVE_FORM.STATUS := 'PENDING APPROVAL 2';


********************************************************************************



The external link is defined as following:

Attributes:  type = standard
             name of shareable image: WRITE_OAMAILBOX
             name of routine: WRITE_OAMAILBOX

Parameters: 1
            passing mechanism: REFERENCE
            R or W designation: READ/WRITE


********************************************************************************


The cluster I'm working on as the new ALL-IN-1 V3.0 installed.
My question is , what am I doing wrong? Has A1 V3.0 changed something to the
mailbox?

Urgent solution is wanted


Thanks


Patrick

T.RTitleUserPersonal
Name
DateLines