[Search for users] [Overall Top Noters] [List of all Conferences] [Download this site]

Conference dssdev::fmsnotes

Title: VAX FMS Notes
Notice:See note 675.* for info on FMS V2.4
Moderator:DRAGN::BOURQUARD
Created:Tue Feb 04 1986
Last Modified:Wed May 21 1997
Last Successful Update:Fri Jun 06 1997
Number of topics:1211
Total number of notes:4308

1201.0. "Bug in BASIC Sample program" by TLE::PUDER (Those who do not know LISP are doomed to reimplement it.) Mon Jan 20 1997 18:49

T.RTitleUserPersonal
Name
DateLines
1201.1yes...CSC32::C_BENNETTMon Jan 27 1997 11:3176
    
    Yes - this has been SPRed and should be corrected if there is ever a
    next release of FMS.   Details below...
    
    
[FMS]  Installing on Alpha Causes %BASIC-E-LINOUTORDE, BASIC-E-ENDNOOBJ

     Any party granted access to the following copyrighted information
     (protected under Federal Copyright Laws), pursuant to a duly executed
     Digital Service Agreement may, under the terms of such agreement copy
     all or selected portions of this information for internal use and
     distribution only. No other copying or distribution for any other
     purpose is authorized.
PRODUCT:    FMS Version 2.4

OP/SYS:     OpenVMS Alpha Version 6.1


SOURCE:   Digital Equipment Corporation


SYMPTOM:

Installing the full developement FMS kit on OpenVMS Alpha will generate
the following error when installing the FMS examples:

 $ CREATE /DIRECTORY SYS$SPECIFIC:[SYSTEST.FMS]
%DECFMS-I-STARTSAMP, Starting the Sample Application Programs installation...
267 ! fixed decimal.
^
%BASIC-E-LINOUTORDE, Line numbers are out of order
at line number 57 in file $2$DKC100:[SYS0.SYSUPD.DECFMS024]SAMP.BAS;1
%BASIC-E-ENDNOOBJ, $2$DKC100:[SYS0.SYSUPD.DECFMS024]SAMP.BAS;1 completed with 1
diagnostic - object deleted

The BASIC version of the VAX FMS Sample Application failed
to compile. See the VAX FMS Installation Guide for error recovery.

%DECFMS-I-CONTINUE, The installation procedure is continuing...
%LINK-W-RECTYP, file $2$DKC100:[SYS0.SYSUPD.DECFMS024]SAMP.OBJ;1 record 1 is
illegal (0.)
%LINK-W-RECTYP, file $2$DKC100:[SYS0.SYSUPD.DECFMS024]SAMP.OBJ;1 record 2 is
illegal (256.)


DIGITAL RESPONSE:

Engineering has acknowledged this problem and plans to address it in a
future release.


WORKAROUND:

Line number 267 in the SAMP.BAS file is out of sequence and should be
changed to line 286.  Edit this file, and correct the line number.

240     !-
245     MAP( DEPOSIT )  DEPOSIT$ = 60
250     MAP( DEPOSIT )  DEP.DATE$ =   7,        &
                        DEP.CURBAL$ = 6,        &
                        DEP.AMT$ =    6,        &
                        DEP.NEWBAL$ = 6,        &
                        DEP.MEMO$ =   35
260     !+
265     ! Money.
270     ! Note that all money is kept internally as integers (in cents).
275     ! It is only when the quantities are output that they look like
280     ! dollars, since all the money fields have periods as field
285     ! markers in the right places and they are right justified or
>>>267     ! fixed decimal.
290     !
305     ! Register data.
310     ! It would be most convenient to be able to define an array
315     ! of structures for the register, but it can't be done