🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.misc
Article #780

Vax Cobol/SMG guru needed

#780
From: Dave Gresham
Date: Wed, 13 Dec 1989 02:05
40 lines
1745 bytes
I have tried asking this question in Comp.os.vms, but maybe
someone here can direct me to the right place.  I have been
over the vms system services manual and others but still
cant get the folowing situation to work. 

I am trying to work with the smg$create_menu routine.  Basically
what i am attempting to accomplish is a cobol version of the fortran
program written in the run time library manual(page smg-340).

the program i am writing is a variation of the above.  Here
is my data division

01 menus.
   02 MENU-FIELDS.
      05 FILLER		PIC X(9) VALUE 'NORTHWEST'.
       05 FILLER		PIC X(9) VALUE 'NORTH    '.
       05 FILLER		PIC X(9) VALUE 'NORTHEAST'.
       05 FILLER		PIC X(9) VALUE 'WEST     '.
       05 FILLER		PIC X(9) VALUE 'EQUATOR  '.
       05 FILLER		PIC X(9) VALUE 'EAST     '.
       05 FILLER         PIC X(9) VALUE 'SOUTHWEST'.
       05 FILLER		PIC X(9) VALUE 'SOUTH    '.
      05 FILLER		PIC X(9) VALUE 'SOUTHEAST'.

PROCEDURE DIVISION EXTRACTS


        CALL 'SMG$CREATE_MENU' USING DISPLAY1,
	   BY DESCRIPTOR MENU-FIELDS
	   GIVING MF-RET-COND.

I am getting the error smg$inv_arg on this line of code.
I have talked to others, but they seem to be stumped on
this as well.

any help would be would be appreciated.  Replies to me and if 
there is interest I will summarize.

dave
dbg@scubed.scubed.com
Technical Details
Message-ID: <145@scubed.SCUBED.COM>
Path: arc1-ca.pugleaf.net!utzoo!attcan!utgpu!jarvis.csri.toronto.edu!clyde.concordia.ca!uunet!lll-winken!uwm.edu!uakari.primate.wisc.edu!samsung!think!ames!scubed!dbg

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!attcan!utgpu!jarvis.csri.toronto.edu!clyde.concordia.ca!uunet!lll-winken!uwm.edu!uakari.primate.wisc.edu!samsung!think!ames!scubed!dbg
From: dbg@scubed.COM (Dave Gresham)
Newsgroups: comp.lang.misc
Subject: Vax Cobol/SMG guru needed
Message-ID: <145@scubed.SCUBED.COM>
Date: 13 Dec 89 02:05:45 GMT
Organization: Scubed Inc., San Diego CA.
Lines: 40