RunUnitCallObject Method

public Object CallObject(
	string program,
	params Object[] parameters
)

Public Function CallObject ( 
	program As String,
	ParamArray parameters As Object()
) As Object

public:
virtual Object^ CallObject(
	String^ program, 
	... array<Object^>^ parameters
) sealed

abstract CallObject : 
        program : string * 
        parameters : Object[] -> Object 
override CallObject : 
        program : string * 
        parameters : Object[] -> Object 

// Create a run unit for the called COBOL program
var myRunUnit = new MicroFocus.COBOL.RuntimeServices.RunUnit();
try
{
 // Call the COBOL method and implicitly instantiate it
  var resultString = myRunUnit.CallObject("ProgString");
  Console.WriteLine(resultString);
}
finally
{
  // Destroy the run unit
  myRunUnit.StopRun();
 }

  Dim myRunUnit = New RunUnit
' Create a run unit for the called COBOL program

Try
 ' Call the COBOL method and implicitly instantiate it
 Dim resultString = myRunUnit.CallObject("ProgString")
 Console.WriteLine(resultString)
Finally
 ' Destroy the run unit
  myRunUnit.StopRun()
End Try

No code example is currently available or this language may not be supported.

No code example is currently available or this language may not be supported.

program-id. ProgString.
working-storage section.
linkage section.
01 ret-string       string.
procedure division returning ret-string.
    set ret-string to "Hello from ProgString".
    goback.
end program ProgString.