| IBM MAINFRAME HELP & SUPPORT FORUMS
Technical Forums for IBM Mainframe Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7&11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
|
| View previous topic :: View next topic |
| Author |
Message |
jawadshaik
Joined: 27 Sep 2005
Posts: 16
|
| Posted: Fri Nov 25, 2005 10:56 am Post subject: regarding the passing of dynamic array between programs |
|
|
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 |
|
Suryanarayana.tadala
Joined: 03 Nov 2005
Posts: 43
Location: St.Louis
|
| Posted: Mon Nov 28, 2005 9:03 pm Post subject: Re: regarding the passing of dynamic array between programs |
|
|
| There will not be any difference |
|
| Back to top |
|
| |
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM
|
