我已提取年月日:
   CALL  "DT_DATE"
      IN0    :=#TEMP9
      RET_VAL:=DB1.DBW2
但怎样单独提取28号呢?

读时钟，判断。