Versions Compared

Key

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

[ Image Removed |../../index.htm#lansa/lansa050_0600.htm]
現在地: RAMP-TSガイド > RAMP VLF-WIN のチュートリアル > 上級 RAMP Womdows チュートリアル > RAMP-WINAD01 ステップ 3. 社員表示画面のスクリプトに機能を追加する

...

Wiki Markupこのステップでは、社員表示のスクリプトに機能を追加して、\[社員\]、\[姓\]、\[名\] フィールドの内容を Windows クリップボードにコピーします。 1.   デスティネーション画面「社員表示」のスクリプトを見つけます。 2.   以下のファンクションを NavigateTo ファンクションの後、 クリップボードにコピーします。


  1. デスティネーション画面「社員表示」のスクリプトを見つけます。

  2. 以下のファンクションを NavigateTo ファンクションの後、 //<SYSINFO>

...

  1. ブロックの前のスクリプトにコピーして貼り付けます。

...



  1.    /* ====================================================== */

...

  1.   /* ===================

...

  1.  

...

  1.  uCopyEmpDetails  ================ */
     

...

  1.  /* ====================================================== */

...

  1.   /* Copies Employee Details to the Windows

...

  1.  Clipboard       */

       

...

  1.   uCopyEmpDetails : function () 

...

  1. {

     

...

  1.  /* Get details from 5250 screen */
     

...

  1.   var TAB_Char = "\x09" ;

...

  1.   var End_Of_Line_Char = "\x0D\x0A" ; 

     

...

  1.   var strEmpno = GETVALUE("txtEmpno");
     

...

  1.   var strGName = GETVALUE("txtGivename");
     

...

  1.   var strSName = GETVALUE("txtSurname");

...

  1.  /* Write details to clipboard */

...

  1.   

...

  1.  var MyString = "";

...



  1.    MyString = strEmpno + TAB_Char + strGName + TAB_Char + strSName + End_Of_Line_Char;
     

...

  1.  COPYTOCLIPBOARD(MyString);

     

...

  1.  /* Issue a 

...

  1. message  */
     

...

  1.  MESSAGE("Details for employee ", strEmpno," sent to the clipboard");

...

  1.  } ,

...



  1.   
  2. [変更をコミット

...

  1. ]

...

  1. ボタンを使用して、スクリプトの変更をコミットします。

...