× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. MIDRANGE-L
  3. October 2003

Re: to pickup yday's data(IM) and place in today's report

Murali

Looks like you need to preserve the previous day's information. You can do this in the same file, just use MBROPT(*ADD) instead of MBROPT(*REPLACE), and delete, say, the first record in the RPG by date order. That'd leave the previous day's and the current day's records.

Or use SQL to generate a single record for each exchange. INZPFM with a singel record at first. Then have an UPDATE that sets the previous date values to the current date values from the file, and that sets the current values to those from this other file.

HTH

Vern

At 11:13 AM 10/27/2003 +0000, you wrote:

Hai all,

I have a program which generates a margi file for
today's date....the program is as follows...
------- --------------------------------------------------------------------------- ------
CPYF FROMFILE(QGSJL/GFE1) TOFILE(QFLIB/YDJF1)
MBROPT(*RELACE)
CRTFILE(*YES) INCREL((*IF POFFIC *EQ '980') (*AND
0APFIRM *EQ 'J') (*AND PEXCH *EQ '22')
(*OR POFFIC *EQ '980')*AND PFIRM *EQ 'J') (*AND
PEXCH * EQ '24')) FMTOPT(*NOCHK) &nsp;

   MARG3AC P4(YDJ) P5(YDJF1)  -----> his step will
   create file YDJ.REQS

   YCTAC200C REQSFILE(YJ.REQS) POSFILE(YDJF1)
   OUTFILE(YC200)

-snip-

anyone give me some solutions how to proceed and
   implement ths in the program ,Iam stuck at the moment
   ....My report keeps on chaging daily (today's initial
   margin will become  previous day92s initial margin in
   tomorrow's report).....can anyone suggest ho do i
   pick up yesterdays initial margin and change the value
   i today's report and calculate fluctuation
   (difference btw yday's IM nd today's IM)..please
   shoot me up with mails if some thing nt
   0Aunderstood....awaiting for some ideas..
   Thanks in advance for ur hlp..
   Murali.



As an Amazon Associate we earn from qualifying purchases.

This thread ...
Replies:
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.