W3AS00

The W3AS00 routine gets parm field from command-line.

USAGE:    CALL W3AS00(NCH_PARM, CPARM, IRET_PARM)

   Output argument list:      (INCLUDING WORK ARRAYS)
      NCH_PARM   NO. OF CHARACTERS IN THE PARM FIELD
      CPARM      C*(*)   CPARM -- THE DESTINATION FOR THE PARMFIELD
                         OBTAINED FROM THE COMMAND LINE;
                         USER SHOULD DEFINE THE CHARACTER STRING FOR
                         A SIZE .LE. 101-BYTES, WHICH WOULD BE
                         BIG ENOUGH FOR THE 100-CHAR IBM LIMIT PLUS
                         ONE EXTRA BYTE FOR MY NULL-TERMINATOR.

      IRET_PARM   RETURN CODE
                     0:  NORMAL RETURN
                    -1:  ABNORMAL EXIT.  THE USER HAS FAILED
                         TO DEFINE THE CPARM DESTINATION
                         AS A CHARACTER STRING.

                    +1:  WARNING:
                         THE GIVEN ARG IN THE COMMAND LINE WAS
                         TOO LONG TO FIT IN THE DESTINATION: CPARM,
                         SO I HAVE TRUNCATED IT.

                    +2:  WARNING:  NO ARGS AT ALL ON COMMAND LINE,
                         SO I COULD NOT FETCH THE PARM FIELD.

                    +3:  WARNING:  NO "PARM="-ARGUMENT EXISTS
                         AMONG THE ARGS ON THE COMMAND LINE,
                         SO I COULD NOT FETCH THE PARM FIELD.

   Output files:
      FT06F001           SOME CHECKOUT PRINTOUT

REMARKS:
        To emulate the ibm parm field, the user should key_in on the
        command line:

               PARM='IN BETWEEN THE SINGLE_QUOTES IS THE PARM FIELD'

         What is returned from w3as00() from the parm= arg is
         the parm field: which starts with the location beyond the
         equal_sign of the keyword "parm=", and includes everything
         which was within the bounds of the single-quote signs.
         But the quote signs themselves will disappear; and a null-
         terminator will be added.
         The starting "parm=" is a key word for the parms, and should
         not be used to start any other argument.

 


  
W3lib.tar
  
Library contains Fortran 90 decoder/encoder
   routines for GRIB edition 1. (Fortran90) 

   Date posted: 2/22/2007