文档的移动，保存和修改

?

public class ROG_Document

{

    Object                  obj;

    FormDataSource          FDS;

 

    Common                  common;

 

    QueryRun                qr;

 

    Str                     parmStr;

    Int                     hwnd;

 

    ROG_DocumentTable       documentTable;

 

    HRMApplicantTable       applicantTable;

 

    userid                  userid;

 

    ROG_Document            _documentPack;

 

    ROG_DocumentHelper      documentHelper;

}

 

Object dialog()

{

    FormRun dialogForm;

    Args                            args   =   new Args("ROG_SelectUserid");

 

   ;

    args.caller(_documentPack);

    dialogForm = classfactory.formRunClass(args);

    dialogForm.init();

    dialogForm.run();

    dialogForm.wait();

    return dialogForm;

}

 

object FDS(FormDataSource _fds = FDS)

{

    ;

    FDS = _fds;

    return FDS;

}

 

str getOnlyFileName(Str     _str)

{

    str     _name;

    int     i;

    int     position;

    boolean flg;

    ;

    if(_str)

    {

        if (strfind(_str,"\\",1,strlen(_str)))

        {

            do

            {

 

                i = strfind(_str,"\\",position,strlen(_str));

                _str = substr(_str,i,strlen(_str) - i);

 

            } while(i);

 

            return substr(_str,1,strlen(_str) - strfind(_str,".",1,strlen(_str)) - 1);

        }

        else

            return "";

 

    }

    else

        return "";

}

 

object obj(object _obj = obj)

{

    ;

    obj = _obj;

    return obj;

}

 

Common parmCommon(Common    _common = common)

{

    ;

    common = _common;

    return common;

}

 

ROG_Document parmDocument(ROG_Document  _ROG_Document = _documentPack)

{

;

    _documentPack = _ROG_Document;

    return _documentPack;

}

 

int parmhwnd(int    _hwnd = hwnd)

{

;

    hwnd    = _hwnd;

    return hwnd;

 

}

 

Str parmstr(Str _parmStr = parmStr)

{

    ;

    parmStr = _parmStr;

    return parmStr;

}

 

userid parmUserid(userid      _userid)

{

    ;

 

    userid  = _userid;

    return userid;

 

}

 

void run()

{

;

    documentTable = ROG_DocumentTable::find(common.TableId,common.RecId);

    if(common.TableId == tablenum(HRMApplicantTable))

    {

        applicantTable = common;

        this.RunHRMApplicantTable();

    }

 

}

 

void RunHRMApplicantTable()

{

;

    if(parmStr == "save")

    {

        this.saveDocument();

    }

    else if(parmStr == "saveas" )

    {

        this.saveAsDocument();

    }

    else if(parmStr == "open")

    {

        ROG_Document::openDocument(documentTable.FilePath);

    }

    else if(parmStr == "companyOpen")

    {

        ROG_Document::openDocument(documentTable.FilePathROG);

    }

    else if(parmStr == "companySave")

    {

        this.saveCompanyDocument();

    }

}

 

void saveAsDocument()

{

    Filename    onlyFilename;

    Filename    curFileExtension;

    Filename    toFileName;

;

    documentHelper   = new ROG_DocumentHelper();

    documentHelper.parmDocumentHelper(documentHelper);

 

    if(documentHelper.prompt())

    {

        info(documentHelper.parmUserid());

 

        this.parmUserid(documentHelper.parmUserid());

        if(userid)

        {

            info(userid);

 

            [onlyFilename,curFileExtension]  = Docu::splitFilename(documentTable.FilePath);

 

            toFileName = documentTable.completeFilename(onlyFilename,curFileExtension,userid);

 

            winAPI::copyFile(documentTable.FilePath,toFileName);

            winAPI::deleteFile(documentTable.FilePath);

 

            ttsbegin;

            documentTable.selectForUpdate(true);

            documentTable.FilePath  = toFileName;

            //documentTable.createdBy =

            documentTable.update();

            ttscommit;

 

        }

        else

        {

            info("@ROG101");

        }

    }

 

}

 

void saveAsDocumentbackup()

{

 

    FormRun                         form;

    Args                            a   =   new Args("FOG_SelectUserid");

    Filename    onlyFilename;

    Filename    curFileExtension;

    Filename    toFileName;

    ;

    a.caller(_documentPack);

    form    =   ClassFactory.formRunClass(a);

    form.init();

    form.run();

    form.wait();

 

    if(userid)

    {

        info(userid);

 

        [onlyFilename,curFileExtension]  = Docu::splitFilename(documentTable.FilePath);

 

        toFileName = documentTable.completeFilename(onlyFilename,curFileExtension,userid);

 

        winAPI::copyFile(documentTable.FilePath,toFileName);

        winAPI::deleteFile(documentTable.FilePath);

 

        ttsbegin;

        documentTable.selectForUpdate(true);

        documentTable.FilePath = toFileName;

        documentTable.update();

        ttscommit;

    }

 

}

 

void saveAsDocumentDialog()

