Member 12430081 Ответов: 0

Проблема в циклическом выполнении сценариев SAP


Всем Привет,

У меня есть некоторые проблемы с получением правильной петли.

Мне нужно проверить, завершено ли действие или нет ..

для этого мне нужно выполнить цикл поиска datagridview на экране SAP до тех пор, пока значение не станет истинным для всех элементов в datagridview.

но здесь мой нижеприведенный цикл работает нормально, но он проверяет активность только для первого элемента в datagridview .. и существует цикл и выполняет непрерывную активность.

Может кто-нибудь, пожалуйста, сказать мне, где я ошибаюсь

For Each row As DataGridViewRow In Identifications2DataGridView.Rows

             Dim Proposaltext As String = "Payment proposal has been created"
             Dim proposal As String = Trim(abb.findById("wnd[0]/usr/tabsF110_TABSTRIP/tabpSTA/ssubSUBSCREEN_BODY:SAPF110V:0201/sub:SAPF110V:0201/txtF110V-STATU[1,0]").text)





             abb.findById("wnd[0]/usr/ctxtF110V-LAUFD").text = Today
             abb.findById("wnd[0]/usr/ctxtF110V-LAUFI").text = row.Cells(1).Value


             Do Until proposal = Proposaltext





                 SendKeys.Send("{ENTER}")

                 System.Threading.Thread.Sleep(1000)



                 proposal = Trim(abb.findById("wnd[0]/usr/tabsF110_TABSTRIP/tabpSTA/ssubSUBSCREEN_BODY:SAPF110V:0201/sub:SAPF110V:0201/txtF110V-STATU[1,0]").text)

             Loop



         Next


Что я уже пробовал:

For Each row As DataGridViewRow In Identifications2DataGridView.Rows

             Dim Proposaltext As String = "Payment proposal has been created"
             Dim proposal As String = Trim(abb.findById("wnd[0]/usr/tabsF110_TABSTRIP/tabpSTA/ssubSUBSCREEN_BODY:SAPF110V:0201/sub:SAPF110V:0201/txtF110V-STATU[1,0]").text)





             abb.findById("wnd[0]/usr/ctxtF110V-LAUFD").text = Today
             abb.findById("wnd[0]/usr/ctxtF110V-LAUFI").text = row.Cells(1).Value


             Do Until proposal = Proposaltext





                 SendKeys.Send("{ENTER}")

                 System.Threading.Thread.Sleep(1000)



                 proposal = Trim(abb.findById("wnd[0]/usr/tabsF110_TABSTRIP/tabpSTA/ssubSUBSCREEN_BODY:SAPF110V:0201/sub:SAPF110V:0201/txtF110V-STATU[1,0]").text)

             Loop



         Next

0 Ответов