Quantcast
Channel: AS/400 DB2 – IT Answers
Viewing all 45 articles
Browse latest View live

Not able to create procedures using STRSQL on V6R1

$
0
0

While creating a procedure in V6R1, [strong]Not authorized to CREATE PROCEDURE error (Message ID is SQL0552)[/strong] appears. In Additional Message Information cause of the error being — [strong]CREATE PROCEDURE or CREATE FUNCTION requires the *OBJOPR and *ADD authority to the catalog table SYSROUTINES in QSYS2[/strong].

However [strong]PUBLIC[/strong] has [strong]*CHANGE[/strong] Authority on [strong]QSYS2/SYSROUTINE[/strong] Object. Please note my id does not have *ALLOBJ Authority.


Switch between two screens using CICS maps

$
0
0

how we can switch between two screens using maps in cics what will be the logic implemented in cobol programme?

Connecting SAP to iSeries.

$
0
0

We are undergoing a project implementation in which we need to connect SAP to iSeries where SAP would be the target for fetching data from iSeries which is the source. Can anyone help me by providing the steps involved for Connecting SAP to iSeries. Also let me know if any addtional product is to be installed on SAP or iSeries. Thanks in advance. Haaider Ali

VSAM versus DB2 in CPU consumption

$
0
0

Is it possible estimate how much more CPU is consumed by DB2 commands in relation to VSAM KSDS when access a row, through an index scan, in a organized DB2 table against a record reading from an organized VSAM KSDS file through the primary index?

How much is it in percentage?

Thank you very much in advance.

Abel

Using Dropbox and Radio button with DB2400

$
0
0

IS THAT POSSIBLE OF USING DROPBOX AND RADIO BUTTON IN DB2400?

Synon (Migration)

Logical file Error.

$
0
0

i try to create Multiple-format Logical File but i getting compile time error.

i have two PF dds is as follow..
A          R RDEPTMST               
A            DEPTNAME      15       
A            DID            5       
A            LNAME         15       
******************************
A          R RBIODATA            
A            FNAME         10A   
A            LNAME         10A   
A            DID            5    
A            MNAME         10    
**********************************
i created  Multiple-format Logical File for above two PF 
DDS is as follow
A          R RBIODATA                  PFILE(BIODATA)   
A          K FNAME                                      
A          R RDEPTMST                  PFILE(DEPTMST)   
A          K DEPTNAME                                   
******************************
when i try to compile above LF getting error
    ID      Severity  Number                                                                                                       
* CPF3238      40        1      Message . . . . :   Key field DEPTNAME not same as previous formats.                               
how to solve this error?

pass array to clle

$
0
0

i created RPGLE,within that i defined compiled time array now i want to pass that array (at a time only one insex) to cllle but while i run this rpgle its give me run time error ..that 

Error occurred while calling program or procedure *LIBL/practcl8
Message ID . . . . . . :   RNQ0211       Severity . . . . . . . :   99         
Message type . . . . . :   Inquiry                                             
Date sent  . . . . . . :   04/13/12      Time sent  . . . . . . :   23:40:32   
                                                                               
Message . . . . :   Error occurred while calling program or procedure          
  *LIBL/practcl8 (C G D F).                                                    
Cause . . . . . :   RPG procedure PRACT8 in program KRGUNN/PRACT8 at statement 
  7 attempted to call program or procedure *LIBL/practcl8, but was unable to   
  access the program or procedure, the library, or a required service program. 
  If the name is *N, the call was a bound call by procedure pointer.           
Recovery  . . . :   Check the job log for more information on the cause of the 
  error and contact the person responsible for program maintenance.            
Possible choices for replying to message . . . . . . . . . . . . . . . :       
  D — Obtain RPG formatted dump.                                              
  S — Obtain system dump.                                                     
  G — Continue processing at *GETIN.                                          
                                                                       More… 
*********************
4>> CALL KRGUNN/PRACT8                                                        
    Cannot resolve to object practcl8. Type and Subtype X’0201′ Authority     
      X’0000′.                                                                
    Function check. MCH3401 unmonitored by PRACT8 at statement 0000000007,    
      instruction X’0000′.                                                    
    Error occurred while calling program or procedure *LIBL/practcl8 (C G D   
      F).                                                                     
    Error occurred while calling program or procedure *LIBL/practcl8 (C G D   
      F).                                                                     
                                                                              
                                                                              
******************
DDS of RPGLE
dfilname          s             10a   dim(34) ctdata                       
dx                s              3  0 inz (1)                              
c                   dow       x<=34                                        
c                   call      ’practcl8′                                   
c                   parm                    filname                        
c                   parm                    x                              
c                   add       1             x                              
c                   enddo                                                  
c                   seton                                        lr        
c*                                                                         
c*                                                                         
c*                                                                         
                                                                           
9A1                                                                        
9A2                                                                        
TL1                                                                        
*****************
DDS OF CLLE
PGM        PARM(&X &M)                           
DCL        VAR(&X) TYPE(*CHAR) LEN(1000)         
DCL        VAR(&M) TYPE(*DEC) LEN(3 0)           
WRKOBJ     OBJ(IESQAFILE/&X) OBJTYPE(*FILE)      
                                                 
                                                 
*****************

update replace

$
0
0

I’m trying to update a particular text string in a long trxt eg

505400005004GBP23800280000

trying to replace the 10th char 0 with a 1 how can I do this please, thanks

DB2/400

$
0
0
New Discussion Post by TomLiotta

How to retreive stored procedure from DB2/400

$
0
0

How to retrieve the stored procedure body from db2/as400.

for example :
I created a Stored Procedure as
create procedure botest/spload

DB2/400 basics

AS/400 – Logical file without key fields

Transfer data from DB2 file to SQL Server file

Add a field in existing file in DB2/400


Access path and open data path in DB2/400

$
0
0

When will an access path be created, and when will an open data path be created? 

DB2 HADR configuration

$
0
0
New Question Created by kbsantosh1

as400 db2 to sql server 2005

SQL / DB2 Optimization (timing out)

$
0
0
New Discussion Post by philpl1jb

How to Add column (field) in ODBC to physical file?

Viewing all 45 articles
Browse latest View live


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>