lansa050_0880

[ |../../index.htm#lansa/lansa050_0880.htm]
現在地: RAMP-TSガイド > スクリプト > 使用方法 > サブファイル内の特定の値の検索と選択

サブファイル内の特定の値の検索と選択

ケース A: 選択肢が見つかったときに、該当する行にカーソルを設定して Enter を押す。
uSubfileSearch: function(sToForm, sFindValue, sFindField, sMoreRecsField)
{
 
/* Subfile indexed fields are one based */
 
    var iInd = 1;
    var bFound = false;
 
     while( (CHECK_FIELD_EXISTS(sFindField,iInd)) && !(bFound) )
        {
          /* Found, set the flag to true to cause the loop to end */
          if (sFindValue == GETVALUE(sFindField,iInd))
          {
            bFound = true;
          }
          else /* Increase field index */
          {
            iInd++;
          }
        }
 
        /* If found, position the cursor to the field and index and send an Enter key to cause that entry to be selected */
        if (bFound)
        {
            SETCURSORTOFIELD(sFindField,iInd);
            SENDKEY(KeyEnter);
            Q_CHECK_CURRENT_FORM(sToForm,"Unable to navigate to " + sToForm);
        }
        /* If not found, check whether the nominated more records indicator field is present on the screen. If it is we can page down. */
        /* Note the payload accompanying the Sendkey. It is used in the vHandleArrive function to decide whether we have to repeat this logic. */
       
        else if ( CHECK_FIELD_EXISTS(sMoreRecsField) )
        {
            SENDKEY(KeyPageDown, "Next_Page");
        }
        }
 
ケース B: 選択肢が見つかったときに、該当する行にカーソルを設定し、セレクター・フィールド "SFL_SELECT" の値を "2" に設定し、Enter を押す。
このケースは、SETCURSOR の呼び出しを除いては、前のケースとほとんど同じです。SETCURSOR を以下の記述に置き換えます。
SETVALUE("SFL_SELECT", "2", iInd);
 
[ |../../index.htm#lansa/lansa050_0880.htm]