{
{   The purpose of this request is to write a message module to a legible file
{ in the form of the commands that could be used to recreate the module.
{
{       CLP$EXTRACT_MESSAGE_MODULE (FILE_ID, MODULE_NAME, MESSAGE_MODULE,
{         STATUS)
{
{ FILE_ID: (input) This parameter specifies the identifier of the legible file
{       to which the source form of the message module is to be written.
{
{ MODULE_NAME: (input) This parameter specifies the name of the  module  being
{       extracted.
{
{ MESSAGE_MODULE:  (input)  This parameter specifies the data representing the
{       message module.
{
{ STATUS: (output) This parameter specifies the request status.
{
