home *** CD-ROM | disk | FTP | other *** search
/ PC User 2002 April / Disc 2 / PCUSER0402D2.iso / software / utils / files / wincron.exe / data1.cab / Sample_Scripts / subroutine_02.tg < prev    next >
Encoding:
Text File  |  2001-10-20  |  587 b   |  28 lines
  1. ## subroutine_02.tg
  2. # This script demonstrates the subroutine.
  3. # The special return clause 'break' is used to interrupt program flow.
  4. # See Also: subroutine_01.tg
  5.  
  6. {
  7.     -start 
  8.     -action -print here we are in the main job
  9.     -action -call my_procedure_A
  10.     -action -print back here in the main job
  11.     -action -inc 0 0 0 3
  12. }
  13.  
  14. {
  15.     -name my_procedure_A
  16.     -action -print Now in my_procedure_A
  17.     -action -call my_procedure_B
  18.     -action -print back here in my_procedure_A
  19.     -action -return
  20. }
  21.  
  22.  
  23. {
  24.     -name my_procedure_B
  25.     -action -print Now in my_procedure_B
  26.     -action -return break
  27. }
  28.