UPDATE: I figured out how to do this. The correct command is:
CloudDeploy[FormFunction["testn"->"Number",CloudPut[#testn,"test"]&]]
And gives...
In[84]:= CloudGet["test"] Out[84]= 556
