Brian:

A) Yes
B) No

So I created the associations and improvement has been noticed.  Now I get:

:SORT BANKBOOK WITH CLIENTNO  = "9800""9900" AND WITH YRMO = "200411"
BY-EXP CLIENTNO ID-SUPP CLIENTNO BREAK-ON CNAME0 "Totals: 'UV'" BNAMES
ATYPE_DESCS TOTAL CURRBAL
CLNT# NAME.......................... TYPEDESC....... CURR BAL.....

 9800 KEY BANK OF CALIFORNIA         Checking            57,482.04
                                                     -------------
      PAYROLL TRUST ACCOUNT                               57,482.04

 9900 KEY BANK OF CALIFORNIA         Checking           -64,729.34
 9900 KEY BANK OF CALIFORNIA         Checking              -925.00
                                                     -------------
      PROPERTY MANAGEMENT CORP.                          -65,654.34

                                                     =============
TOTAL                                                    -8,172.30
3 records listed

The "CNAME0" dictionary looks like:

AE DICT BANKBOOK CNAME0
Top of "CNAME0" in "DICT BANKBOOK", 7 lines, 113 characters.
*--: P
001: I The client name in a zero width field
002: TRANS( "MASTER", CLIENTNO, 1, "X" ) ; SUBR( "D.NAMELFM", @1 )
003:
004:
005: 0L
006: M
007: AS_2
Bottom.

If I resize this dictionary item to 30 and do the same query as above I get:

CLNT# CNAME0........................ NAME..........................
TYPEDESC....... CURR BAL.....

 9800 PAYROLL TRUST ACCOUNT          KEY BANK OF CALIFORNIA         Checking
57,482.04
      Totals: PAYROLL TRUST ACCOUNT
-------------
      PAYROLL TRUST ACCOUNT
57,482.04

 9900 PROPERTY MANAGEMENT CORP.      KEY BANK OF CALIFORNIA         Checking
-64,729.34
 9900 PROPERTY MANAGEMENT CORP.      KEY BANK OF CALIFORNIA         Checking
-925.00
      Totals: PROPERTY MANAGEMENT CORP.
-------------
      PROPERTY MANAGEMENT CORP.
-65,654.34

 
=============
TOTAL
-8,172.30
3 records listed

Now this is close, but there are a few obvious problems:

1) The break-on value is displayed, and
2) When I set the width to zero it still displays and the "Totals: 'UV'"
label is suppressed/overwritten.

I've fiddled with UDT.OPTIONS 25, 28, 43, and 98 with no solution.  I turn
on  UDT.OPTIONS 3, 7, 15, 23, 48, 54, 56, 66, 75, 78, 83, 89, 92, 104, and
114 (per Pick compatibility documentation) and ECLTYPE P and BASICTYPE "P"
in the "LOGIN" (VOC) item.

In Pick, one suppresses the column output of value "CNAME0" by setting the
column heading to "\" and a width of 0.  e.g.

DICT BANKBOOK  'CNAME0' size = 115
01 S
02 1
03 \
04
05
06
07
08 F1;(TMASTER;X;;1);(CALL DTABP D.NAMELFM)
09 L
10 0

but it still can display in a break "Totals: 'UV'" label.  Do you know the
"trick" I need to follow to SUPPRESS this break value and print the break-on
label?  As always, thanks.

Bill
 

> -----Original Message-----
> From: [EMAIL PROTECTED] 
> [mailto:[EMAIL PROTECTED] On Behalf Of 
> [EMAIL PROTECTED]
> Sent: Wednesday, February 08, 2006 2:08 AM
> To: u2-users@listserver.u2ug.org
> Subject: RE: [U2] [UD] Break-on
> 
> Bill
> 
> First thoughts:
> 
> Are the PLANTNOS and CURRBAL fields
> a) explicitly set to multivalued (M in field 6) and
> b) associated using an association phrase?
> 
> UniData can be very literal about such things ...
> 
> Brian 
> 
> >
> >I have a report I've been running in a Pick environment for years 
> >without problems.  The data, using ECLTYPE P on UniData, looks like:
> >
> >[UNIDATA]
> >SORT BANKBOOK WITH PLANTNOS  = "9800""9900" AND WITH YRMO = 
> "200411"  
> >BY PLANTNOS PLANTNOS TOTAL CURRBAL 22:45:48 Feb 07 2006 1 
> BANKBOOK... 
> >PLNT# CURR BAL.....
> >
> >28*200411    9800     57,482.04
> >             9900       -925.00
> >15*200411    9900    -64,729.34
> >                   =============
> >TOTAL                 -8,172.30
> >2 records listed
> >
> >One account has two plants associated with it while the 
> other one has 
> >only one plant associated with it.  On a Pick machine I do 
> the following:
> >
> >[D3]
> >:SSCROLL BANKBOOK WITH PLANTNOS = "9800""9900" AND WITH YRMO 
> = "200411"
> >BY-EXP PLANTNOS BY ATYPE_ACCTNO BY ATYPE_DESC ID-SUPP 
> PLANTNOS BREAK-ON 
> >PNAME0 "Totals: 'UV'" BNAMES ATYPE_DESCS ATYPE_ACCTNOS TOTAL CURRBAL
> >
> >Command => SORT  BANKBOOK                 22:52:24  07 Feb 2006
> >PLNT# Name.......................... TypeDesc.. GLAcct CURR BAL.....
> >
> > 9800 KEY BANK OF CALIFORNIA         Checking     4000     57,482.04
> >                                                       -------------
> >      Totals: PAYROLL TRUST ACCOUNT                        57,482.04
> >
> > 9900 KEY BANK OF CALIFORNIA         Checking     4000    -64,729.34
> > 9900 KEY BANK OF CALIFORNIA         Checking     4000       -925.00
> >                                                       -------------
> >      Totals: PROPERTY MANAGEMENT CORP.                   -65,654.34
> >
> >                                                           -8,172.30
> >
> >[405] 3 items listed out of 1089 items.
> >
> >This doesn't even come close to working in UniData; although 
> it works 
> >fine in UniVerse.  I'm running in ECLTYPE P.  It looks like:
> >
> >[UNIDATA]
> >SORT BANKBOOK WITH PLANTNOS  = "9800""9900" AND WITH YRMO = 
> "200411"  
> >BY-EXP PLANTNOS ID-SUPP BREAK-ON PLANTNOS " 'DL'" CURRBAL PLNT# CURR 
> >BAL.....
> >
> > 9800     57,482.04
> >            -925.00
> >
> > 9900    -64,729.34
> > 9900     57,482.04
> >            -925.00
> >
> >3 records listed
> >
> >[UNIVERSE]
> >SORT BANKBOOK BY-EXP PLANTNOS ID-SUPP BREAK-ON PLANTNOS " 
> "DL"" CURRBAL 
> >PLNT# CURR BAL.....
> >
> > 9800     57,482.04
> >
> > 9900    -64,729.34
> > 9900       -925.00
> >
> >
> >3 records listed.
> >
> >I've been fiddling with this for quite a while and am 
> obviously missing 
> >something.  Can anyone help.  Thanks.
> >
> >Bill Haskett
> >Advantos Systems, Inc.
> >www.advantos.net
> >(760)944-5570 (CA)
> >(360)923-4838 (WA)
> >-------
> >u2-users mailing list
> >u2-users@listserver.u2ug.org
> >To unsubscribe please visit http://listserver.u2ug.org/
> -------
> u2-users mailing list
> u2-users@listserver.u2ug.org
> To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to