Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
regarding the passing of dynamic array between programs

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & ASSEMBLER
Author Message
jawadshaik
Warnings : 1

New User


Joined: 27 Sep 2005
Posts: 16

PostPosted: Fri Nov 25, 2005 10:56 am    Post subject: regarding the passing of dynamic array between programs
Reply with quote

Hi every one

I would like to clarify a doubt


(SUBSCRIPTRANGE):
CONT: PROC OPTIONS(MAIN);
DCL POINT ENTRY;
DCL I FIXED BIN(15) INIT(4);
DCL ARR(*) CHAR(1) CONTROLLED;
ALLOCATE ARR(4);
DO J = 1 TO I;
ARR(J) = 'J';
IF I = 2 THEN ARR(I) = 'L';
END;
CALL POINT(ARR,J);
END CONT;


(SUBSCRIPTRANGE):
POINT: PROC(ARR,I);
DCL ARR(*) CHAR(1);
DCL I FIXED BIN(15);
PUT SKIP LIST(I);
DO J = 1 TO I-1;
PUT SKIP LIST(ARR(J));
END;
END POINT;


Here I tried to pass an array which is dynamically allocated in cont to point

My doubt is that is there any difference between passing an array directly and passing pointer of an array (ignoring that the array in point cant be dynamic if pointer passed)
Hoping goood answer to clear my doubt
Back to top
View user's profile Send private message
References
Suryanarayana.tadala

New User


Joined: 03 Nov 2005
Posts: 43
Location: St.Louis

PostPosted: Mon Nov 28, 2005 9:03 pm    Post subject: Re: regarding the passing of dynamic array between programs
Reply with quote

There will not be any difference
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & ASSEMBLER All times are GMT + 6 Hours
Page 1 of 1