• CHAIN operation in CL

    Is there a way I can access a random record in CLP similar to doing a chain operation with known key field in RPG instead of reading the total file and validating each one until I reach the required record?

    NetBro20 pointsBadges:
  • Error in Prepare statment in SQLRPGLE

    Hi Group, I'm having a problem with the prepare statement in SQLRPGLE. Here my code: Eval q_str = 'SELECT ' + 'EMPCDE, EMPDEP, CLSS, STRYER, ' + 'SUBSTR(CHAR(UPDTTM),1,10) AS ENTRY ' + 'FROM EMPMAS ' If vnum <> *BLANKS Eval q_str = %TRIM(q_str)+ ' WHERE ' + 'SRLNO = '+ vnum+' ' EndIf c/Exec...

    Sureyz2,735 pointsBadges:
  • passing parameters via a datastructure to and from a procedure

    Can anyone provide a simple example of passing data via a data structure from one procedure to another? I would like to call a procedure to post data to a transaction file using a data structure to pass the data.

    docorp15 pointsBadges:
  • LEAVESR opcode for RPG

    Is there anyway to perform LEAVESR operation in OLD RPG code. Unfortunately I have to amend some old written code. I am searching for related operation as LEAVESR. I have used GOTO (with tag). Is it ok?

    hunshabbir72,820 pointsBadges:
  • SSN ID format in AS/400

    Hi, I am new to this technology. I need to create some fields on Physical file which should accept the data in the format of SSN ID (123-456-789). Kindly let me know. How can I go with this? If this is an older question, please forgive me & post that older link. Thanks

    HABBIE895 pointsBadges:
  • How to access a single program at different PEPs?

    How can this be done? I want to access PGMB at 2 different entry points when called from 2 different programs PGMA & PGMB.

    NetBro20 pointsBadges:
  • LIKE pattern matching in AS/400

    Hi, I have table with one column(ID), values are in the format of '123-456-7890'. Now I need to fetch all the rows from the table whose ID values are of the  same format. I tried to query as Select * from file where ID like ('%___-___-____%'). But no records found. Kindly let me know, how to...

    HABBIE895 pointsBadges:
  • Creating a field in AS/400 physical file

    Hi, How to create a field in Physical file with (123 456 789). Tried with EDTWRD, unable to specify spaces in between. Thanks

    HABBIE895 pointsBadges:
  • Another CPYTOIMPF problem

    I created a small cmd that will take any spool file and transfer it as a PDF to our “public” drive. When I call it under my usrprf, it works beautifully. But, when my operators do it,, they receive the error “CPFA0A9 “ according to IBM, the error is caused due to a password conflict and...

    smintz95 pointsBadges:

    Hi, I know what are all the files on VSAM. Thing is that I need to move these VSAM files out of the Mainframe & to save them on any common location on my system.Later I need to upload them on Oracle Server.  So, what are all the formats (extensions), that these VSAM files hold, when moving out...

    HABBIE895 pointsBadges:
  • Rounding to nearest nickel in RPG ILE

    Can anyone tell me how to round up to the nearest nickel in RPG ILE? My field is defined as 7.2.

    carolm15 pointsBadges:
  • Configuration for SFTP between iSeries/400 and Windows Server

    I am trying to configure a Windows Server to accept a SFTP connection from an iSeries/400.  I can use SFTP between two iSeries machines but a connection to a Windows machines is rejected.  The connection is setup to use a private and public keys and no password.  What should I look for in...

    RichK1151130 pointsBadges:
  • CDSND Connect: Direct issue

    Error while executing CDSND command. (SDE0210I - Requested data set not available. Allocated to another job. )

    ssssssssssssssss115 pointsBadges:
  • EDTWRD Keyword: Not displaying the left Braces

    Hi,  I created a file & Inserted few records .While running the file. It is not showing the left hand braces.Kindly look on the below lines & please let me know the reason & solution. Physical File: 0001.00                 R PATTERN                              ...

    HABBIE895 pointsBadges:
  • Uploading attachments to QC using VBScript

    I am able to add attachments to a test in Test Plan module of QC,bt the problem is, if i attach a file i cant be able to attach more other files,it allows only one file to a test in a specific folder of Test plan module

    Qwerty7775 pointsBadges:
  • How to search a record in sequential order in V5R1 with two input parameters

    I am new to AS/400 and RPG. I want to search a record not on a single key field but with multiply search arguments. how can I do this. One thing in my mind is to create a DataStructure and in Read or Chain operation populate that DS and match field values, but in my version I didn't find LIKEREC...

    hunshabbir72,820 pointsBadges:
  • Finding COBOL career opportunities in Canada

    I've been working in Canada as a COBOL progrtammer analysr for the past 4 years and am looking at moving from the company I currently am with for better opportunites. I have a lot of the mainframe skills, JCL,COBOL, DB2 but cannot seem to find anything out there? Is it that hard to find comapnies...

    Rsfoo5 pointsBadges:
  • iSeries Access Error when accessing a file in output queues

    When trying to access a particular file in Output Queues in System i Navigator gets error message "An unexpected error occurred. Check the system I Access Java Trace Log for additional information Exit Program denied request" How to fix this error?

    intripidfish5 pointsBadges:
  • Debug SQLCBLLE pgm.

    Can anyone please explain the steps involved in the debugging of SQLCBLLE pgm.

    mvrkrishna560 pointsBadges:
  • Documenting column in SQL table in QADBIFLD (AS400)

    When a table is created with SQL, several fields in the system cross-reference file QADBIFLD gets content (headings, defults a.o). I noticed that the QADBIFLD table contains a column named DBIREM (length 2000 bytes..). I also noticed that the old S36 IDDU actually put some documentation into this...

    DanTheDane2,555 pointsBadges:

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.