View Raw SPL

#include 

/* notifies user the attempted Workhseet is a newer version than the executable */
_notifyws(name, ver, msg)
{
        local str0, str1, str2, str3, s1, s2;

        if (argc < 3)
        {
                if (argc < 2)
                {
                        if (argc < 1) name = _ntfystr_wks1;
                        ver = -1;
                }
                msg = _ntfystr_wks2;
        }

        if (ver > 100)
        {
                str0 = sprintf(_ntfystr_wks3, castint(ver/100));
                str1 = name;
                s1 = sprintf(_ntfystr_wks4, castint(ver/100));
                s2 = sprintf(_ntfystr_wks5, version(1)); 
                str2 = s1 + " " + s2;
                _mf("notifyws.pan");
        }
        else
        {
                message("Invalid Worksheet");
        }
}