36 lines
448 B
Plaintext
36 lines
448 B
Plaintext
//
|
|
// $Id$
|
|
//
|
|
|
|
// Calling different PRG functions
|
|
|
|
function Main()
|
|
|
|
SecondOne()
|
|
|
|
DO Fourth WITH "from Fourth() function" // Testing the old fashion DO ...
|
|
|
|
QOut( "Ok, back to Main()" )
|
|
|
|
return nil
|
|
|
|
function SecondOne()
|
|
|
|
QOut( "Ok, this is from Second() function call" )
|
|
|
|
Third()
|
|
|
|
return nil
|
|
|
|
function Third()
|
|
|
|
QOut( "Ok, this is from Third() function call" )
|
|
|
|
return nil
|
|
|
|
function Fourth( cText )
|
|
|
|
QOut( cText )
|
|
|
|
return nil
|