Rocket Host Access

I have another client using Reflection and I am looking into the possibility of using it's VBA interface to display a grid control with say 100 lines of data.  I would like the end-user to select one of those lines and return which row number the user selected back to the legacy system.  So can the legacy system launch the control and then retrieve the row selected?   Thanks Karl#Rumba

Hello everyone,   Currently, the way I am writing the scripts is to check a whole row the required string in an IF statement and if it's not there go to the next IF statement. While this definitely does work, i'm just wondering if there is a way to compress the code so I don't have a long list of IF statements. I would just like to try to code more efficiently with less work if possible.    For example in the below script. it checks 2 strings and if its there it puts a 2, if not it goes to the next IF statement to check the row below it and do the same I have 10 different IF statements since there are 10 rows.  Is there anyway to repeat the same IF statement, just move down a row? Do'Check to see if Tapes have EXP Status and if they are a CART3592A2'If yes then Place 2 EMReadScreen MyString, 3, 13, 75 EMReadScreen SysString, 10, 13, 60 If UCase( MyString) = "EXP" and UCa

Hello all,   So what i'm trying to do is prompt an input box, I input today's date in this format X/XX/XX, and it checks to see if a string on the screen matches that and if it does, put a 1 next to the column.   I can't seem to pass on the date as a string for it to check against the date on screen. I have also tried using a variable = a formatted date but that did not work either.   Sorry if that's a bit confusing, but here are some examples.   First attempt was setting the variable date and trying to match it with the date on screen. Sub Main Dim MyString as String, DString as String, RetC as Integer $D = Format(Month(Date), "00") & "/" & Format(day(Date), "00") & "/" & "18", 20,7 EMConnect "A" EMReadScreen MyString, 7, 9, 63 EMReadScreen DString, 7, 9, 7 If UCase(MyString)

 Hi, We are trying to use Rumba 9.1 for screen scraping. We are trying to use a node js process to invoke rumba and do the screen scraping. However, I  am not able to start Rumba from the command line. Could someone let me know how to start Rumba from the command line, as well, as how to make the node js process read and write through Rumba?   Thanks#Rumba

Hello,   We have recently upgraded a client from an older Rumba version (7.0.0) to 9.5 and our code that handles emulation is unable to Query any sessions, which we need to do. It seems that when we send EHLAPI function 10 (QUERYSESSIONS) an initial function 9 (SETSESSIONPARAMETERS) is also sent.   This is expected from my understand in the older version. However when the SETSESSIONPARAMETERS is sent to Rumba, our emulation hangs. This is what the Trace looks like: 11:32:54.767  PID: 75136  10 QUERYSESSIONS    > len=19211:32:54.768  PID: 75136   9 SETSESSIONPARAMETERS > len=98 > TO SERVER:B:NOATTRB,NOEAB,NOXLATE,NEWRET,TWAIT,SRCHALL,SRCHFRWD,FPAUSE,AUTORESET > ,QUIET,WRITE_SUPER   Nothing is ever returned when this is sent, we should expect an APIOK or at least some error. Any guida

Hello everyone,   Everyday we collect some data and input it into an excel sheet which we keep on Sharepoint, which is cloud based. I currently have a script that pulls that information and creates an excel sheet and then I copy it over. Is it possible to have it directly place it into the cloud based one? I used the sample template to create the script I currently use. Sorry it's a bit long, I need to refine it.   Sub Main'*****************************************************************************************************' 5250 DemoHost to Excel Data Transfer ( Basic )'' This example connects to the Netmanage 5250Demohost.netmanage.com, brings up a data screen, ' opens a new Excel workbook and transfers data to Excel'***************************************************************************************************** '********************************************************

Hi,I was wondering if the following two products are compatible. Does (2) have all the functions of (1), for example, so that if someone already has AttachmateWRQ, will they be able to move seamlesssly to the Attachmate Reflection version?(1) AttachmateWRQ Reflection for UNIX and OpenVMS Version v14(2) Attachmate Reflection for UNIX and OpenVMS v14Thanks.#Reflection#Reflection14.x

