Interested to Buy Any Domain ? << Click Here >> for more details...
Is it possible to declare a GDA for an external subroutine?
- 4 Answers
- 11904 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / jamil ahmad
YES. A GDA can be used in an external subroutine. Thats
where a GDA comes in real handy. I personally rather use a
subprogram but developers use subroutine and like it. You
dont have to pass any parameter but you must use the GDA.
Upon returning from the subroutine you can interrogate the
glbal fields for your edits. Here is an example of an
external subroutine (chopped off to fit here): (I didnt
write this but use it all the time, works perfect)
DEFINE DATA
GLOBAL USING DSLGLOB
LOCAL
1 #NAME (A15) INIT <' '>
1 REDEFINE #NAME
2 #ARRAY (A1/15)
1 #X (N2)
1 #LENGTH (N2)
1 #BLANK (A1) INIT <'N'>
END-DEFINE
***********************************************
DEFINE SUBROUTINE NAME-EDIT
***********************************************
ETC ETC
END-SUBROUTINE
| Is This Answer Correct ? | 3 Yes | 1 No |
Answer / dd
One can not declare/create GDA in an external subroutine,
instaed it can use the GDA that is present in main calling
program.
Subprograms even don't have access to GDA. As they only need
the parameter data area to communicate with the calling program.
If a module of type program(P1) is calling another module of
Program(P2) using Fetch return then P2(the called program
module) can't have GDA defined in it.
But with fetch both can have GDA variables.
| Is This Answer Correct ? | 4 Yes | 4 No |
Answer / ganesh.b.s
An external subroutine can access the global data area used
by the invoking object(Program, Subprogram)
Moreover, 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. Programs,
Subprograms and Subroutines Programming Guide
In addition, an external subroutine can have its 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 ? | 4 Yes | 6 No |
Answer / niki
No its not possible to declare gda for external subroutine,
because external routine contains only logic not the data
variables. the external subroutine will lookmlike this
define subroutine-1.
........
.......
end-subroutine.
there is no define data bolck as such
please correct me if i am wrong.
| Is This Answer Correct ? | 1 Yes | 17 No |
Can you explain control variable in online screens?
difference between read(1) and read work file once ?
Explain the difference between external subroutine and subprogram?
The natural file converted to PDF file if Yes then explain ?
Which is more efficient - the external subroutine or a copycode coded in to a NATURAL program? And Why?
Explain difference between escape(top or bottom) and escape immediate(top or bottom?
Explain adabas basic concepts. Like inverted list, address converter ,data storage?
What is a hyperdescriptor?
How to receive data passed through jcl parm parameter in a natural program?
What is the difference between escape(top or bottom) and escape immediate(top or bottom?
Would like to know if have an expecific command that returns a code or something about the execution of a CALLNAT. For example ... CALLNAT 'SUBPRG' [parameter] [parameter] ... [here comes a code or command that checks if the CALLNAT was successful]
What is a hyperdescriptor? How does it work?
COBOL 
