× 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.



Hi,

Hi all. I'm a newbie to the list, newbie to MI but know the iSeries and
its ancestors back to 1984...

I'm using a reworked version of a Carsten Flensburg program (See
<http://archive.midrange.com/repository/extqrydef.htm>) to get details
of the spooled output from queries. I don't know what to do in the code
sections shown below to access the correct part of the object, i.e. the
one which will get me the output queue, formtype, etc.

These are the D-specs for the section I need to populate with data from
the query object:

**-- Query printed output specifications:                    
D QiOutWtr        Ds                                         
D  OwDtaLen                     10i 0 Inz                    
D  OwWtrNam                     10a                          
D                               26a                          
D  OwPprLen                      5i 0                        
D  OwPprWdt                      5i 0                        
D                                5i 0                        
D                                5i 0                        
D                                5i 0                        
D  OwFrmTyp                     10a                          
D                               12a                          
D  OwPrtLin1                     5i 0                        
D  OwPrtLinLst                   5i 0                        
D  OwPrtLinDst                   5i 0                        
D  Ow1                           5i 0                        
D  Ow2                           5i 0                        


And these are the C-specs I've added - xXx in the setsppo function
denotes an offset value which I can't discover anywhere :(

c                   Eval      pQryTpl  = setsppo( pQryTpl: xXx )
C                   CallP     MemCpy( %Addr( QiOutWtr )         
C                                   : pQryTpl                   
C                                   : %Size( QiOutWtr )         
C                                   )                           
c                   move      Owdtalen      dtalen              
c                   move      Owwtrnam      wtrnam              
c                   move      Owfrmtyp      frmtyp              



Can someone point me in the right direction please?

Thanks,

Howard Norcross
Senior A/P
Charles Stanley Stockbrokers, London.
--------------------------------------------------------------------------------------------------------------------
The information contained in this e-mail is strictly confidential, some or all
of which may be legally privileged. It is for the intended recipient only.
Access to this e-mail by any other person is prohibited. If you are not the
intended recipient, any use, disclosure, copying, printing, distribution of,
replying to or any action taken or omitted to be taken in reliance on this
e-mail, is prohibited and may be unlawful. Please contact the sender immediately
should this e-mail have been incorrectly addressed or transmitted.

You accept that any instructions are deemed to have been given at the time the
recipient(s) accesses them and that delivery receipt does not constitute
acknowledgement or receipt by the intended recipient(s). You accept that there
may be a delay in processing the instructions received from e-mails after
Charles Stanley has received them. You are advised that urgent, time sensitive
and confidential communications should not be sent by e-mail. 

You acknowledge that e-mails are not secure and you accept the risk of
malfunction, viruses, unauthorised interference, mis-delivery or delay.
**************************************************************************

Registered Office: 25 Luke Street London EC2A 4AR

Tel: 0207 739 8200 Fax: 0207 739 7798
Registered in England No. 1903304

Authorised and Regulated by the Financial Services Authority, Member of the
London Stock Exchange, Member of The London International Financial Futures and
Options Exchange.

This footnote also confirms that this email message has been swept by McAfee
VirusScan and SurfControl Email Filter software.

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 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.