RegisterUserFunc in UFT

RegisterUserFunc "WebEdit", "fnWebEditSet", "fnWebEditSet"
RegisterUserFunc "WebEdit", "fnWebEditSetSecure", "fnWebEditSetSecure"


Function fnWebEditSet(objControl,objControlText)

If objControl.Exist(10) Then


           If objControl.GetRoProperty("Disabled")=0 Then
           objControl.Set objControlText
              
           Reporter.ReportEvent micPass,"WebEdit Set",""&objControl.ToString()&" "&"value captured"
              
           Else
           Reporter.ReportEvent micFail,"WebEdit Set",""&objControl.ToString()&" "&"is in disabled state"
              
           End If

Else
Reporter.ReportEvent micFail,"WebEdit Check",""&objControl.ToString()&" "&" does not exist"
End If


End Function





Function fnWebEditSetSecure(objControl,objControlText)

If objControl.Exist(10) Then


           If objControl.GetRoProperty("Disabled")=0 Then
           objControl.SetSecure objControlText
              
           Reporter.ReportEvent micPass,"WebEdit Set",""&objControl.ToString()&" "&"value captured"
              
           Else
           Reporter.ReportEvent micFail,"WebEdit Set",""&objControl.ToString()&" "&"is in disabled state"
              
           End If






Else

Reporter.ReportEvent micFail,"WebEdit Check",""&objControl.ToString()&" "&" does not exist"

End If


End Function



'Browser("Buy Women Clothing Online:").Page("Buy Women Clothing Online:").WebEdit("edsrchword").fnWebEditSet "sumit"

Browser("Buy Women Clothing Online:").Page("Buy Women Clothing Online:").WebEdit("edsrchword").fnWebEditSetSecure "x"