Hi,

Has anything changed in R09 with respect to calling BUILD or
CONVERSION routines in R09?

I have attached a build routine that should return records whose
Working Balance fall within a certain range for the categories 1001
and 6001. The restrictions are not applied when I run the enquiry -
all records are returned irrespective of the working balance.

Here is the routine

      SUBROUTINE E.ACWB.BUILD.RTN(ENQ.DATA)
$INSERT I_COMMON
$INSERT I_EQUATE
$INSERT I_ENQUIRY.COMMON
      LOCATE 'CATEGORY' IN ENQ.DATA<2,1> SETTING Y.CAT.POS ELSE NULL
      Y.CATEGORY = ENQ.DATA<4,Y.CAT.POS>
      LOCATE 'WORKING.BALANCE' IN ENQ.DATA<2,1> SETTING Y.WBAL ELSE
NULL
      ENQ.DATA<3,Y.WBAL> = 'RG'
      IF Y.CATEGORY = 1001 THEN ENQ.DATA<4,Y.WBAL> = '10 50000'
      IF Y.CATEGORY = 6001 THEN ENQ.DATA<4,Y.WBAL> = '1000 100000'
      RETURN
   END

And it is attached to the enquiry as below:

 
------------------------------------------------------------------------------
   1 PAGE.SIZE ........ 4,19
   2 FILE.NAME......... ACCOUNT
   6. 1 SELECTION.FLDS. CATEGORY
   8. 1 SEL.FLD.OPER... EQ
   9. 1 REQUIRED.SEL... Y
  12. 1 BUILD.ROUTINE.. E.ACWB.BUILD.RTN
  14. 1 FIELD.NAME..... @ID
  15. 1. 1 OPERATION... @ID
  16. 1 COLUMN......... 1
  17. 1 LENGTH.MASK.... 16R
  22. 1. 1 GB FIELD.LBL ACCOUNT NO
  35. 1 SINGLE.MULTI... S
  14. 2 FIELD.NAME..... CUSTOMER
  15. 2. 1 OPERATION... CUSTOMER
  16. 2 COLUMN......... 20
  17. 2 LENGTH.MASK.... 10R

-- 
Please read the posting guidelines at: 
http://groups.google.com/group/jBASE/web/Posting%20Guidelines

IMPORTANT: Type T24: at the start of the subject line for questions specific to 
Globus/T24

To post, send email to [email protected]
To unsubscribe, send email to [email protected]
For more options, visit this group at http://groups.google.com/group/jBASE?hl=en

Reply via email to