Unanswered questions

Does anyone know if there is documentation on the “*** System error value = # *** errors? I see them pop up in my logs from time to time, but I’m not able to find what they mean in the AcuCOBOL documentation. I’m using 10.5.1 on RHEL if that matters.Thanks for your help!

When creating a new task or process, we create them in Zena Dev and then import them to Zena Prod. In the new process, the "Select Default Agent" list includes all agents from both Zena Prod and Zena Dev environments. However, when creating a new task in the Zena Dev Web Client, the list only displays agents available in the Zena Dev environment. How can we configure the list to include agents from both Prod and Dev environments?  Thanks.The first picture is the Select Agent list for new Task.  There is no zena-p-agent listed.  The second picture is the Select Agent list for new Process.  It includes zena-p-agent.   

we are experiencing some strange reactions in Accuterm like : In a Textbox, Multiline, enabled with word wrap.   In the projects properties we have chosen the button that says “ Same as Tab, except for multiline text or command button” on the “traits” tab.    When we use some of these fields (nearly most) when we use the “RETURN BUTTON”  the field did noy simply do a line return but closed the screen down The same type of field on the first screen works ok as expected Grid boxes have problems when using Combo Fields on the first column

E. Miroglio, a global leader in textiles with operations across Europe and Asia, faced major challenges with an aging, costly, and inflexible application environment. Their IT team struggled with:5,000 daily batch jobs requiring manual intervention Limited flexibility for innovation High infrastructure costsTo overcome these hurdles, E. Miroglio partnered with Rocket Software to modernize their platform using Rocket® Enterprise Server. The transformation included:Migrating to a flexible x86-based Linux platform with zero downtime Reusing over 12,000 COBOL programs Converting UNIX shell scripts back to JCL for easier managementResults:90% performance improvement in some departments 50% faster batch processing 50% infrastructure cost savingsThis case study is a great example of modernization without disruption, proving that legacy systems can evolve to meet today’s business demands.Read the full case study here 

Hello all!I’m adding variable data type protection to a subroutine label in a program I’m working on. However, I’m experiencing unexpected behavior when using the `DESCRINFO` function.Here is an example:* Set up some stuff here...IF RUN.MODE = "AUDIT" THEN EQUATE NUM.REPORTS TO 10 DIM REPORT.COUNTS(NUM.REPORTS) MAT REPORT.COUNTS = 0 GOSUB PREPARE.UTILITY.REPORTSENDLOOP * Do stuff here...UNTIL IS.DONE * Do other stuff here, maybe write to a report...REPEATIF RUN.MODE = "AUDIT" THEN GOSUB CLOSE.UTILITY.REPORTSEND* Other code here...STOPPREPARE.UTILITY.REPORTS: * Prepare reports, calling SETPTR and HEADING/FOOTING... RETURN; * Internal CLOSE.UTILITY.REPORTS: * HERE LIES MY ISSUE; THIS RETURNS 1 (INTEGER) BECAUSE OF THE 'MAT' ABOVE IF DESCRINFO(1, REPORT.COUNTS) # 5 THEN RETURN END * Close reports, print 'no data found' message if count = 0... RETURN; * Internal* Some other subroutines here...END; *ProgramHere is another example, simplified:DIM ARR.1(10)D

I installed the latest Personal Edition of Visual COBOL.I'm trying to create a class that inherits from base and I'm getting the message "Inherited class 'Type base' not found".How do I fix this?

Hello! I’m relatively new to UniVerse and Multi-valued databases, so my experience with BASIC is limited.I was writing a program with subroutine calls that I wanted to abstract via ‘@<var>’. This program had a “create output file data line” subroutine and a “finalize output file” subroutine. When I wrote these local subroutines (explicitly defined, not subroutine labels), I encountered an error where, when calling with ‘@’, only the first locally-defined subroutine would be found; the other subroutine would cause a runtime error, unable to be located. It was not found locally, and so the object database file (.O) was being searched, instead.For example:* ...IS.DONE = @FALSE* Main loopLOOP READNEXT FILE.NAME ELSE IS.DONE = @TRUE ENDUNTIL IS.DONE * ... OUPUT.FILE = "" PREPARE.DATA.SUBR = "" FINALIZE.FILE.SUBR = "" * case 1 BEGIN CASE CASE FILE.TYPE = TYPE.1 PREPARE.DATA.SUBR = "DO.SOMETHING.1" FINALIZE.FILE.SUBR = "END.FILE.1" CASE FILE.TYPE = TYP

