Rocket® RM/COBOL

2110.relativity.docx Well since the last time that I did the merge the fillers are showing but this position and length are not right. This is the file fd for this first filler. It should be what the previous was. Plus when I create my tables it also comes up with a message to rename the filler because it is not a valid sequel name, or i can click the cancel button to skip. 000400 FD  ACCOUNT-FILE 000500         LABEL RECORDS ARE STANDARD   112408         RECORD CONTAINS 2000 CHARACTERS. 000700  000800 01  ACCOUNT-RECORD-FD.  000900     05  AC-KEY. 001000         10  AC-NUMBER     PIC S9(11)   COMP-3. 112408     05  FILLER                   PIC X(1994).  

Sorry posted wrong info  In the details it is giving the previous position of the first 01 Account record fd and giving the new position of the filler in the account record under name. 

I have relativity installed on a Windows 7. I am having a problem with <filler> when doing merge. It is treating fillers like they are new fields but since that are not in the catalog it has no place to resolve the issue.  I had relativity installed on a Window xp and I never had this problem. My windows 7 is a new pc so my relativity was a fresh install. I didn't do the install and the man that did do the install is not here no more. So I do not know how everything was installed.

Hello RMCobol Community.  Please allow me to ask for help with XBIS, specifically "B$SetInactivityTimeout" and "B$SetServiceTimeout"   There are 3 ways to set "SetInactivityTimeout" Globally, BIS_SESSION_INACTIVITY_TIMEOUT=600 In the .srf “SessionParms(InactivityTimeout=600) From the service program, Call "B$SetInactivityTimeout" using {600}   BIS_SESSION_INACTIVITY_TIMEOUT=600 has lowest priority and can be overwritten by: SessionParms(InactivityTimeout=600) Call "B$SetServiceTimeout"   When setting “SetInactivityTimeout” from the service program, “Call "B$SetServiceTimeout"” must be done before “Call "B$ReadRequest"” in order for the timeout to become effective.   My question: Is my understanding of “SetInactivityTimeout” correct?       There are 3 ways to set "SetServiceTimeout" Globally, BIS_SERVICE_TIMEOUT=30 In the .srf “SessionParms(ServiceTimeout=30)” From the service program, Call "B$SetServiceTimeout" using {30}   BIS_SERVICE

