{
{   The purpose of this request is to move the source description and value to
{ the destination address as described by the destination description.
{
{       FDP$MOVE_COBOL_DATA (SOURCE, SOURCE_ADDRESS, DESTINATION,
{         DESTINATION_ADDRESS, STATUS)
{
{ SOURCE: (input)  This parameter describes the source item.  It must have been
{       created by FDP$MAKE_COBOL_DESCRIPTION.
{
{ SOURCE_ADDRESS: (input)  This parameter specifies the address of the first
{       (left-most, lowest-address) byte in the source field.  There are
{       SOURCE.SIZE bytes in the source field.
{
{ DESTINATION: (input)  This parameter describes how to put items in the
{       destination field.  It must have been created by
{       FDP$MAKE_COBOL_DESCRIPTION.
{
{ DESTINATION_ADDRESS:  (input/output) This parameter specifies the address of
{       the first byte for the destination field.  The user must have allocated
{       DESTINATION.SIZE bytes.  The address will not be changed, but the field
{       at the address will be set appropriately.
{
{ STATUS: (output) This parameter specifies the request status.
{       CONDITIONS:
{             fde$cobol_bad_overpunch_sign
{             fde$cobol_bad_separate_sign
{             fde$cobol_c_without_r
{             fde$cobol_destination_invalid
{             fde$cobol_d_without_b
{             fde$cobol_float_too_big
{             fde$cobol_free_form_not_dest
{             fde$cobol_illegal_char_entered
{             fde$cobol_nonblk_outside_paren
{             fde$cobol_no_cr_or_db_now
{             fde$cobol_no_plus_or_minus_now
{             fde$cobol_no_scientific
{             fde$cobol_source_invalid
{             fde$cobol_too_many_digits
{             fde$cobol_trailing_sign_nonblk
{             fde$cobol_two_points_entered
{             fde$cobol_two_signs_entered
{             fde$cobol_usage_size_too_big
{
