Focal Point
Dropping records???

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/7511030091

October 09, 2006, 04:36 PM
Glenda
Dropping records???
Here's what's happening: The file has 1,059,119 records, when run without exclusions my query returns 1,046,296 records. So somehow it's dropping 12,823 records. I don't believe it's the master file definition because the query is returning data and if the M.F.D was the problem it shouldn't work.

The code is a simple pull

-*******************************************************************************
-* TITLE : FOCEXEC (HSSPRO)
-* SYSTEM : HEALTH
-* AUTHOR : GLENDA STURM
-* DATE WRITTEN : 09/07/2006
-* DESCRIPTION : STANDARD LIFE CLAIMS DATA
-* INPUT FILES : /edadata/taxes/devl/srec2006
-* OUTPUT FILES : LOTUS FILE
-*******************************************************************************
-* --------- PURPOSE ---------
-*
-* This report contains the programmer's pull by provider tin#.
-* It will be joined to the output from the FOCUS report
-* gp5b02.focexec.data(box61099) to tie tin#'s to the ledger data.
-*
-*******************************************************************************
-* --------- CHANGE LOG ---------
-*******************************************************************************
-* G/H Q/L
-*******************************************************************************
-SET &NOW = &YYMD;
-SET &TODAY = CHGDAT('YYMD', 'MDYYX', &YYMD, '17');
-*******************************************************************************
-* 2(Detail) or 2(Summary)
-SET &OUTPUT='1';
-* A(ntex Med Sup) or S(LAICO)
-SET &SYSDET='S';
-SET &PRD = 'PROD'||&SYSDET;
-GOTO &PRD
-PRODA
FILEDEF ARCN1099 DISK /edadata/taxes/devl/arec2006
-GOTO BODY
-PRODS
FILEDEF ARCN1099 DISK /edadata/taxes/devl/srec2006
-GOTO BODY
-BODY


TABLE FILE ARCN1099
PRINT
RECTYP
PROVTP
TIN
TRANTP
PAYNAM
CHECKNO
CHKAMT
CHKDTE
ADDRESS1
ADDRESS2
CITY
STATE
ZIP
CLMNO
WHAMT
-*WHERE RECTYP EQ '&OUTPUT'
ON TABLE PCHOLD FORMAT LOTUS
END


Glenda

In FOCUS Since 1990
Production 8.2 Windows
October 09, 2006, 09:19 PM
TexasStingray
try using Recordformat and recordlength in your FILEDEF

..... (REC F LRECL 233

Sub your values




Scott

Are you aware that you have a reserved word "rectyp" in your master? Rectyp is usually followed with alias = 'value'. It could be that those extra records are not defined. Suppose you have multiple rectyps of A,B, and C. Suppose again that only the B rectyp is defined. When you do your table request only the B rectyps are returned and the other undefined rectyps are ignored. The 12k+ records could be the other undefined rectyps (in this example the A's and B's).

ET


FOCUS 7.6 MVS PDF,HTML,EXCEL
I have changed "Rectyp" to "Detsum" and still the same results.

And to be honest, I can make the code do just about anything. When it comes to MFDs, I'm a newbie. I have no idea what you mean by:

try using Recordformat and recordlength in your FILEDEF

..... (REC F LRECL 233


The prgrammers say call IBI, but I see faster responses here.


Glenda

In FOCUS Since 1990
Production 8.2 Windows
If your Master is for a flat, CSV, VSAM or other non DBMS file, errors in the Master will not necessarily cause an error in the fex, the program may return results with or without displaying error messages (such as field format errors). Check the Master.


Francis


Give me code, or give me retirement. In FOCUS since 1991

Production: WF 7.7.05M, Dev Studio, BID, MRE, WebSphere, DB2 / Test: WF 8.1.05M, App Studio, BI Portal, Report Caster, jQuery, HighCharts, Apache Tomcat, MS SQL Server