Menu

little help errors stuck on project

J McNamara
2024-12-27
2024-12-27
  • J McNamara

    J McNamara - 2024-12-27

    Hi-

    I am trying to compile cobjapi like this with my gixsql but it isnt cooperating the last line of compile is

    cobc -x dialog.cbsql cobjapi.o japilib.o imageio.o fileselect.o -L"c:\msys64\mingw64\bin\gcc" -L"c:\msys64\opt\gixsql\lib" -L"c:\msys64\mingw64\bin" -lgixsql -lws2_32

    Any help is greatly appreciated. I have tried the free switch with
    the cobc and it doesnt work. It said in the docs to use free on
    a sample on brians faq site but i think gix wanted fixed.

    btw cobjapi once i figure out the formatting cranks out some nice demos.
    i just cant get it to play nice with gixsql. THANKS

    main.cobc:751: error: continuation character expected
    main.cobc:8: error: PROCEDURE DIVISION header missing
    main.cobc:8: error: syntax error, unexpected intrinsic function name
    main.cobc:242: error: syntax error, unexpected SPECIAL-NAMES
    main.cobc:243: error: syntax error, unexpected Mnemonic name
    main.cobc:244: error: syntax error, unexpected CRT
    main.cobc:250: error: syntax error, unexpected DATA
    main.cobc:251: error: syntax error, unexpected WORKING-STORAGE
    main.cobc:261: error: unknown statement '01'
    main.cobc:262: error: unknown statement '01'
    main.cobc:263: error: unknown statement '01'

    >> SOURCE FORMAT IS fixed 
           IDENTIFICATION DIVISION.
           PROGRAM-ID. dialog.
           ENVIRONMENT DIVISION.
           configuration section.
               REPOSITORY.
               FUNCTION ALL INTRINSIC.
               FUNCTION J-ADD
               FUNCTION J-ADDITEM
               FUNCTION J-ADDNODE
               FUNCTION J-ADDROW
               FUNCTION J-ADDTAB
               FUNCTION J-ADDTABWITHICON
               FUNCTION J-ALERTBOX
               FUNCTION J-APPENDTEXT
               FUNCTION J-BEEP
               FUNCTION J-BORDERPANEL
               FUNCTION J-BUTTON
               FUNCTION J-CANVAS
               FUNCTION J-CHECKBOX
               FUNCTION J-CHECKMENUITEM
               FUNCTION J-CHOICE
               FUNCTION J-CHOICEBOX2
               FUNCTION J-CHOICEBOX3
               FUNCTION J-CLEARTABLE
               FUNCTION J-CLIPRECT
               FUNCTION J-COMPONENTLISTENER
               FUNCTION J-CONNECT
               FUNCTION J-DELETE
               FUNCTION J-DESELECT
               FUNCTION J-DESKTOPPANE
               FUNCTION J-DIALOG
               FUNCTION J-DISABLE
               FUNCTION J-DISABLEDOUBLECLICK
               FUNCTION J-DISPOSE
               FUNCTION J-DRAWARC
               FUNCTION J-DRAWCIRCLE
               FUNCTION J-DRAWIMAGE
               FUNCTION J-DRAWIMAGESOURCE
               FUNCTION J-DRAWLINE
               FUNCTION J-DRAWOVAL
               FUNCTION J-DRAWPIXEL
               FUNCTION J-DRAWPOLYGON
               FUNCTION J-DRAWPOLYLINE
               FUNCTION J-DRAWRECT
               FUNCTION J-DRAWROUNDRECT
               FUNCTION J-DRAWSCALEDIMAGE
               FUNCTION J-DRAWSTRING
               FUNCTION J-ENABLE
               FUNCTION J-ENABLEDOUBLECLICK
               FUNCTION J-FILEDIALOG
               FUNCTION J-FILESELECT
               FUNCTION J-FILLARC
               FUNCTION J-FILLCIRCLE
               FUNCTION J-FILLOVAL
               FUNCTION J-FILLPOLYGON
               FUNCTION J-FILLRECT
               FUNCTION J-FILLROUNDRECT
               FUNCTION J-FOCUSLISTENER
               FUNCTION J-FORMATTEDTEXTFIELD
               FUNCTION J-FRAME
               FUNCTION J-GETACTION
               FUNCTION J-GETCOLUMNS
               FUNCTION J-GETCURPOS
               FUNCTION J-GETDANGER
               FUNCTION J-GETFONTASCENT
               FUNCTION J-GETFONTHEIGHT
               FUNCTION J-GETHEIGHT
               FUNCTION J-GETIMAGE
               FUNCTION J-GETIMAGESOURCE
               FUNCTION J-GETINHEIGHT
               FUNCTION J-GETINSETS
               FUNCTION J-GETINWIDTH
               FUNCTION J-GETITEM
               FUNCTION J-GETITEMCOUNT
               FUNCTION J-GETKEYCHAR
               FUNCTION J-GETKEYCODE
               FUNCTION J-GETLAYOUTID
               FUNCTION J-GETLENGTH
               FUNCTION J-GETMOUSEBUTTON
               FUNCTION J-GETMOUSEPOS
               FUNCTION J-GETMOUSEX
               FUNCTION J-GETMOUSEY
               FUNCTION J-GETPARENTID
               FUNCTION J-GETPOS
               FUNCTION J-GETROWS
               FUNCTION J-GETSCALEDIMAGE
               FUNCTION J-GETSCREENHEIGHT
               FUNCTION J-GETSCREENWIDTH
               FUNCTION J-GETSELECT
               FUNCTION J-GETSELEND
               FUNCTION J-GETSELSTART
               FUNCTION J-GETSELTEXT
               FUNCTION J-GETSTATE
               FUNCTION J-GETSTRINGWIDTH
               FUNCTION J-GETTEXT
               FUNCTION J-GETVALUE
               FUNCTION J-GETVIEWPORTHEIGHT
               FUNCTION J-GETVIEWPORTWIDTH
               FUNCTION J-GETWIDTH
               FUNCTION J-GETXPOS
               FUNCTION J-GETYPOS
               FUNCTION J-GRAPHICBUTTON
               FUNCTION J-GRAPHICLABEL
               FUNCTION J-HASFOCUS
               FUNCTION J-HELPMENU
               FUNCTION J-HIDE
               FUNCTION J-HSCROLLBAR
               FUNCTION J-IMAGE
               FUNCTION J-INITIALIZE
               FUNCTION J-INSERT
               FUNCTION J-INSERTTEXT
               FUNCTION J-INTERNALFRAME
               FUNCTION J-ISPARENT
               FUNCTION J-ISRESIZABLE
               FUNCTION J-ISSELECT
               FUNCTION J-ISVISIBLE
               FUNCTION J-KEYLISTENER
               FUNCTION J-KILL
               FUNCTION J-LABEL
               FUNCTION J-LED
               FUNCTION J-LINE
               FUNCTION J-LIST
               FUNCTION J-LOADIMAGE
               FUNCTION J-MENU
               FUNCTION J-MENUBAR
               FUNCTION J-MENUITEM
               FUNCTION J-MESSAGEBOX
               FUNCTION J-METER
               FUNCTION J-MOUSELISTENER
               FUNCTION J-MULTIPLEMODE
               FUNCTION J-NEXTACTION
               FUNCTION J-NODE
               FUNCTION J-PACK
               FUNCTION J-PANEL
               FUNCTION J-PLAY
               FUNCTION J-PLAYSOUNDFILE
               FUNCTION J-POPUPMENU
               FUNCTION J-PRINT
               FUNCTION J-PRINTER
               FUNCTION J-PROGRESSBAR
               FUNCTION J-QUIT
               FUNCTION J-RADIOBUTTON
               FUNCTION J-RADIOGROUP
               FUNCTION J-RANDOM
               FUNCTION J-RELEASE
               FUNCTION J-RELEASEALL
               FUNCTION J-REMOVE
               FUNCTION J-REMOVEALL
               FUNCTION J-REMOVEITEM
               FUNCTION J-REPLACETEXT
               FUNCTION J-SAVEIMAGE
               FUNCTION J-SCROLLPANE
               FUNCTION J-SELECT
               FUNCTION J-SELECTALL
               FUNCTION J-SELECTTEXT
               FUNCTION J-SEPARATOR
               FUNCTION J-SETALIGN
               FUNCTION J-SETBLOCKINC
               FUNCTION J-SETBORDERLAYOUT
               FUNCTION J-SETBORDERPOS
               FUNCTION J-SETCOLOR
               FUNCTION J-SETCOLORBG
               FUNCTION J-SETCOLUMNS
               FUNCTION J-SETCOLUMNWIDTHS
               FUNCTION J-SETCURPOS
               FUNCTION J-SETCURSOR
               FUNCTION J-SETDANGER
               FUNCTION J-SETDEBUG
               FUNCTION J-SETECHOCHAR
               FUNCTION J-SETEDITABLE
               FUNCTION J-SETFIXLAYOUT
               FUNCTION J-SETFLOWFILL
               FUNCTION J-SETFLOWLAYOUT
               FUNCTION J-SETFOCUS
               FUNCTION J-SETFONT
               FUNCTION J-SETFONTNAME
               FUNCTION J-SETFONTSIZE
               FUNCTION J-SETFONTSTYLE
               FUNCTION J-SETGRIDCOLOR
               FUNCTION J-SETGRIDLAYOUT
               FUNCTION J-SETGRIDNAMEDCOLOR
               FUNCTION J-SETHEADERCOLOR
               FUNCTION J-SETHEADERCOLORBG
               FUNCTION J-SETHEADERNAMEDCOLOR
               FUNCTION J-SETHEADERNAMEDCOLORBG
               FUNCTION J-SETHGAP
               FUNCTION J-SETICON
               FUNCTION J-SETIMAGE
               FUNCTION J-SETINSETS
               FUNCTION J-SETMAX
               FUNCTION J-SETMIN
               FUNCTION J-SETNAMEDCOLOR
               FUNCTION J-SETNAMEDCOLORBG
               FUNCTION J-SETNOLAYOUT
               FUNCTION J-SETPORT
               FUNCTION J-SETPOS
               FUNCTION J-SETRADIOGROUP
               FUNCTION J-SETRESIZABLE
               FUNCTION J-SETROWS
               FUNCTION J-SETSHORTCUT
               FUNCTION J-SETSIZE
               FUNCTION J-SETSLIDESIZE
               FUNCTION J-SETSPLITPANELEFT
               FUNCTION J-SETSPLITPANERIGHT
               FUNCTION J-SETSTATE
               FUNCTION J-SETTEXT
               FUNCTION J-SETTREEBGNONSELCOLOR  
               FUNCTION J-SETTREEBGNONSELNAMEDCOLOR
               FUNCTION J-SETTREEBGSELCOLOR     
               FUNCTION J-SETTREEBGSELNAMEDCOLOR
               FUNCTION J-SETTREEBORDERSELCOLOR 
               FUNCTION J-SETTREEBORDERSELNAMEDCOLOR
               FUNCTION J-SETTREETEXTNONSELCOLOR
               FUNCTION J-SETTREETEXTNONSELNAMEDCOLOR
               FUNCTION J-SETTREETEXTSELCOLOR   
               FUNCTION J-SETTREETEXTSELNAMEDCOLOR
               FUNCTION J-SETUNITINC
               FUNCTION J-SETVALUE
               FUNCTION J-SETVGAP
               FUNCTION J-SETXOR
               FUNCTION J-SEVENSEGMENT
               FUNCTION J-SHOW
               FUNCTION J-SHOWPOPUP
               FUNCTION J-SLEEP
               FUNCTION J-SOUND
               FUNCTION J-SPLITPANE
               FUNCTION J-START
               FUNCTION J-SYNC
               FUNCTION J-TABBEDPANE
               FUNCTION J-TABLE
               FUNCTION J-TEXTAREA
               FUNCTION J-TEXTFIELD
               FUNCTION J-TITLEDCOLORPANEL
               FUNCTION J-TITLEDNAMEDCOLORPANEL
               FUNCTION J-TRANSLATE
               FUNCTION J-TREE
               FUNCTION J-TOFRONT
               FUNCTION J-VSCROLLBAR
               FUNCTION J-WINDOW
               FUNCTION J-WINDOWLISTENER.
           special-names.
            console is crt.
            crt status is screen-status.
    
    
    
    
    
           DATA DIVISION.
           WORKING-STORAGE SECTION.
    
    
    
    
    
    
    
    
    
           01 J-ERROR                            BINARY-LONG SIGNED VALUE 1.
           01 J-TRUE                             BINARY-LONG SIGNED VALUE 1.
           01 J-FALSE                            BINARY-LONG SIGNED VALUE 0.
    
    
           01 J-LEFT                             BINARY-LONG SIGNED VALUE 0.
           01 J-CENTER                           BINARY-LONG SIGNED VALUE 1.
           01 J-RIGHT                            BINARY-LONG SIGNED VALUE 2.
           01 J-TOP                              BINARY-LONG SIGNED VALUE 3.
           01 J-BOTTOM                           BINARY-LONG SIGNED VALUE 4.
           01 J-TOPLEFT                          BINARY-LONG SIGNED VALUE 5.
           01 J-TOPRIGHT                         BINARY-LONG SIGNED VALUE 6.
           01 J-BOTTOMLEFT                       BINARY-LONG SIGNED VALUE 7.
           01 J-BOTTOMRIGHT                      BINARY-LONG SIGNED VALUE 8.
    
    
           01 J-DEFAULT-CURSOR                   BINARY-LONG SIGNED VALUE 0.
           01 J-CROSSHAIR-CURSOR                 BINARY-LONG SIGNED VALUE 1.
           01 J-TEXT-CURSOR                      BINARY-LONG SIGNED VALUE 2.
           01 J-WAIT-CURSOR                      BINARY-LONG SIGNED VALUE 3.
           01 J-SW-RESIZE-CURSOR                 BINARY-LONG SIGNED VALUE 4.
           01 J-SE-RESIZE-CURSOR                 BINARY-LONG SIGNED VALUE 5.
           01 J-NW-RESIZE-CURSOR                 BINARY-LONG SIGNED VALUE 6.
           01 J-NE-RESIZE-CURSOR                 BINARY-LONG SIGNED VALUE 7.
           01 J-N-RESIZE-CURSOR                  BINARY-LONG SIGNED VALUE 8.
           01 J-S-RESIZE-CURSOR                  BINARY-LONG SIGNED VALUE 9.
           01 J-W-RESIZE-CURSOR                  BINARY-LONG SIGNED VALUE 10.
           01 J-E-RESIZE-CURSOR                  BINARY-LONG SIGNED VALUE 11.
           01 J-HAND-CURSOR                      BINARY-LONG SIGNED VALUE 12.
           01 J-MOVE-CURSOR                      BINARY-LONG SIGNED VALUE 13.
    
           01 J-HORIZONTAL                       BINARY-LONG SIGNED VALUE 0.
           01 J-VERTICAL                         BINARY-LONG SIGNED VALUE 1.
    
     

    Last edit: Simon Sobisch 2024-12-27
  • Simon Sobisch

    Simon Sobisch - 2024-12-27

    As noted by Arnold in the other thread: you overflow column 72, in this case with
    01 J-W-RESIZE-CURSOR BINARY-LONG SIGNED VALUE 10. - the period is outside of the coding area.

    Add -Wcolumn-overflow or even -Werror=column-overflow if your code does not use comments or markers in the area to the right of the code (for new code: if it is it is best if this starts with an inline comment marker *> in any case - as this allows easier change to other formats later).

     
    • J McNamara

      J McNamara - 2024-12-27

      thanks for the cool error checking routine. I will be looking at this tomorrow with great anticipation. but first... a small delay.

      later

       

Anonymous
Anonymous

Add attachments
Cancel





Want the latest updates on software, tech news, and AI?
Get latest updates about software, tech news, and AI from SourceForge directly in your inbox once a month.