MUMPS地址验证

Question

我正在尝试我要参加的课程的前提问题。我正在对两段代码进行修订。我已经完成了其中一项，但仍坚持执行。我正在尝试阅读地址栏的缩写。在这种情况下为FL33606。我能够读取地址。但是我收到退出命令“ Q：完成”的未定义错误。有人可以协助我找出问题所在吗？

N prompt,val, done
    S prompt="Enter State and Zip (StateZip): "
    F  W !,prompt R val Q:val=""  D  Q:done  
    . I val'="?2A5N" W !,"Invalid entry" Q
    . S done=1
    I val="" q
    W !,"Valid Entry: ",val
    Q

Answer 1

我有两个错误

• done变量应在第一次读取之前定义
• 模式不应该用引号引起来，其中?是运算符，而不是=

  S prompt="Enter State and Zip (StateZip): "
  S done=0
  F  W !,prompt R val Q:val=""  D  Q:done  
  . I val'?2A5N W !,"Invalid entry" Q
  . S done=1
  I val="" q
  W !,"Valid Entry: ",val
  Q

为什么使用短命令和点？