Recently moved from Redhat 5.5 to Redhat 7.3 and the Relativity server 2.1.0 has become much more unstable.  Clients are also at version 2.1.0 using 64 bit odbc to do queries and updates to MF Cobol files. We are controlling the server using supervisorctl to keep it running all the time and sometimes it will crash w/in 24 hours of being restarted.  Seeing errors like   *** Error in `/opt/microfocus/relativity/2.1.0/bin/reldbsrv': double free or corruption (!prev): 0x09385060 *** Anyone have any suggestions on what to do to be more stable?   Also noticing that the timestamp of the relativity catalog files change during the day appearing to indicate that something is writing to them other than the creation from Relativity Designer - I find this odd, is it normal?   Thanks.#Relativity

"Hello" from Russell.  I have a question for the community, please. I have a "appointment" application where customer appointments can be scheduled by date & time. For a moment, let's consider an appointment is scheduled today (March 30th, 2018) for April 10, 2018 at 10:00am.  I have a routine to obtain UCT from the current time.  Either Steve J with Micro Focus support gave me a called program to use on Windows OS and a script "echo $TZ > TIMEZONE 2>&1" on Unix/Linux in order to obtain the current date & Time in UCT. My question: Can anyone share how to convert April 10, 2018 at 10:00am into Universal Coordinated Time in a format as 2018-03-30T14:05:39Z#RMCOBOL#COBOL

Hi, After updating Windows 10 Pro  to 1709 version an old cobol program no longer works properly. I already tested it and verified that the program works without problems in previous version of Windows (1703). The program runs with an old RmCobol runtime 10.01 version. The problema is in some tasks like disk operations or creating some tasks like disk operations or creating some reports the app slow down. The same tasks delay more than 20 times. Until version 1703 everything worked without problems. I have some customers with this problem. best regards #print#RMCOBOL

Good morning I wanted to know if it was normal for rmcobol to be slower in 64-bit systems Thanks

Attention Representatives or Users,     I currently have the RM/COBOL Version 7.0 and I can't get Codewatch to display the source code screen when I get the workspace configured and click the 'Run' Option.  It displays the breakpoint screen and the runtime debug screen, but not the screen where the source code is.  I want to be able to pull up the screen with the source code highlighted during execution of the runtime in Codewatch and I'm unable to do so.  It also doesn't show the source code (.cbl) in the "Programs" or "Files" window on the left side of the screen as well. If anyone can help me I would appreciate it greatly.   Jack Stockman

Good afternoon.   I am the IT Admin for a hospital in Maine. Two years ago we retired our Electronic Medical Records system and opted into a new Web based one. The older system was called "Hi-Tech" and RM/COBOL was a component we had to install on each PC prior to accessing the database. That's the extent of my knowledge on COBOL. I literally have no idea what COBOL does other than it needed to be installed first and THEN we could get into our database (well, that and I think I've heard rumors that COBOL has been around forever and 'just works'). We are now on Windows 10 (we were on XP and W7 Pro) and we are trying to test access to the old EMR system. Here is what I know so far... The company who built & provided service for the old EMR system is out of business (2 years now). The version of RM/COBOL that they provided us (and that we still have on file) will not work with Windows 10   What I think I need... A version of COBOL that will install on W10 and allow us

 Attention Community,         I'm having trouble running the runpan2.cob (RM/Panels) program.  When I run the runpan2 program, I get the following message:         "COBOL data reference error 101 at line 00056 in (C:\\PROGRAM FILES\\RMCOBOL\\RUNPAN2.COB)..."         I'd like to know what I need to do in order to fix this.   Jack Stockman

is it possible to display an image  (.bmp .jpg...) when running Liant RM/COBOL for unix/linux .  "C$Bitmap" works using pc runtime but how about the unix/linux runtimes.  Any 3rd party software available?  Thanks!!#COBOL#linuxcobol#RMCOBOL

 I have a program Customer Maintenance, in the program I have set a flag to call my javascript to open a new window to my web service (PRTSERVICE). // Load WSDL  var wsdUrl = urlPrefix "PRTSERVICE.wsdl"; var xmlHttp = SOAPClient._getXmlHttp(); xmlHttp.open("GET", wsdlUrl, true): xmlHttp.onreadystatechange = function() {    If (xmlHttp.readystate == 4){       SOAPClient_cacheWsdl[soapUrl] = xmlHttp.responseXML;       var hostname = location.hostname;       soap - new SOAPClientParameters()*;       soap.add("logon-user-name", $("#bis-userid).val());      soap.add("logon-host", hostName);      SOAPClient.invoke(soapUrl, "logonuser", soap, true, function (r, xml){       var resp = r["logon-user-result"];        if (resp!= "0"){        var v = xml.getElementsByTagName("faultstring");        var str = "Unabl

 Using RM/Cobol with the WOW Extension Designer version 10.01 and InstantSQL I am attempt to read data from a SQL Server 2012 database. At times, but not in all cases I receive the following error: “Connection is busy with results for another hstmt”. According to another response, this error was fixed in release 9.1.2.1 of the Extend Software however we do not use Extend.#SQLserver#RMCOBOL#InstantSQL

I would like to validate if you can help me with an error that is presented to us trying to consult a Micro Focus IDX4 file through Relativity MF, these files are currently managed by File Share, the error occurs when the file is blocked by File Share.   ---------------------------Relativity® Designer---------------------------SQLState: S1000 Msg: [Micro Focus][Relativity][Client][SimbaLNA][Micro Focus][Relativity MF Server][CRDM]File lock violation. NativeErr: -1025 SQLState: S1000 Msg: [Micro Focus][Relativity][SimbaLNA][Micro Focus][Relativity MF Server]Unable to open table: PEAF.---------------------------Aceptar ---------------------------   I appreciate your help in solving this error.

Anyone know why I would get this error?  The Slice utility gives the error but not the compiler.  It's as if the compiler found the WS file but the slice utility didn't.   k123.err = Error cobtoxml K123-WS   F:\\BIS\\KEVIN\\DB\\SRC>ECHO OFF Could Not Find F:\\BIS\\KEVIN\\DB\\SRC\\k123.err RM/COBOL Compiler - Version 12.13 for 32-Bit Windows. RM/COBOL Development System issued to AMI Inc. Configured for 5 users. AMI Inc. Copyright (c) 1985-2016 Micro Focus.  All rights reserved. Configured options:  O=..\\bin\\ L=..\\bin\\ Y=3 Registration number:   Total generated object size:      95022 (X"0001732E") bytes   Errors: 0, Warnings: 0, Lines: 208 for program K123XML.   Compilation complete -- Programs: 1, Errors: 0, Warnings: 0.   RM/COBOL Compiler - Version 12.13 for 32-Bit Windows. RM/COBOL Development System issued to AMI Inc. Configured for 5 users. AMI Inc. Copyright (c) 1985-2016 Micro Focus.

Hi.On some Windows 10 PCs I have been confronting a problem when my software executes the next instruction from a rm cobol program. In the majority of the PCs with which I work this instruction works perfectly, but in the new Windows it ignores the instruction and I can not open the text file. Does anyone have any suggestions to solve this problem? CALL "SYSTEM" USING QUE-TEXTO-OPEN            02 QUE-TEXTO-OPEN.              03 FILLER       PIC X(6) VALUE "WRITE ".              03 FILLER       PIC X(17) VALUE "../Programas-wow/".              03 FILLER       PIC X(13) VALUE "doc-inventar/".    &nbs

Is anybody connecting to relativity using Linux client to Linux server? If so how are doing this?

I can do a  set prop on “cols” to give me 10 columns call wowsetprop using win-return vsgrid-h         "cols" 10   But when I try to do a set prop on “ colposition” or “colhidden” just for example I keep getting errors.   call wowsetprop using win-return vsgridU-h "colposition" 0 2 this should move column 0 to column 2 but I get this error.   It is like only the simple properties you can set at run time. This is all totally new to me so any ideas would be appreciated.   thanks

Estimados  Disculpas por escribir en Español, pero a veces es dificil explicarse en otro idioma cuando la consulta es complicada. Un cliente tiene la misma FD de Archivo para nnn archivos físicos.. Es decir, por cada día tienen un archivo de Facturación, Items, N.Crédito, etc..  Lo hacen así por el enorme volumen de facturas emitidas diariamente.. El problema es que no se como hacer para crear un ODBC pero que permita ubicaciones dinámicas...   Se debe crear un catálogo o Tabla para cada día del mes ?   Existe alguna forma de que en base a la FD luego en la aplicación .NET uno pueda definir a que archivo físico conectarse ?   Imaginen si la aplicación .NET debe recorrer toda la facturación de 1 mes... debe abrir y cerrar 31 veces la misma tabla.   Espero puedan orientarme..   Muchas Gracias   Pablo Tilotta

Good afternoon, I was wondering if you might have any suggestions regarding an issue where multiple Windows workstations on a network that have a local versions of RMCOBOL (20 user license) installed are getting error 250's even though they have fewer than 20 sessions of RMCobol open.  When a workstation closes out, it is almost as if it is not releasing the license back into the pool for other users.  The issue is resolved by a reboot, but it is cumbersome and is inhibiting productivity.

Using the old WOWDataGrid.  Would like to use one that is a little more current.  We would like to move columns, sort columns, mouse wheel works in grid to scroll, and copy cell data to an Excel.  Does anyone have any suggestions on what control to look at.

"Hello" from Russell. Please allow me to ask for help with an RMCobol application using "HTTP Post" command. I apologize in advance for the lack of specific details.This is all I have to work with. I work for a company that provides a complete software package for automobile dealerships.My latest project, which was received on Oct 18, is to integrate our application with:Georgia Electronic Title and Registration System (GA-ETR) To be short & blunt:We requested the specs.We were sent a sample document, which is below. Nothing else. Just a sample document.We have requested credentails for: (1) Transaction.userName (2) Transaction.passwordand are still waiting The sample document contains this line:<form action= "georgia.qa.titletec.com/.../HTTPDealPost.aspx" method="POST" name="myform" id = "myform" > Judging by that line, it appears a command such as "HTTPPOst" would work.I created a "hack" program that would "inhale" the sample document into a "request" and attempt to post it

I have a question about clearing a pointer, please. I'm working on a program that uses a pointer.       01  REQUEST-PAYLOAD   usage pointer.       01  ZERO-LENGTH       PIC X VALUE x"00".       The program uses this command to set the pointer:SET REQUEST-PAYLOAD TO ADDRESS OF WK-CODE-BODY(1:CODE-LEN) The program uses this coomand to clear the pointer:SET REQUEST-PAYLOAD   TO ADDRESS OF ZERO-LENGTH My question:Is this the proper and most efficient way to clear a pointer set by the application? All advice, comments, and suggestions will be welcome.

I have a question about the proper use of RMNet command "NetFree", please. I'm working on a program that uses a pointer.       01  json-string                 pic x(80000).       01  PASS-1-DOCUMENT      usage pointer.       01  PASS-2-DOCUMENT      usage pointer. The program uses XML Extensions command:XML EXPORT TEXT    JSON-STRING    PASS-1-DOCUMENT    "JSON-STRING"    "json2xml.xsl" XML TRANSFORM TEXT    PASS-1-DOCUMENT    "json2xml2.xsl"    PASS-2-DOCUMENT The description of the "NetFree" command from the book states:A pointer given by RMNet that caller wishes to free. Use this function only fo