Select if NOT Record filename Exists - Bummer Dude!

george.j.wen@us.abb.com george.j.wen@us.abb.com
Mon, 17 Dec 2001 08:58:02 -0600


--0__=KHfMXqh9hXOc06Z1mp82Dxmr7sb5H7rUuMgY2s9DZgCZ7H1iD2asVMeZ
Content-type: text/plain; charset=us-ascii
Content-Disposition: inline



We don't have keyed subfiles either but hey it's not that bad.  The other day I
wrote a report and
a CL program in about 6 hours.  The RPG folks were wondering how I did that so
fast.  I wish more
were being put into these tools.

Thanks all for your help.


|------------->
|(Embedded    |
|image moved  |
|to file:     |
|pic04626.pcx)|
|             |
|------------->
  >------------------------------------------------------------------------|
  |Jeff Hoffman <wonicon@bigpond.net.au>                                   |
  |12/16/2001 02:39 PM                                                     |
  >------------------------------------------------------------------------|



To:   powerh-l@lists.swau.edu
cc:    (bcc: George J. Wen/NB/USFAC/ABB)
Subject:  RE: Select if NOT Record filename Exists

Security Level:?         Internal



Bummer Dude!

Good Luck

Jeff

At 04:59 PM 15-12-01 +1300, Richard wrote:
>Sorry Geoff, George is on AS/400 and we '400 people don't have the luxury of
>settable system values.
>
>cheers
>Richard
>
>-----Original Message-----
>From: Jeff Hoffman [mailto:wonicon@bigpond.net.au]
>Sent: Saturday, 15 December 2001 12:09 p.m.
>To: powerh-l@lists.swau.edu
>Subject: RE: Select if NOT Record filename Exists
>
>
>George
>
>To Johns suggestion try adding setsystemval using values from I55first,
>then getsystemval, they would then be available for printing.
>
>Jeff
>
>At 02:25 PM 14-12-01 -0500, John Pickering wrote:
>>George
>>
>>How about:
>>>Access I4311  &
>>>  link PDITM  to QAITM of I5531410 optional &
>>>  link to record(0) of I5531410 alias I55first
>>
>>Note that some platforms may want "record(1)" instead of "(0)".
>>
>>Every record complex will have a buffer for I55first assuming the file
>isn't
>>empty. Use the contents of this buffer for headings etc.
>>
>>Regards,
>>JWP
>>
>>
>>> -----Original Message-----
>>> From: george.j.wen@us.abb.com [SMTP:george.j.wen@us.abb.com]
>>> Sent: Friday, December 14, 2001 1:47 PM
>>> To:   powerh-l@lists.swau.edu
>>> Subject:   Select if NOT Record filename Exists
>>>
>>>
>>>
>>> Hello List, here's one for you.
>>>
>>> I'm using the construct for the following access line:
>>>
>>>      Access I4311 link PDITM  to QAITM of I5531410 optional
>>>          Select if Not Record I5531410 exists
>>>
>>> But what if I want a value from the from I5531410 for printing in the
>>> headings
>>> even
>>> when zero records meet the selection criteria.  This value is not
>>> presented in a
>>> parm anywhere but rather this I55.. file is a work file that is created
>by
>>> the
>>> user so
>>> it would be useful to see what the first record in the file (one that
>does
>>> not
>>> meet the
>>> selection criteria) looks like to validate that the correct data (most
>>> recent)
>>> is there.
>>> I could do a cover page report ahead of the main report or something like
>>> that
>>> but
>>> does anyone knows of a "slick and dirty" way or work around?
>>>
>>> Thank you in advance.
>>> George
>>>
>>

+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
+ Jeff Hoffman                          + e-mail: wonicon@bigpond.net.au    +
+ Director                              +                                   +
+ WoniCon Pty Ltd   (ABN 93 083 502 630)+                          ,-_|\    +
+ 21 Prices Circuit                     + voice: +61 2 9542 1527  /     \   +
+ Woronora    NSW     2232              +                         \_,-._*   +
+ AUSTRALIA                             + mobile: 040 790 3929         v    +
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-
+

= = = = = = = = = = = = = = = = = = = = = = = = = = = =
Mailing list: powerh-l@lists.swau.edu
Subscribe: "subscribe" in message body to powerh-l-request@lists.swau.edu
Unsubscribe: "unsubscribe" in message body to powerh-l-request@lists.swau.edu
http://lists.swau.edu/mailman/listinfo/powerh-l
This list is closed, thus to post to the list you must be a subscriber.




--0__=KHfMXqh9hXOc06Z1mp82Dxmr7sb5H7rUuMgY2s9DZgCZ7H1iD2asVMeZ
Content-type: application/octet-stream; 
	name="pic04626.pcx"
Content-Disposition: attachment; filename="pic04626.pcx"
Content-transfer-encoding: base64

CgUBCAAAAABBADEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAABQgABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAA=

--0__=KHfMXqh9hXOc06Z1mp82Dxmr7sb5H7rUuMgY2s9DZgCZ7H1iD2asVMeZ--