Dear Kent,

You mentioned the other day that you had done a system update and after
an
update you need to re-qeditfy the compilers:

For NM you follow the instructions below in the following paragraph from
the change notice:

   Installing the NM Interface
 
          Assuming  that  you have restored the Robelle files on your
system
          and  that  you  have   not   done   this   step   before,
stream
          Savecmdf.Qeditjob to make backup copies of the existing HP
command
          files in the Stdcmd.Sys group.  You need to know  the
Manager.Sys
          password.
 
               :stream savecmdf.qeditjob.robelle {wait for it to finish}
               :listf @.stdcmd.sys
 
          Then  stream  Qcompxl.Qeditjob  to  make  three (3) changes to
the
          Pub.Sys compiler command files:
 
               :stream qcompxl.qeditjob.robelle
 
          This job makes the  following  changes  to  the  compiler
command
          files:
 
          1. Change the run of the compiler program to
               ;xl ="qcompxl.pubnew.robelle, qcompxl.pub.robelle",
          2. Add ";shr" to the File commands for the text and master
files.
          3. Change  "setjcw jcw=fatal" to an invalid command so that
errors
             in either Qedit or MPE/iX will abort the command file.


If you still use CM compilers then look at streaming
qeditj1.qeditjob.robelle.

Neil Armstrong
Robelle

-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On
Behalf Of Kent Wallace
Sent: Wednesday, January 30, 2008 12:03 PM
To: [log in to unmask]
Subject: [HP3000-L] Compiling in QEDIT


When I compile my COBOL in QEDIT I get this message.  What format should
the file be in to prevent this error?

Kent Wallace


LINE #   SEQ # COL ERROR SEV            TEXT
------------------------------------------------------------------------
------
 00001          08  472  D  QEDIT FORMAT ENCOUNTERED FOR FILE COBTEXT .

1 ERROR(s), 0 QUESTIONABLE, 0 WARNING(s)  


My compile file looks like

:help cob85
USER DEFINED COMMAND FILE:  COB85.PUB.ADVANTA

FILE COBBUFF=COBBUFF.COBBUFF
cob85xl *,myobj,$null

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *