compile Subroutine PSTEST(void)


Val1 = Oconv(Oconv(1.0E+20, "MS21"), "MS21")
Val2 = Oconv(1.5E20, "MS21")
Val3 = Iconv("2.0E+20", "MS")

debug

return

* call Set_MFS("WO_MAST_SCHED", "SQL_MFS*LSL2", 1)
* If Get_Status(ErrorCodes) then
*    Debug
* end

Dim Rec(53)
A = Rec(1)
B = Rec(UnassignedVar$)

return
