• Automate AS/400 backup verify program

    Hi All, I perform AS/400 full system backups using go save, option 21 every week. Once backup is done, I'll give command DSPLOG LOG(QHST) MSGID(CPF096...etc) and verify how many libraries have been saved. I want this to be automated, can we write a program (CL/RPG) to pull all this information into...

    sivaknagula40 pointsBadges:
  • Data validity vs. CL program with OVRDBF command submitted 10 times simultaneously

    Would I be able to process the file correctly if I would have a CL program submitted 10 x simultaneously that contains OVRDBF. Behavior is similar to multi threading and this would really help process a very large file with less time. OVRDBF is necessary to point to the correct file member prior to...

    Andy01atSM5 pointsBadges:
  • What has changed in AS/400?

    Hi, I returned to AS/400 after about 10 years. I have developed a lot of software in RPG/400 and intensive use of CL, without SQL or query. Now I return to the AS/400 for work, what has changed? Can I start with RPG/400 and CL or I have to learn others. Thanks.

    Damiano15 pointsBadges:
  • DLCOBJ command not working

    I have a program that allocates an object (*file), calls a program, then deallocates. The dlcobj does not work. RPG PROGA calls CL PROGB which calls CL PROGC. PROGC does the alcobj and dlcobj. However when the program returns to PROGA (interactive RPG), the object is still locked. Any ideas?

    ttufankj25 pointsBadges:
  • Application error. MCH3401 unmonitored by X at statement 0000004388.

    Cl Program Dump.  Message ID CEE9901 Message text: Application error. MCH3401 unmonitored by X at statement 0000004388. instruction x'000'. Please help

    spalacio20 pointsBadges:
  • Control F3 using SNDUSRMSG and SNDPGMMSG in CLP

    I would like to control F3 key when using SNDUSRMSG and SNDPGMMSG in my CLP. Please help me to accomplish it.

    gopinathravi935 pointsBadges:
  • Error message when compiling CL program: CPD085C 40 Graphic field not allowed for variable & OBJRTVUCS

    Graphic field not allowed for CPD085C 40 Graphic field not allowed for variable & OBJRTVUCS is the error message I get when compiling CL Program. I'm taking output to file of a Vision WRKDG command. This ouput file I declare in the CLP.  While compiling the CL, I'm getting error 40 with...

    JohnsonMumbai1,390 pointsBadges:
  • How do AS/400 stored procedures get output?

    I have created a CL which calls an RPG program. Now I have to create a stored procedure which calls the CL! As RPG normally sends back the output to CL! How should I send back the output to SP? Will SP normally pick it or is there any command to send back the output to stored procedure (SP). I have...

    bharathtata25 pointsBadges:
  • CPYFRMIMPF command successfully copies to PF but resulted to special characters on PF

    I have created new directory in AS/400 named MMVRADIR with subfolder MMVRAFLR. I have a CL program using CPYFRMIMPF command to restore the content of a txt file inside "MMVRADIR/MMVRAFLR/APDM082716.TXT" to AS/400 physical file SMREB33F. The CPYFRMIMPF was able to copy the contents but when I runqry...

    KAILOFOXS5 pointsBadges:
  • OPENQRYF: Unmonitored message CPF9899 occurred at statement

    Hi All I had made the changes in the program and debug the same but while debugging it gives me the following message at open query file line as: Unmonitored message CPF9899 occurred at statement. OPNQRYF FILE((F60SLB05)) QRYSLT('YTAN8 *EQ ' *CAT + &EMP *CAT ' *AND YTATIM *GT &STARTDATE +...

    Anshul14095 pointsBadges:
  • How can I get system CPU usage and individual job CPU usage from database output of WRKSYSACT command?

    How can I get current system CPU usage and current individual job CPU usage from database file output of WRKSYSACT command. Which are the fields which store these values. I would like to write a program which reads the output (*file)of WRKSYSACT command. This program would send a message/mail when...

    JohnsonMumbai1,390 pointsBadges:
  • OPNQRYF and CPYFRMQRYF

    I am writing a CL program in which I do OPNQRY file based on status field in the file. After this data selection, an RPG program is called which processes the data and changes the status to next status. After the execution of this I call another CL program. In this CL program, I want to copy query...

    abhinavpassi15 pointsBadges:
  • How to create a startup program for WAS61. The program to start the subsystem (QWAS6/QWAS6). 2 JOBS under qwas6 (wmp and wmpappsvr) after every IPL.

    I was assigned to create a CL program to call a startup program to start subsystem automatically after every IPL. the program WAS61 located here: /QIBM/ProdData/WebSphere/AppServer/V61/ND/bin. I do not know where to start and how. Please help anyone. I have tried the steps mentioned here...

    ejaaje150 pointsBadges:
  • Error in calling RPGLE program from CL

    I have a job running under subsystem. This job is using a CL program which inturn calling RPGLE program. The CL program is failing in call statement to RPGLE with following error message in jobog: Pointer not set for location referenced. Pointer not set for location referenced. Pointer not set for...

    Mayurp5 pointsBadges:
  • Modify hexa string value in CL

    I have a hexa string and I want to modify some value while running program through CL below is the hexa string. X'011F011F000000000F099999999FC9020160309FF0D5 404040F9F9F9E3000000000F40404040404040') In the above string I have a date 20160309. Now I want to change this date to current date.

    97834441841,465 pointsBadges:
  • Why is CL the native language of AS/400?

    Why is CL (Control Language) the calling native language of AS/400? And why it is a driver program?

    Angelg5 pointsBadges:
  • New line in message formatting in CL program

    I want to insert a new line in message formatting in CL program. Like Name new line and details new line and rem details. How can insert a new line in message formatting?

    sivakesava285 pointsBadges:
  • How to pass numeric data to CL program from AS/400 command line

    Hi All, I want to pass numeric data of length (8 0) to my CL program while calling from AS/400 command line but program is not receiving correct value into the program. Can anyone please help me how to pass numeric data?

    Mohan K695 pointsBadges:
  • Use of variable CPYTOIMPF command

    How do I use a variable as the target file in CPYTOIMPF in a CL program?

    tonycs10 pointsBadges:
  • IIF function

    I have 2 tables: First table: 1- name 2- position 3- nationality 4- visa No. Second table: 1- Position 2- No of visas. 3- No of used visas. 4- No of remaining visas. But I want to use IIF function when add new position in first table increases the no of used visas in the second table automatically....

    khalid1155 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