FOR0402S

VS FORTRAN Version 2 Programming Guide for CMS and MVS

Explanation
 The subprogram program-name2 had
a dummy argument of character type with an assumed length, that is,
for which the current length needs to be provided by the calling routine.
However, the argument list provided by program unit program-name1 wasn't
in the internally-generated form produced by the Fortran compiler
when there are character arguments. This could have occurred because:
 A dummy argument in program-name2 was inadvertently
coded as a character dummy argument with an assumed length, as in
this example:  CHARACTER*(*)  INPUT_ARG

program-name1 did not provide one or more of
the character arguments that were required by program-name2.
program-name1 was compiled by the VS FORTRAN Version 1 or
the VS FORTRAN Version 2 compiler
with the the LANGLVL(66) compiler option.
program-name1 was compiled by the VS FORTRAN Version 1 compiler
at a level before Release 3.
program-name1 was compiled by the FORTRAN IV H Extended or
the FORTRAN IV G1 compiler.
program-name1 was an assembler language program,
and the arguments were not provided in the form required when there
are character arguments.

System action
 The condition is signaled. If the condition is
unhandled, the application is terminated.
 Qualifying Data:
None
 Permissible Resume Actions: None

Programmer response
 Be sure that the argument list provided
by program-name1 contains the number of arguments
required by program-name2 and that they are of
the correct type.
 If a character argument is coded as a character
constant, be sure to enclose the value in quotes or apostrophes.
 If program-name1 is
written in Fortran, compile it with the VS FORTRAN Version 2 compiler,
and do not specify the LANGLVL(66) compiler option.
 If program-name1 is
written in assembler language, use the Fortran conventions for argument
lists with character arguments. These conventions are described in
the topic “Passing Character Arguments Using the Standard Linkage
Convention” in Appendix B of VS FORTRAN Version 2 Programming Guide for CMS
and MVS.
 If program-name1 is
neither a Fortran nor an assembler language program, the required
argument list cannot be generated. In this case, change program-name2 so
the character data in the dummy argument list is of fixed, rather
than of assumed, length.

Symbolic Feedback Code
 FOR0402