¡Esta es una revisión vieja del documento!

identification division.
program-id. teacher.
environment division.
configuration section.
data division.
working-storage section.
procedure division.
begin section.
begin-it.
     display " Hello from main!".
     display "  Calling subroutine1!".
     perform subroutine1.
     display "               Back from subroutine1!".
     display "  Calling subroutine2!".
     perform subroutine2.
     display "               Back from subroutine2!".
     display "  That's all, folks!".
     stop run.
subroutine1 section.
sub1.
     display "               Hello from subroutine1!".
subroutine2 section.
sub2.
     display "               Hello from subroutine2!".