Basic INPUT help

[AngryNapkin]

I am trying to create a basic input. Here is what I got:

EXPORT TEST()
BEGIN
LOCAL A;
INPUT({{A,[1]}},"TEST"," INTEGER INPUT:")
END;

I want to limit the inputs to integers only, and not floats, however when I try to enter anything into the box, I get "Invalid Input".

What am I not understanding here?