Select if NOT Record filename Exists - Bummer Dude!
george.j.wen@us.abb.com
george.j.wen@us.abb.com
Mon, 17 Dec 2001 14:59:09 -0600
--0__=rQDt8LQc6kUyZRLJayUyIEuLN7ZAcRAUrgCN4p6ZU65DoyC7942pRHxs
Content-type: text/plain; charset=us-ascii
Content-Disposition: inline
Plenty of people on this side looking for jobs too.
George
|------------->
|(Embedded |
|image moved |
|to file: |
|pic06923.pcx)|
| |
|------------->
>------------------------------------------------------------------------|
|Jeff Hoffman <wonicon@bigpond.net.au> |
|12/17/2001 02:43 PM |
>------------------------------------------------------------------------|
To: powerh-l@lists.swau.edu
cc: (bcc: George J. Wen/NB/USFAC/ABB)
Subject: RE: Select if NOT Record filename Exists - Bummer Dude!
Security Level:? Internal
Yea
Sometimes I wish it took longer, maybe we could get more staff.
Jeff
At 08:58 AM 17-12-01 -0600, George wrote:
>
>
>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.
>
>
>
>
>Attachment Converted: "F:\Eudora_wonicon\Attach\pic04626.pcx"
>
= = = = = = = = = = = = = = = = = = = = = = = = = = = =
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__=rQDt8LQc6kUyZRLJayUyIEuLN7ZAcRAUrgCN4p6ZU65DoyC7942pRHxs
Content-type: application/octet-stream;
name="pic06923.pcx"
Content-Disposition: attachment; filename="pic06923.pcx"
Content-transfer-encoding: base64
CgUBCAAAAABBADEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAABQgABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAA=
--0__=rQDt8LQc6kUyZRLJayUyIEuLN7ZAcRAUrgCN4p6ZU65DoyC7942pRHxs--