SHARED apply5250FunctionKeyPatterns

SHARED.apply5250FunctionKeyPatterns

This example JavaScript function is designed to look for Fn=xxxxxx patterns on specified screen lines. Copy and paste the attached functions into your SHARED script object, file UF_SY420_RTS.JS.

  

    // Apply Fn=xxxxxx function key patterns to buttons and function keys enabled on the current RAMP-TS screen 

 

    apply5250FunctionKeyPatterns : function(iLowRow,iHighRow,aForceEnable,aForceDisable)

    {

       if (GLOBAL_oAXESInterface == null) return; // No AXES interface

       if (GLOBAL_oCurrentTSform == null) return; // No current AXES form

       if (oGLOBAL_CurrentFORM == null)   return; // No RAMP-TS definition for the form  

      

       TRACE("SHARED.applyFunctionKeyPatterns started");

                    

       if (iHighRow == null) iHighRow = iLowRow;       // default is same as low row

             

       var allkeys    = "";

       var typeOUTPUT = GLOBAL_oAXESInterface.Element.TYPE_OUTPUT;

       var oForm      = oGLOBAL_CurrentFORM;

        

       // Disable all function keys and buttons to start with.

       // Note that the function keys (oForm.vFKERTS) and the buttons (oForm.vFKEVLF) are BOTH disabled here

      

       TRACE("SHARED.applyFunctionKeyPatterns is disabling all function keys and all buttons");

       for (var i = 0; i < oForm.vFKEVLF.length; i++) { if (oForm.vFKEVLF.charAt(i) != "0") oForm.vFKEVLF = InsertString(oForm.vFKEVLF,"0",i); }

       for (var i = 0; i < oForm.vFKERTS.length; i++) { if (oForm.vFKERTS.charAt(i) != "0") oForm.vFKERTS = InsertString(oForm.vFKERTS,"0",i); }

                                                     

       // Strip all output fields on the specified lines to create a long string of function keys strings

               

       for (var iRow = iLowRow; iRow <= iHighRow; iRow++)

       {

          var aAElement = GLOBAL_oCurrentTSform.getElementsByRow(iRow);

          for (var i = 0; i < aAElement.length; i++)

          {

             var oAXESElement = aAElement[i];

             if (oAXESElement.type == typeOUTPUT) { allkeys += " " + oAXESElement.getValue(); }    

          }

       }

 

       // This RegExp looks for strings of the form F1=XXXX (where "F" can be F, PF, FP, CF

       // or Cmd) XXXX can be a string of any length terminating at more than one space,

       // the end of the line or another instance of "F1=" (thats the ?= look ahead group).

       // All groups are forgotten (that's the ?:) except the function number and the XXXX text.

 

       var reFKey = /\b(?:F|PF|FP|CF|Cmd)(\d+)[=-](.*?)(?=(?:\b(?:F|PF|FP|CF|Cmd)\d+[=-])|\s{2,}|$)/gi;

 

       var fkeyMatch = reFKey.exec(allkeys);

       while (fkeyMatch != null)

       {

          var key = "F" + TRIM_RIGHT(fkeyMatch[1]);

          // Note that the function key and the button are both being enabled here

          SETKEYENABLED(GLOBAL_oCurrentTSform.symbolicName,key,true,true); 

          fkeyMatch = reFKey.exec(allkeys);

       }

                         

       // Enable any forced buttons. Note that the function key and the button are BOTH enabled

             

       if (aForceEnable != null)

       {

          TRACE("SHARED.applyFunctionKeyPatterns is forcing the enablement of specified keys/buttons");

          for (var i = 0; i < aForceEnable.length; i++) { SETKEYENABLED(GLOBAL_oCurrentTSform.symbolicName,aForceEnable[i],true,true); }

       }     

             

       // Disable any forced buttons. Note that the function key and the button are BOTH disabled

             

       if (aForceDisable != null)

       {

          TRACE("SHARED.applyFunctionKeyPatterns is forcing the disablement of specified keys/buttons");

          for (var i = 0; i < aForceDisable.length; i++) { SETKEYENABLED(GLOBAL_oCurrentTSform.symbolicName,aForceDisable[i],false,false); }

       }     

 

       // Finished  

 

       TRACE("SHARED.applyFunctionKeyPatterns ended");

                                      

    }, // <--- Note the comma