Hello Ankesh,
still need a help on this. I ran this script below and the result is halfway, please see the attachment.
Please help review my script:
still need a help on this. I ran this script below and the result is halfway, please see the attachment.
Please help review my script:
Code:
strCharacters=Datatable("Characters",dtGlobalSheet)'get the datatable values
strDescription=Datatable("Description",dtGlobalSheet)'get the datatable values
arrCharacters=Split(strCharacters,",")
arrDescription=Split(strDescription,",")
For i=0 to Ubound(arrCharacters)
SAPGuiSession("Session").SAPGuiWindow("Characteristics").SAPGuiEdit("Characteristic").Set "QTWTEST2"
SAPGuiSession("Session").SAPGuiWindow("Characteristics").SAPGuiButton("Create").Click
SAPGuiSession("Session").SAPGuiWindow("Characteristics").SAPGuiEdit("Description").Set "QTP characteristics test2"
SAPGuiSession("Session").SAPGuiWindow("Characteristics").SAPGuiComboBox("Data Type").SetFocus
SAPGuiSession("Session").SAPGuiWindow("Characteristics").SAPGuiComboBox("Data Type").Select "Character Format"
SAPGuiSession("Session").SAPGuiWindow("Characteristics").SAPGuiEdit("Number of Chars").Set "6"
SAPGuiSession("Session").SAPGuiWindow("Characteristics").SAPGuiTabStrip("TABSTRIP1").Select "Descriptions"
SAPGuiSession("Session").SAPGuiWindow("Characteristics").SAPGuiTabStrip("TABSTRIP1").Select "Values"
SAPGuiSession("Session").SAPGuiWindow("Characteristics").SAPGuiTable("Allowed Values").SetCellData i+2, "Char. Value",arrCharacters(i)
SAPGuiSession("Session").SAPGuiWindow("Characteristics").SAPGuiTable("Allowed Values").SetCellData i+2, "Description",arrDescription(i)
next