I am receiving JSON from a third party and it contains a null value like below.  I call UDOGETPROPERTY for line_item_id and when I try to reference the return value I get Improper data type and my process terminates. How do I detect for the null value in the return value?  

HiThis is probably a question for Rocket mods.Customer is using an application that requires a runtime licence for uniface. They currently have the application and database on premise and use the Distributed Licence Manager to manage concurrent users.They wish to migrate the application and database to Oracle Cloud Infrastructure.What would be the implications for this with regards moving the DLM onto OCI, and would the licence itself need to change?They are on uniface 9.7.Thanks in advance,Clare

While deleting file in UniVerse using TCL - I get Unable to open "RC.OE.UPD.COGS.LOG" file.”I verified file exists…Here’s o/p from TCL LIST VOC 06:32:11am  30 Nov 2025  PAGE    1NAME.......... TYPE DESC..........................RC.OE.UPD.COGS F    F.LOG1 records listed. ;CT VOC RC.OE.UPD.COGS.LOG                                                                   RC.OE.UPD.COGS.LOG                     0001 F                                      0002 RC.OE.UPD.COGS.LOG                     0003 D_RC.OE.UPD.COGS.LOG                  ;DELETE.FILE DATA RC.OE.UPD.COGS.LOG        Unable to Open/Delete : RC.OE.UPD.COGS.LOG  ;SELECT RC.OE.UPD.COGS.LOG                  Unable to open "RC.OE.UPD.COGS.LOG" file.   ;                                            

Does anyone have an accurate handle on how and when AUTOLOGOUT triggers?   The manual says….Use AUTOLOGOUT to enable or disable automatic logout. With AUTOLOGOUT enabled, UniVerse logs you out automatically if you have not pressed a key within a specified time.But I don’t believe that is accurate.   We’ve had some confusing results in testing.   A process on a loop with periodic TIMEDATE() displays (output only) does not trigger.  Similarly a loop process with no screen output but just a SLEEP X also does not trigger even in between loops before it goes back to sleep.So, we are trying to understand the actual nuts and bolts of how/when it triggers.   Thanks for any help.Steve DouglasVP Systems AdminMBMS, LLC

