Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by Mercury2

  1. Mercury2

    Execute Immediate

    Try this. SET EndDate = CASE when test=31 THEN case1 when test=30 THEN case2 when test=29 THEN case3 else case4 end CASE; ... SET SQLSTMT = 'call ProcedureDate2(' CONCAT BeginDate CONCAT ', ' CONCAT EndDate CONCAT ', ' CONCAT .97 CONCAT ')'; execute immediate SQLSTMT; Not tested...
  2. Mercury2

    PRTF vs O-specs

    Look here and search PRTF. Philippe
  3. Mercury2

    Moving data area into an array

    ZXA should be defined as (9S 0). You don't need ZXB. D XITEM DS DTAARA(INAXCLUD) D WXCLUD 90A D ZXA 9S 0 OVERLAY(WXCLUD) DIM(10)...
  4. Mercury2

    When best to use: Copybooks, Modules, Service Programs

    mikrom I don't agree and share Pete's howto. Philippe
  5. Mercury2

    iSeries System API Reference Manual SC41-5801

    It was to be expected. IBM does not drag non-relevant books on he internet. Philippe
  6. Mercury2

    iSeries System API Reference Manual SC41-5801

    Hopefully you'll find it there. Philippe
  7. Mercury2

    iSeries System API Reference Manual SC41-5801

    The Red Book you're looking for is obsolete so you won't find it online. Philippe
  8. Mercury2

    Programming Languages on AS400

    Look here. Philippe
  9. Mercury2

    SQL0104N SQLSTATE=42601

    What are you wanting to do exactly coz the procedure doesn't look right in the sequence. F.E. You can NOT do SET v2_ukey = MAX(ukey); You have to do 1/ SELECT MAX(ukey) into MyVar From ... 2/ SET MyVar = MyVar + 1; 3/ If you are on release V5R3+ create a Sequence Object and use it to insert...
  10. Mercury2

    SQL0104N SQLSTATE=42601

    ok. I think I get it. Check out "SQL0104N error in DB2 Command Editor due to incorrect statement termination character" @ https://www-304.ibm.com/support/docview.wss?uid=swg21224723 Philippe
  11. Mercury2

    SQL0104N SQLSTATE=42601

    Perharps the SQL processor doesn't like underscore ( _ ) as it exists on every variable name ? Philippe
  12. Mercury2

    Intermittent MCH3402 on OPNQRYF

    Pls paste here the relevant OVRDBF FILE(MHISRYL8)... There's maybe something to do with the activation group. Side note. You could also shorten the QRYSLT like so QRYSLT('MHAGNT = %VALUES("39001N" "37355N" ... "23579E"')) Philippe
  13. Mercury2

    Keeping A VB.NET Connection Open Through Multiple STRPCCMD Calls

    Don't use STRPCO/STRPCCMD which is nowadays an old technology with the awkward constraint to install the VB.Net app on each user's PC. I'd put the VB.Net app in a serve r shared folder and use RUNRMTCMD instead. Philippe
  14. Mercury2

    output specs to free form

    O-spec cannot be converted to free form. Philippe
  15. Mercury2

    Relative Record Number in a Logical File

    There's no RRN in a logical file. You can however get the physical RRN the logical is pointing to using the INFDS on the F-spec of the relevant logical file. The RRN is a binary field pos 397-400 in the INFDS. Philippe
See more

Part and Inventory Search

Back
Top