Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Code Block
Compile subroutine Cell_Conv(Conv, Ans, Branch, ReturnData)

 IfIf Conv EQ "OCONV" then
   If Branch[1, 1] EQ "D" then
       If Num(Ans) then
           // The data is already in internal format, so just OConv it
           ReturnData = OConv(Ans, Branch)
       end else
           // The data is an some date format, so IConv it first, then OConv it
           ReturnData = OConv(IConv(Ans, "D"), Branch)
       end
   end else
       // For all non-date types, IConv first (just in case), then OConv it
       ReturnData = OConv(IConv(Ans, Branch), Branch)
   end
end else
   // IConv as usual
   ReturnData = IConv(Ans, Branch)
end

Return

...