Hello everyone,   First off, my apologies if I may not have worded my question correctly. So, pretty often we have users calling in where we need to unlock a application for them. The users usually don't know the initials of their application, so we just unlock a total of 5 different applications, as they are the most common. The only variable that changes is the file group number that they will supply to us. I was wondering how I could use a loop to go through the different applications and apply the file group number I input, either by message box, or whatever is possible without having to manually go into the script and change it. Here is my current code for one application. Sub Main EMConnect "A" EMSendKey "<ATTENTION>" EMSetCursor 10, 03 EMSendKey "1<ENTER>" EMSendKey "<PF12>" EMSendKey "IPRLSFGP APPCDE(*ApplicationInitials*) FGP(" EMWri

Hi RUMBA Fam,   Just want to ask if anyone from here experienced an issue when launching a Rumba Session using VBA thru Shell execution. Everytime the VBA launches the Rumba it does not connect automatically and is stuck on Host Machine error. Below is the sample code: Shell ("RunDLL32.EXE shell32.dll,ShellExec_RunDLL C:\\Rumba\\MFrame\\A-WINNT.rsdm")   Here's the screenshot of the Rumba upon launching: Appreciate your help!

I wanted to post a problem that I am having with my Micro Focus program - Micro Focus Reflection Desktop Pro (16.0.308.0).While connected to the host, my program will freeze and not allow me to use anything until I force a quit using CTRL ALT DEL. Here are a few of the error code boxes that I get when it occurs.Has anyone experienced a similar issue. It appears that I am still connected to the host because the bottom text says so. When disconnected it will say "disconnected from host"...

I am putting together a simple app that sends keystrokes to an ObjectX AS400 display control. I have figured out how to send the keys but I cannot figure out how to change the system the control connects to when I run the connect method. When I right click the object and select activeX properties it look like I can change the default connection to my saved 5250 connections, but every time I connect it defaults to the demo host. Is there a way to set the default connection in code(C#)?#Rumba

Hi,We have Reflection for HP v14.1 packaged as AppV deployed into XenApp published desktop v6.5. A couple of issues:1) ssh sessions fails to connect (error trace below).2) Using the Connection Setting will crash the session.I have tested the connection to the host separately using the ssh command and it works fine (that is, firewall rules are in place, ports are open, etc.). Also, when connecting using telnet, the Reflection session works as well. Only fails with ssh sessions. Also, running the same ssh session in a regular Windows (that is, non-Citrix) environment works as well.Using the Reflection trace facility, the trace log shows that the ssh connection failed very early in the handshake. Here are the some relevant information from the trace log (I have deleted ip addr information from the trace that could be confidential):Attachmate Reflection for HP with NS/VT 14.1.3 Reflection for HPVersion 14.1.3 build

Running Rumba 9.5 on Window 7 Professional. Occasionally get "<Session Name> experienced a critical error and had to be shut down..." The system had a Rumba 7.5 previouslly loaded. Is this similar to the Rumba 8.0 issue running on Windows 7 requiring a Registry Fix. Thanks  #Rumba

Good day everyone,   I may have mentioned this before, but I am fairly new at AS400 and am trying to get certain script functions to work.   Anyway, I currently connected to 6 different sessions at once, and I have a script to check all of them for system status, however, it breaks if some/all of them are signed out.   How can I use the "If" statement to say "If screen displays Sign In, (Enter credentials) then continue."   Here is my current script. It's a very basic and a simple one, i'm just having trouble getting it to read the screen and then use the if statement.   Sub Main EMConnect "A" EMSetCursor 20, 7 EMSendKey "DSPMSG QSYSOPR<Enter>" EMConnect "B" EMSetCursor 20, 7 EMSendKey "DSPMSG QSYSOPR<Enter>" EMConnect "C" EMSetCursor 20, 7 EMSendKey "DSPMSG QSYSOPR<Enter>" EMConnect "D" EMSetCur

