include files

"James B. Byrne via Aubit4gl-discuss" <[email protected]> Wed, 16 Jun 2021 12:20:05 -0400
Newsgroups gmane.comp.lang.4gl.aubit.general
Message-ID <[email protected]>
I ran across this 4GL code sample in one of the IBM reference manuals:

GLOBALS
  "d4_globals.4gl"

Which contains a DATABASE declaration and a complete GLOBAL . . . END GLOBAL
code block.  I have tried to duplicate this feature with Aubit and have an
error generated by the c compiler.

My globals module contains these lines:

DATABASE stores_demo

GLOBALS
  DEFINE  gr_charges
    RECORD
      tax_rate      DECIMAL(5,3),
      ship_charge   DECIMAL(16,4),
#     ship_charge   LIKE orders.ship_charge,
      sales_tax     DECIMAL(16,4),
      order_total   DECIMAL(16,4)
    END RECORD
. . .
# other gr_record and gr_scalar DEFINESs follow.
. . .
END GLOBALS.

The include code in the main program is:

####
GLOBALS
  "mgbl_ex15.4gl"

####

The error I get is:

4glc ex15.4gl -o ex15.4ae
Error compiling ex15.4ae - check ex15.4ae.err
Failed command was: gcc  -rdynamic ex15.ao -o ex15.4ae -L"/opt/aubit4gl/lib" 
-laubit4gl-1.5_2   > ex15.4ae.err 2>&1
Exit code is: 256

[byrnejb_hll@vhost01 exercise-15 (master)]$ more ex15.4ae.err
/usr/local/bin/ld: ex15.ao: in function `init_module_variables':
ex15.c:(.text+0x86): undefined reference to `init_global_variables_mgblex15_9041'
/usr/local/bin/ld: ex15.ao: in function `aclfgl_add_order2':
ex15.c:(.text+0x60f1): undefined reference to `gr_orders'
/usr/local/bin/ld: ex15.c:(.text+0x6105): undefined reference to `gr_orders'
/usr/local/bin/ld: ex15.c:(.text+0x6119): undefined reference to `gr_orders'
/usr/local/bin/ld: ex15.c:(.text+0x612d): undefined reference to `gr_orders'
/usr/local/bin/ld: ex15.c:(.text+0x6141): undefined reference to `gr_orders'
/usr/local/bin/ld: ex15.c:(.text+0x6747): undefined reference to `gr_charges'
/usr/local/bin/ld: ex15.c:(.text+0x6756): undefined reference to `gr_charges'

What else am I supposed to do to get this feature to work?







-- 
***          e-Mail is NOT a SECURE channel          ***
        Do NOT transmit sensitive data via e-Mail
   Unencrypted messages have no legal claim to privacy
 Do NOT open attachments nor follow links sent by e-Mail

James B. Byrne                mailto:[email protected]
Harte & Lyne Limited          http://www.harte-lyne.ca
9 Brockley Drive              vox: +1 905 561 1241
Hamilton, Ontario             fax: +1 905 561 0757
Canada  L8E 3C3