RE: Input Statement causing -6609 Error

If all you do is just populate variables with the input statement and do nothing with them like after field or after input then the "END INPUT" is not needed and will give compile errors.

-----Original Message-----
From: Steven Evans [mailto:[email protected]]
Sent: Thursday, April 14, 2005 4:33 PM
To: [email protected]
Subject: [fourjs-users] Input Statement causing -6609 Error

Okay, I'm at a complete loss.  I've been fighting this code for 2 days
and I'm about ready to throw this computer out the window (which isn't a
good thing because I work off a laptop...)

After ripping apart the code and compiling after every complete
statement is entered, I've managed to isolate the troublesome code down
to this:

FUNCTION inputCriteria()
     DEFINE cInputProgram LIKE crse_subj.course_cd,
            dInputEffDate LIKE crse_subj.effective_dt,
            iInputGroup LIKE crse_subj.group,
            cGroup CHAR(10),
            iCount SMALLINT

     INITIALIZE iInputGroup TO NULL
     DISPLAY " "

     INPUT cInputProgram,
           dInputEffDate,
           iInputGroup
     FROM FORMONLY.program,
          FORMONLY.effDate,
          FORMONLY.group
     END INPUT
     RETURN cInputProgram, dInputEffDate, iInputGroup
END FUNCTION
-----------------------------------------------------------------------------------------
If I try to compile the entire program, I get

FUNCTION inputCriteria()
     DEFINE cInputProgram LIKE crse_subj.course_cd,
            dInputEffDate LIKE crse_subj.effective_dt,
            iInputGroup LIKE crse_subj.group,
            cGroup CHAR(10),
            iCount SMALLINT

     INITIALIZE iInputGroup TO NULL
     DISPLAY " "

     INPUT cInputProgram,
           dInputEffDate,
           iInputGroup
     FROM FORMONLY.program,
          FORMONLY.effDate,
          FORMONLY.group
     END INPUT
| A grammatical error has been found at 'INPUT' expecting: FUNCTION.
| See error number -6609.
     RETURN cInputProgram, dInputEffDate, iInputGroup
END FUNCTION
-----------------------
but if I take out the input command, it compiles fine (forget about
running it, because this is the first function to get called for input
and that input statement needs A LOT more to it...)

Every message board I come across only seems to mention about FOR ...
END FOR; UPDATE.  So that's why the Display is in there because I
thought there might be NULL INPUT or something like that.


On a side note, I did have my entire program working at one time.  All
of a sudden it just decided to stop compiling correctly.  I do have a
similar program that is nearly identical (same screen layout, same
function calls, same logic), just different tables used and it compiles
fine, so I'm guessing it has to be code related...



CONFIDENTIALITY NOTICE:
This message is the property of Hastings Entertainment, Inc. It maybe legally privileged and/or confidential and is intended only for the use of the addressee's). No addressee should forward, print, copy, or otherwise reproduce this message in any manner that would allow it to be viewed by any individual not originally listed as a recipient. If the reader of this message is not the intended recipient, you are hereby notified that any unauthorized disclosure, dissemination, distribution, copying or the taking of any action in reliance on the information herein is strictly prohibited. If you have received this communication in error, please immediately notify the sender and delete this message. Any disclosure, copying, distribution or taking of action in reliance on the contents of this transmission by unintended recipients is strictly prohibited.