You can do that without attaching a routine. R09 enquiry can handle
such simple requirements....

On May 20, 9:45 am, Mohankumar Balasubramaniam
<[email protected]> wrote:
> HI,
>
> have you DEBUG and check whether the routine is trigering or not?
> Please put a debug and check the routine is working correctly.
>
> Regards,
> Mohan
>
>
>
>
>
> On Thu, May 20, 2010 at 4:46 PM, master <[email protected]> wrote:
> > 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
>
> --
> 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 
> athttp://groups.google.com/group/jBASE?hl=en

-- 
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