• Change character colour in RPG

    I want to change my character colour to RED in RPG program, Can anyone tell how to do this

    Sandeepc2835 pointsBadges:
  • Error after V5R2 Cum PTF load….

    On Friday evening I loaded the latest Cum PTF's for V5R2. The box IPL'd without any problems and all the PTF's were "Temporarily applied". However, after a second IPL yesterday (scheduled weekly IPL) it failed and the screen SRC read B0006 1406. Has anyone any idea what this could be? The IBM...

    Selectsoft65 pointsBadges:
  • Which is best method to reduce ASP

    Which is best method to reduce ASP By deleting splf or by removing Journal recievers

    Operations in AS40085 pointsBadges:
  • Handling pointer while updating a key value in rpgle

    [table] [tbody] [tr] [td class="votecell">     [/td] [td] my code goes like this femp uf e k disk dvar1 s 5p 0 c *loval setll emp c read emp c dow not %eof(emp) C eval ecode = ecode + 10 c eval var1=ecode c update recemp c var1 setgt emp c read emp c enddo c eval *inlr=*on here is a file named...

    munduuu435 pointsBadges:
  • SQL connection failure error handling

    Application group wants batch job to terminate if it is unable to establish SQL session to external database. Job log indicates MSGID QSQLMSG/SQ30080 "Communication error occurred during distributed database processing.   This appears in the joblog as a level 30 diagnostic message. When this...

    Midranger25 pointsBadges:
  • as400 os version5 release 1

    Does this version have the add on for excel?

    Budde5 pointsBadges:
  • Date calculation question

    I have a date manipulation question on the AS/400. I need to be able to take whatever date the system date is and calculate the next Friday date and output that to the LDA in the format MMDDYY. It needs to have the leading zero for the single digit months AND it is just a 2-digit year. I swear I...

    TomN50 pointsBadges:
  • Error detected on device QPADEV0003

    Hi, When i am opening a new session , the QINTER job starts the new job named QPADEV007. Can anone suggest me the reason for error. I have pasted the JOBLOG below. ***** Error detected on device QPADEV0003 that can be recovered.      Restore request failed. See message...

    as400dev590 pointsBadges:
  • How to define two dimensional arrays in RPGILE

    I need to create an array that contains a code (2,0) and hrs worked (5,2) for that code. something like 01 2.3 4.3 5.6 7.0 8.0 02 5.0 6.0 7.0 7.0 6.5 I will then take this array and load a subfile to display on a screen. Thanks, John

    JAC260 pointsBadges:
  • SQL0444 when I tried to access schema folder from CAE tree

    I am getting an error message indicating the following; [SQL0444] External program QPZA004366 in QIWS not found. Cause An attempt was made to CALL procedure or invoke function QZDGDBLL in QIWS. I open client access > Logged in > click on Database > Schema and I get this prompt message of...

    I5user5 pointsBadges:
  • End Job

    I have created a program (and clp) that works perfect. There's just one little problem. I need for the clp to terminate after about 30 to 40 seconds. I did this over 10 years ago, but I have no idea on how. I have the object, but not the source to the original clp. Thank You, Douglas L McDuffie

    DLM2007295 pointsBadges:
  • Decipherig RPGLE Specs…

    I did a CPYF from LIBRARY/QRPGLESRC(RPGLEPGM) to a new physical file created on the fly. Now, I know that when you do this, the data in the SRCDTA field shows exactly what's in the program. BUT, how am I to figure out if an I-Spec statement reflects an actual I, IX, J, or JX prompt?

    Eric Witham690 pointsBadges:
  • Source for System Supplied Files

    Where can I find the source for System Supplied Files? Currently I'm looking for the source for QADSPUPB, which is the outfile for DSPUSRPRF. Thanks, Bill

    wpoulin2,480 pointsBadges:
  • Using LIKE in AS/400 Cobol

    How to use 'LIKE' in Cobol similar to query/400(example Field_A LIKE '%777%')

    111719555 pointsBadges:
  • Delete data files on the AS400

    I have a client that wants to remove all company data from an old AS400. Is there an easy way to do this, a single command or procedure?

    b.rogers5 pointsBadges:
  • how can i validate two dates

    hi, I want to validate two dates of type (date1=L) and (date2=char length is 8A ) can any one help me

    Mohan K695 pointsBadges:
  • I am being asked to produce an Access Log from our iSeries Server

    I am being asked to produce an Access Log from our iSeries Server. It doesn't appear that the Audit Journal will identify who has signed on and when. Can someone point me in the right direction. Thank You, Bill

    wpoulin2,480 pointsBadges:
  • CL/400 – I want to know about QRYSLT(Please see below explanation)

    Hi, I am not well versed with code in CL/400, i know the concepts. I want to know what is he doing in the below code. e.g usibng the symbols '|>' and '||' and '<|' IF COND(&TODUE7 *NE '0000000') THEN(DO) CHGVAR VAR(&QRYSL) VALUE(&QRYSL |> ' *AND (ODUDT *GE + ' || &FRDUE7 || ') *AND')...

    svankipu625 pointsBadges:
  • I need help with DSPF…

    Hi everybody, i try explain my need. I have one RPG pgm with several DSPF, and for this work well, i have a OVRDSPF. My problem is when other people make any changes in one DSPF we have a level check, i know that, but because of this i need a idea for make an ALERT inside of DSPF source code in...

    BUG68235 pointsBadges:
  • monitoring jobs

    what are  the steps involved in monitoring jobs?

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

Following