HI, When we perform queries (select, delete, update) on a PostgreSQL database under Uniface, if the query returns nothing (0 for select, 0 for update, or 0 for delete), we get an error in the status return.exemple:"ERROR=-3·;MNEM=<UIOSERR_EXCEPTIONAL>·;DESCRIPTION=I/O error·;COMPONENT=B54R0022·;PROCNAME=B00_SQL·;TRIGGER=EXEC·;LINE=45·;PROCLINE=sql "%%$SQL$", "$def""requete update:update b50_article set rds_update=COALESCE(rds_update,0)+1, rds_version=COALESCE(rds_version,0)+1,rds_site_update='C1',bf_ancien=bf,bf_ancien_ref=bf_ref,bf=(select bf from b50_article a where a.marq=b50_article.marq and a.codeart=replace(b50_article.codeart,'DUP1','')),bf_ref=(select bf_ref from b50_article a where a.marq=b50_article.marq and  a.codeart=replace(b50_article.codeart,'DUP1','')),bf_date=(select bf_date from b50_article a where a.marq=b50_article.marq and a.codeart=replace(b50_article.codeart,'DUP1','')) where codeart like '%DUP1' and replace(b50_article.codeart,'DUP1','')=(select codeart fr

In RDi, I have LM(i) filters by user, object, and task#.  In VS Code, all I've managed to find is a list of every task# since the beginning of time.  How do I set up LM(i) filters in VS Code like I have in RDi? Thanks

Hello, we are migrating our Visual COBOL development for Eclipse from a AIX server to a Linux server. We have a utility to convert text from ASCII to UTF-8, but it has stopped working because the NATIONAL-OF function does not recognize UTF-8 characters in linux. the locale data are ----AIX LANG=CLC_COLLATE="C"LC_CTYPE="C"LC_MONETARY="C"LC_NUMERIC="C"LC_TIME="C"LC_MESSAGES="C"LC_ALL=-----LinuxLANG=CLC_CTYPE="C"LC_NUMERIC="C"LC_TIME="C"LC_COLLATE="C"LC_MONETARY="C"LC_MESSAGES="C"LC_PAPER="C"LC_NAME="C"LC_ADDRESS="C"LC_TELEPHONE="C"LC_MEASUREMENT="C"LC_IDENTIFICATION="C"LC_ALL=And the code of the utility is :       PROGRAM-ID. anook2       ENVIRONMENT DIVISION.       CONFIGURATION SECTION.       INPUT-OUTPUT SECTION.       file-control.           select futf8 assign to f-utf8                  organization line sequential                  status is io-estado.           select fascii assign to f-ascii                  organization line sequential                  status is io-estado.       

Hi,I'm testing the IMS sample application because I need a reference for a client's configuration. I follow the procedure described in the manual, which requires all fields to be ASCII, but when I enter MFDEMO, the fields coming from the program aren't ASCII. I debugged the program, and they are ASCII. I'm attaching a screenshot of what I see. Can you help me? What am I doing wrong?Thank you very much.

Where can I find documentation on how to configure where EXEC CICS WRITEQ data is stored?

I’m trying to find out what is required to implement Mobius View.  We currently use Document Direct.  Is a server required to use Mobius View?  If so, is that Mobius Server or is Mobius Server another “product”?  Not sure if they’re related.

Hi, we are working with MF visualcobol 8.0 and we want to read a big binary file. Asking for the use of the CBL_OPEN_FILE to the IA it say that we have to use this format, baut in te MF documentation don´t presents parameter Organization!--scriptorstartfragment-->CALL "CBL_OPEN_FILE"    USING BY VALUE 0              *> File handle (returned)          BY REFERENCE FILE-NAME  *> Nombre del fichero          BY VALUE 1              *> Mode: input          BY VALUE 4              *> Organization: binary          BY VALUE 0              *> Options    RETURNING STATUS-CODE. how must  we usei it!--scriptorendfragment-->

In native COBOL I make heavy use of the compile directive:CALLFH"ABCDEF"Where “ABCDEF” is  ABCDEF.GNT.Moving to COBOL .NET  and .NET Core, “ABCDEF” becomes a DLL but should it be a class or program?What is the benefit of either, if that’s an option?Neil

How do I import the folders, PDP, SBS from Dev environment to Prod environment?  There is no option to import folders to Zena Prod.     

Hi there.Hope you can help!I am trying to setup the profile so that when the user click clone on a tab it will autologin. I have tried recording a macro and then replaying the macro but this just opens a new window without connecting the terminal or logging in.If I go to script editor and press play it works as intended but I need this to work by right clicking the tab and cloning with an autologin. I am running AccuTerm 8.1 standard. Any help much appreciated!!Thanks

 Accuterm seems to allow greater that 31 days in a month for date fields !! Traits for a form - if we select return will wok in a multi line text box - we seem to just complete the form - not stay in the multi line box anybody seen these problems and are there answers ?

I get the following error when attempting to enter an entitlement ID:“The friendly name provided is already associated with the fingerprint of another machine. Resolution: provide a different friendly name that is unique to this machine, or return the license on the other machine, and then retry activating this entitlement.” However I cannot change the friendly name nor can I return the licence as do to a windows reinstall.Can anyone help?

We love that you can use OCCURS in the screen section and we use it quite frequently.Now - for the first time - we need a radio-button that gets its options from a table and we don’t know how to get the value.This is what we would like to use:78 T01-MAX VALUE 10.78 T01-GROUP VALUE 03.01 T01-RESULT PIC 9(02).01 T01-TABLE. 02 T01-RECORD OCCURS T01-MAX INDEXED BY T01. 03 T01-VI PIC 9(01). 03 T01-ID PIC 9(05). 03 T01-TITLE PIC X(40). 03 T01-VALUE PIC 9(02).01 SCRPP10-BILD. 02 LABEL LINE 10 VISIBLE 0. 02 OCCURS T01-MAX. 03 RADIO-BUTTON LINE + 1 COL 50 VISIBLE T01-VI ID T01-ID TITLE T01-TITLE GROUP T01-GROUP GROUP-VALUE

Hi, we are working with MF visualcobol 8.0 for Eclipse in linux  and we want to read a big binary file (.pdf , .-jpg,...) from the linux server and insert it into a sqlserver bbdd in a windows server.The program is compilede whit openesqlAsking for the use of the CBL_OPEN_FILE to the IA it say that we have to use this sintaxis, but in te MF documentation don´t presents parameter Organization CALL "CBL_OPEN_FILE"    USING BY VALUE 0              *> File handle (returned)          BY REFERENCE FILE-NAME  *> Nombre del fichero          BY VALUE 1              *> Mode: input          BY VALUE 4              *> Organization: binary          BY VALUE 0              *> Options    RETURNING STATUS-CODE. how must  we usei it ?