Hello
I am wondering if anyone has come accross this issue. I the code below, it
can return a company the Michigan Coating Products, CompanyXYZ, etc. How
do I make edits to this, so it does not matter what company comes from the
parameter, it will click on whatever is returned. Please advise and thank.
-R-
Sample code below:
Dim record_count
record_count = DataTable.GetSheet("SOLNShippingData").GetRowCount
For i = 1 to record_count 'sets the number for entries on the
SOLNShippingData ActionPg for parameter PurOrdNum for "For Loop"
'set value of "a" and "b"
a=Datatable.Value("PurOrdNum","SOLNShippingData") 'Sets "a" to whatever
value is in parameter PurOrdNum of sheet SOLNShippingData.
If a <> "Dup Already Converted" Then 'reads if not equal to "Dup
Already Converted" run, skip if is = to "Dup Already Converted"
b=Datatable.Value("PurOrdSupplier","SOLNShippingData") 'Sets "b" to
whatever value is in parameter PurOrdSupplier of sheet SOLNShippingData.
Browser("SAP NetWeaver Portal").SAPPortal("SAP NetWeaver
Portal").Frame("155922_FRAME").SAPEdit("Name of Company").Set b
Browser("SAP NetWeaver Portal").SAPPortal("SAP NetWeaver
Portal").Frame("155922_FRAME").SAPButton("Find").Click 19,5
'need to make this dynamic won't always be Michigan Coating Products
Browser("SAP NetWeaver Portal").SAPPortal("SAP NetWeaver
Portal").Frame("155922_FRAME").Link("Michigan Coating Products").Click 107,5
Browser("SAP NetWeaver Portal").SAPPortal("SAP NetWeaver
Portal").Frame("155922_FRAME").SAPTreeView("Find").Select "Find"
Browser("SAP NetWeaver Portal").SAPPortal("SAP NetWeaver
Portal").Frame("145800_FRAME").SAPEdit("Purchase Order No.").Set a
Browser("SAP NetWeaver Portal").SAPPortal("SAP NetWeaver
Portal").Frame("145800_FRAME").SAPButton("Find").Click 20,4
Print("Need to execute script. Not blank and not equal to Dup") 'For
testing script
'Stuff
End If
DataTable.GetSheet("SOLNShippingData").SetNextRow
Next
--
--
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
---
You received this message because you are subscribed to the Google Groups "QTP
- HP Quick Test Professional - Automated Software Testing" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
For more options, visit https://groups.google.com/d/optout.
