Re: PGM assist?

You could just CRTDUPOBJ to create the UXSRCHM file and compile against it.
Nothing says it has to point to the live file for a compile.

--Paul E Musselman
PaulMmn@ix.netcom.com

>Hello all,
>Look at this program:
>For all you smart people just FFW to the MAIN QUESTION AREA below.
>F*****************************************************************
>F*
>F*   PROGRAM NAME: TESTFUPD3
>F*   DESCRIPTION:  UPDATE JOB
>F*   PROGRAMMER:   TIM TRUAX
>F*   DATE CREATED: 10/08/1997
>F*
>F*   COMMENT:  TAKE LOW CASE ITEMS AND CONVERT TO UPPER CASE.
>F*
>F*****************************************************************
>FUSSRCHM IP  E                    DISK
>FUXSRCHM UF  E                    DISK
>F            SRCHM                             KRENAMESRCX
>
>Here are the salient points:
>1) Writing program to update (WITHOUT LOCKING) this major file.(USSRCHM)
>2) USSRCHM is an actual externally defined file, used heavily during
>day.
>3) I am only going to be updating about 1000 of the 500,000 records in
>this file, therefore I want to only READ every record in the file as
>though it was just input.  Then I qualify the record that was only
>inputted to determine if it requires updating, then I will use the
>trickery of using file named UXSRCHM as my Update/Full file, I will
>chain out to this update file (which is really my input file) and only
>risk locking 1000 records instead of all 500,000 records.
>
>MAIN QUESTION AREA:
>
>In order to get this program to compile I had to CRTDUPOBJ DUPDATA(*NO)
>the USSRCHM file into my library as UXSRCHM, then place an OVRDBF for
>UXSRCHM to point to actual USSRCHM file.  Is creating an empty file
>object considered proper to getting the program to compile?
>--
>''''''''''''''''''''
>: Tim & Dana Truax :
>:                  :
>''''''''''''''''''''


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to MAJORDOMO@midrange.com
|    and specify 'unsubscribe MIDRANGE-L' in the body of your message.
| Questions should be directed to the list owner/operator: david@midrange.com
+---