How do you pass data from a Natural Program to an External
Subroutine? Can it share the LDA of Program as in Internal
Subroutine.

Answer Posted / 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



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

How to find occurrence of mu and pe fields in a file?

488


Define cobol coding sheet?

568


Explain how are you going to remove duplicates from the file that is being read?

553


Explain difference between read work file 1 and read work file once? Why we are using work file once?

561


Can you explain control variable in online screens?

558






Explain the address converter?

572


Explain difference between read(1) and read work file once?

559


Explain control variable in online screens?

560


Explain the data storage?

557


Explain why do we use file-aid for seqential files?

584


Explain adabas basic concepts. Like inverted list, address converter ,data storage?

562


How converted the natural coding for adabas

2691


Explain how to move cursor to a particular field when position is not known?

540


Explain how to ftp the natural program to desktop? (From mainframe to pc), is it possible?

595


How to receive data passed through jcl parm parameter in a natural program? How data definition is defined in the program?

611