Answer / daly s

Try out this,it will definitely work
If csng(tot)=p*t

Answer / satya

Hi, thanks for your answerers. I tried what you suggested.
Still I did not get the Answer, I am getting same error.
My operating system is Vista.
Could you please anyone give me suggestion where is the problem?
thanks

Answer / ravi

Try this

if cdbl(tot) = cdbl(p) * cint(t) then

Answer / e.srinivasrao

t=for tickets value storage(from get visable text function)
p=for price value storage(from get visable text function)
p=mid(p,2,len(p)-1)
p=cdbl(p)
tot=for total value storage(from get visable text function)
tot=mid(tot,2,len(tot)-1)
tot=cdbl(tot)
if tot=t*p then
reporter.reportevent 0,"s1","calculation pass"
else
reporter.reportevent 0,"s1","calculation fail"

Answer / jyostna

QTP 9.2 supports windows XP and IE 7 ... i guess the above error is that u r using vista....
pls correct me if am wrong

HI ALL I AM WORKING AS A AUTOMATION ENGINEER FROM PAST 2 MONTHS IN QTP,MY QUESTION IS IF I OPEN THE BROWSER FIRST & THEN THE QTP LATER MY OBJECT SPY WILL NOT WORK,Y IT IS SO..IF U HAVE THE ANSWER PLZ MAIL ME AT AKSHAR.MYSORE@GMAIL.COM

8 Answers   Infosys, TCS,

Can anyone tell me about "Step- By Step Paramterization". among the two paramaterizations, Step by step and Parameterize All, which one is mostly used.

0 Answers  

I have recorded a test over web application(with IE6.0) in analog mode. But, while running it my test gets failed. Why? (Note: my systray has 3 open web applications)

7 Answers   Xansa,

I know the Basic QTP. But I wanted to learn descriptive programming in QTP. Without Object Repository how we can develop a script? I wanted to do one real time project using QTP. If you know this type of training is available in pune then let me know the address.

0 Answers  

Write a Script With descriptive programming(Without Repository) to update an Update an order in Flight App and verify whether it is done successfully.(Use ChildObjects method)

2 Answers  

What are the types of object repositories? Which one is you are using?

0 Answers  

Discuss QTP Environment.

1 Answers  

How do you script a nested loop in QTP? I am showing a snipet of my code. Any suggestions to help me get this to work would be great appreciated! STEP A - Customer Number: No loop - ISBN: Loop STEP B - Customer Number: Loop - ISBN: Nested Loop Here is the code I am using now. I am using i for the loop and j for the nested loop in STEP B of my script. =========================================== 'CREATE AN ADDITIONAL CUSTOMER Dim myNum, RowNum, RowCnt2, val2, total, i DataTable.ImportSheet "C:\QOE Data - UAT1.xls" ,"Data" ,"Global" RowCnt2 = DataTable.GetRowCount i = 1 DataTable.SetCurrentRow(i) ' Set row to one Do while Not i > RowCnt2 i=i+1 DataTable.SetNextRow MsgBox Datatable.Value("Customer_Num") Msgbox i Msgbox RowCnt2 If Not i > RowCnt2 then val2=datatable.Value("Customer_Num","Global") OracleFormWindow("Sales Order").SelectMenu "File->New" OracleFormWindow("Sales Order").OracleTabbedRegion("Order Information").OracleTextField("Customer Number").SetFocus OracleFormWindow("Sales Order").OracleTabbedRegion("Order Information").OracleTextField("Customer Number").Enter val2 End If 'CREATE SECOND ISBN LIST DataTable.ImportSheet "C:\QOE Data - UAT1.xls" ,"Data" ,"Global" Dim j, RowCnt3, val3 RowCnt3 = DataTable.GetRowCount For j = 1 To RowCnt3 DataTable.SetCurrentRow(i) ' datatable.getSheet("DataTable").setNextRow If Trim(DataTable("ISBN",dtGlobalSheet)) = "" Then j = j - 1 Exit For End If Next 'Define ISBN rows If RowCnt3 <> j Then RowCnt3 = j End If 'Loop through ISBN rows For j = 1 To RowCnt3 DataTable.SetCurrentRow(i) val3 = Datatable.Value("ISBN","Global") msgbox j If j = 1 Then OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item").SetFocus OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item").Enter val3 else If j < 16 Then OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_"&i).SetFocus OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_"&i).Enter val3 else If RowCnt1 => 16 Then OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_15").SetFocus OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_15").InvokeSoftkey "DOWN" OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_15").SetFocus OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_15").Enter val3 end if end if End If Next 'EXIT APP msgbox i loop Browser("Browser").Page("Oracle Applications 11i").Sync Browser("Browser").Close ========================================== It isn't working correctly in my nested loop in STEP B (for ISBN). Any ideas?? Thanks! SBsteve

0 Answers  

What does it mean when a check point is in red color? what do u do?

1 Answers  

Can objects recognised without repository?

5 Answers  

How many add-ins comes by default with quicktest professional?

0 Answers  

How i can use Regular expression in QTP?give detailed steps for it.

2 Answers