ローカル変数を全部グローバルにもっていって、
Procedure line3
end
Procedure line2
end
Procedure line1
end

Procedure foo
call line1
call line2
call line3
end
みたいな?