How do you pass data from a Natural Program to an External
Subroutine? Can it share the LDA of Program as in Internal
Subroutine.
- 4 Answers
- 12355 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / vinodh kumar
Parameters can be passed with the PERFORM statement from
the invoking object to the
external subroutine. These parameters must be defined
either in the DEFINE DATA PARAMETER
statement of the subroutine, or in a parameter data area
used by the subroutine.
An external subroutine can access the global data area used
by the invoking object.
In addition, an external subroutine can have its own local
data area, in which the fields that are to be used
only within the subroutine are defined.
However, an external subroutine cannot have its own global
data area.
| Is This Answer Correct ? | 9 Yes | 0 No |
Answer / rajesh
Can you share an example for passing the Values thru
Parameter for calling a External Subroutine.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / nilesh
Parameters can be passed with the PERFORM statement from
the invoking object to the external subroutine.
Example :
Perform ABCD 'para1' 'para2' 'para3'
OR
Perform ABCD 'EFGH'
Where ABCD is subroutine and PARA1 to PARA3 are parameters.
EFGH id the PDA which is define in subroutine.All the
parameters are in EFGH PDA.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / hazrasu
CALLNAT 'ABCDEF' BEIC-PDA
where ABCDEF is the external subroutine and BEIC-PDA is the
group variable for the PDA that is defined in the main
program and by which the main program will get the data
from the external subroutine.
| Is This Answer Correct ? | 3 Yes | 11 No |
How do you pass data from a Natural Program to an External Subroutine? Can it share the LDA of Program as in Internal Subroutine.
How to receive data passed through jcl parm parameter in a natural program?
how many work file we can code in jcl?
difference between escape(top or bottom) and escape immediate(top or bottom?
how to move cursor to a particular field when position is not known?
Explain difference between read work file 1 and read work file once? Why we are using work file once?
What happens when you issue a escape routine in a program? Will there be any compilation /run time erro?
Is it possible to code GOTO statement in NATURAL? if yes please provide the syntax of the same
How do you receive data passed through JCL parm parameter in a Natural program ? How Data definition is defined in the program?
What is cobol coding sheet?
Explain difference between escape(top or bottom) and escape immediate(top or bottom?
why do we use file-aid for seqential files?
COBOL 