Hello everyone, I have installed Rumba 9.5   Now when my Trial license has expired I need to change it.     I tried Reinstall/modify but it still says when i start the application"Licenses has expired".     Any solutions?#Rumba#license

Hello,   is it possible to validate a word that you find, with a list of words in an excel sheet?   if it is possible can you then maybe show how the code should look?   i will be gratefull for any help that i can get.#Rumba

If i have something which is being saved into a logfile, is it possible that you can make sure that the logfile will always show, if the script is cancelled? #Rumba

is it possible to make the logfile, save automatic with out having to interfere with the computer?#Rumba

Hello everyone,   I am currently setting up scripts to run in RUMBA 9.5 and I need to insert the date in the format I need that will insert a 0 or single digit months and days. Example 05/05/1999. I can get it to input the current date however, it will mess up my current scripts if the days go to single digit, or the months go to double digit thus why I need it to return a 0.   So as the subject says I need to Insert date with Full date MM/DD/YYYY that will add 0 for single digit months and days. Example 05/05/1999. I am using the following different commands to insert different dates. Would it be still similar to this kind of script or do I need to add an IF statement? Sub Main EMConnect "A" ThisDay = Day(Now)ThisYear = Year(Now) ThisMonth= Month(Now)ThisDate = date EMWriteScreen ThisDate , 20, 8 EMWriteScreen ThisMonth, 20, 7 EMWriteScreen ThisDay, 20, 9 EMWriteScre

We had recently upgraded to iSeries OS V7R2 , and about the same time it was reported by our end users (Rumba version 9.4) that they were experiencing 'latency', 'slowness' 'missing character'( when typing quickly on the keyboard a character would not show up in the monitor .  typing on keyboard "ABCD" ... but only "ABD" display . this slowness is exhibited before pressing the <ENTER> key.   Has anybody else seen an issue like this? Thanks Jon#Rumba

I have a reflection basic script that will read a text file and transmit each line of that text file to what ever device that I'm connected to. What I cannot figure out is how to read the response from the device to see if the command that was sent failed, device will report command failure ("Error: Bad command"). I have waitforstring to wait for the prompt to get back before going onto the next line in the text document but if I get say "error" from the device that I'm connected to I want to stop the script so that no more commands are sent. Thanks for the help.#Reflection

hello,   if you have a date: 01-01-2018 and you have a date1 10-10-2018   how would you then make a script which always validate that date1 is minimum 30days earlier than the normal date?#Rumba

hello :D it looks like im getting errors when trying to run a script which should look at some specific positions on my screen and check if it fits a lot of different names. if it fits it should jump one line down and look again until it finds one which doens't match and then copy it for later use.  my code looks like this right now: 'for i = 11 to 16emreadscreen status13,7,i,30'if (status13 = "KONKMHL") or (status13 = "COGNINZ") or (status13 = "AAR26GS") or (status13 = "ARHKDEJ") or (status13 = "KOLKEVP") or (status13 = "PAKKJDA") or (status13 = "ARHKMAK") or (status13 = "VIBKJYF") or (status13 = "ARHKKSL") or (status13 = "ARHKMAD") or (status13 "PAKKLOO") or (status13 = "ARHKHEK") or (status13 = "KOLKGUG") or (status13 = "PAKKSUJ") or (status13 = "ARHKMBA") or (status13 = "ARCKJEK") or (status13 = "AUTO1HL") or (status13 = "AUTO1GR") then'next i 'else'emreadscreen opret,7,i,30'emsendkey "<PF3>"'em

Hi, I've been using the Rumba ODBC driver to allow .NET windows service application to receive and send data to AS/400 over an ODBC connection but getting below error but same code works for .NET window application. We have ensured that the Windows service runs as same user used to run the windows application. Can you please help? Thanks#Rumba

Hi, I've been using the Rumba ODBC driver to allow .NET windows service application to receive and send data to AS/400 over an ODBC connection but getting below error but same code works for .NET window application. We have ensured that the Windows service runs as same user used to run the windows application. Can you please help? Thanks#Rumba