{

    FormRun          _dialog;

 

 

    FormRun                         form;

    Args                            a   =   new Args("ROG_SelectUserid");

    Filename    onlyFilename;

    Filename    curFileExtension;

    Filename    toFileName;

    ;

    /*

    a.caller(_documentPack);

    form    =   ClassFactory.formRunClass(a);

    form.init();

    //form.run();

    //form.wait();

 

    _dialog = new dialog("ffd",_documentPack,"fds",formstr(ROG_SelectUserid));

    //dlf     = _dialog.addField(typeid(userid));

    //formstr(ROG_SelectUserid);

    */

    this.dialog();

 

    if(userid)

    {

        info(userid);

 

        [onlyFilename,curFileExtension]  = Docu::splitFilename(documentTable.FilePath);

 

        toFileName = documentTable.completeFilename(onlyFilename,curFileExtension,userid);

 

        winAPI::copyFile(documentTable.FilePath,toFileName);

        winAPI::deleteFile(documentTable.FilePath);

 

        ttsbegin;

        documentTable.selectForUpdate(true);

        documentTable.FilePath = toFileName;

        documentTable.update();

        ttscommit;

    }

 

}

 

void saveCompanyDocument()

{

    str             filename;

    FileNameFilter  filter;// = ['Image Files','*.jpg'];

 

    Bindata binData = new BinData();

    Filename    onlyFilename;

    Filename    curFileExtension;

    Filename    toFileName;

    ;

 

    filename = Winapi::getOpenFileName(hwnd,filter,'', "@SYS53008", '','');

 

 

    if ((filename) && (StrScan(filename,".doc",1,strlen(filename)) > 0))

    {

        //if (binData.loadFile(filename))

        {

            [onlyFilename,curFileExtension]  = Docu::splitFilename(filename);

 

            if (onlyFilename)

            {

                toFileName = documentTable.completeFilename(onlyFilename,curFileExtension);

                if(toFileName)

                {

                    if(filename == toFileName)

                    {

                        info("@HFM1587");

                    }

                    else

                    {

                        winapi::copyFile(filename, toFileName,true);

                        ttsbegin;

                        documentTable.selectForUpdate(true);

                        documentTable.FilePathROG = toFileName;

                        documentTable.update();

                        ttscommit;

                    }

 

                }

                else

                {

                    throw error("@ROG94");

                }

            }

        }

    }

}

 

 

void saveDocument()

{

     str             filename;

    FileNameFilter  filter;// = ['Image Files','*.jpg'];

 

    Bindata binData = new BinData();

    Filename    onlyFilename;

    Filename    curFileExtension;

    Filename    toFileName;

    ;

 

    filename = Winapi::getOpenFileName(hwnd,filter,'', "@SYS53008", '','');

 

 

    if ((filename) && (StrScan(filename,".doc",1,strlen(filename)) > 0))

    {

        //if (binData.loadFile(filename))

        {

            [onlyFilename,curFileExtension]  = Docu::splitFilename(filename);

 

            if (onlyFilename)

            {

                toFileName = documentTable.completeFilename(onlyFilename,curFileExtension);

                if(toFileName)

                {

                    if(filename == toFileName)

                    {

                        info("@HFM1587");

                    }

                    else

                    {

                        winapi::copyFile(filename, toFileName,true);

                        ttsbegin;

                        documentTable.selectForUpdate(true);

                        documentTable.FilePath = toFileName;

                        documentTable.update();

                        ttscommit;

 

                        ttsbegin;

                        applicantTable.selectForUpdate(true);

                        //info(useridStr.valueStr());

                        applicantTable.ROG_createBy = applicantTable.createdBy;

                        applicantTable.update();

                        ttscommit;

 

                    }

 

                }

                else

                {

                    throw error("@ROG94");

                }

            }

        }

    }

 

 

}

 

 

boolean setUserid(userid      _userid)

{

    ;

    if(_userid)

    {

        userid  = _userid;

        return true;

    }

    else

    {

        return false;

    }

}

 

 

static Str checkFolderChar(Str pFolderName)

{

    Str mReturn = "";

    Int mLoop;

    ;

 

    for (mLoop=1; mLoop<=StrLen(pFolderName); mLoop++)

    {

        if ((substr(pFolderName, mLoop, 1) != "\\")

        && (substr(pFolderName, mLoop, 1) != "/")

        && (substr(pFolderName, mLoop, 1) != ":")

        && (substr(pFolderName, mLoop, 1) != "*")

        && (substr(pFolderName, mLoop, 1) != "?")

        && (substr(pFolderName, mLoop, 1) != '"')

        && (substr(pFolderName, mLoop, 1) != "<")

        && (substr(pFolderName, mLoop, 1) != ">")

        && (substr(pFolderName, mLoop, 1) != "|"))

        {

            mReturn = mReturn + substr(pFolderName, mLoop, 1);

        }

    }

 

    return mReturn;

}

 

 

public static ROG_Document construct()

{

    return new ROG_Document();

}

 

 

static void openDocument(str filename)

{

    COM     wordApplication;

    COM     wordDocuments;

    COM     wordDocument;

    COM     wordRange;

    ;

    wordApplication = new COM("word.application");

    wordDocuments   = wordApplication.Documents();

 

    //wordDocument    = wordDocuments.add("F:\\Resume\\andyl\\Testdocdoc.doc");//add(filename);

    wordDocument    = wordDocuments.add(filename);

    wordApplication.visible(TRUE);

}

 

 

 

server static void main(Args args)

{

    ROG_Document   _document = ROG_Document::construct();

    ;

    //breakpoint;

    _document.obj(args.caller());

    _document.parmCommon(args.record());

    _document.FDS(_document.obj().dataSource());

    _document.parmstr(args.parm());

 

    _document.parmhwnd(_document.obj().hwnd());

 

    _document.parmDocument(_document);

    _document.run();

 

}