module extractTable
define verb extract
   routine cli_abort      ! abort if cli$dispatch is called
   parameter P1           label=FROM value(required, list)
   parameter P2           label=TO value(list)
   qualifier BEGIN_BLOCK  default nonnegatable value(default="{@+")
   qualifier END_BLOCK    default nonnegatable value(default="{@-")
   qualifier CHECK_DIFFERENCES placement=positional
   qualifier KEEP_PLACE	  placement=positional
   qualifier OUTPUT       value
   qualifier COMMENT      default value(default="}")
   qualifier LOG