"unmatch control word" error message

[Bob Frazee]

I am getting an "unmatch control word" error message, when I attempt to execute the subroutine "InputPgm();" that is not part of my main file "WindChillPgm()". The subroutine has an input statement in it. Does anyone have a clue as to what this error message is?

Code:

DegF;Mph;wct;wcto;ft;

WindChillIntroDisplay();
InputPgm();
FrostBiteEqn();
WindChillEqn();
OutputPgm();

EXPORT WindChillPgm()
BEGIN
LOCAL K;

  REPEAT
    STARTVIEW(-1,1);
    WindChillIntroDisplay(DegF,Mph);
 
        REPEAT
          WAIT(1);
          GETKEY▶K;
        UNTIL K>−1;

        IF K==42 OR K==43 THEN
          InputPgm();
        END;
Additional lines of program code...

The subroutine is:

Code:

EXPORT InputPgm()
BEGIN
INPUT({DegF,Mph},"Input Values",{"DegF= :","Mph= :"},{"Air Temperature (-45 to 40 °F)","Wind Speed (3 to 60 Mph)"},{DegF,Mph});
//RETURN {DegF,Mph};
END;

Thanks
rcf