RosettaCodeData/Task/Call-an-object-method/COBOL/call-an-object-method-1.cobol

12 lines
432 B
Text
Raw Permalink Normal View History

2023-09-01 09:35:06 -07:00
*> INVOKE statements.
INVOKE my-class "some-method" *> Factory object
USING BY REFERENCE some-parameter
RETURNING foo
INVOKE my-instance "another-method" *> Instance object
USING BY REFERENCE some-parameter
RETURNING foo
2023-07-01 11:58:00 -04:00
2023-09-01 09:35:06 -07:00
*> Inline method invocation.
MOVE my-class::"some-method"(some-parameter) TO foo *> Factory object
MOVE my-instance::"another-method"(some-parameter) TO foo *> Instance object