• cl

    DCL &TEXTFILENM *CHAR 40 dcl &curdt *char 6 dcl &curtm *char 6 /* build your CL file name as */ RTVSYSVAL SYSVAL(QDATE) RTNVAR(&CURDT) RTVSYSVAL SYSVAL(QTime) RTNVAR(&CURTM) ChgVar &TextFileNm (QDATE *TCAT QTIME *TCAT ‘.TXT’ CPYTOIMPF … To stream file . . . . . . . . . TOSTMF &TextFileNm Am...

    0 pointsBadges:
  • rpg/400

    while i am compiling the below program compile sucessfull and write the records into SA100 (Flatfile). C READ APHL01 C *IN20 DOWEQ *OFF C EVAL EDTE = APIRDT C EVAL CCDE = APCMPY C EVAL ERPN = PHDCPX + %EDITC(PHDCSQ:'X') C EVAL FYEAR = PHDCYR C EVAL INVNO = APINV C EVAL INVDT = AINVDT C WRITE SA100...

    Askt1140 pointsBadges:
  • OPNQRYF

    I HAVE A CASE LIKE THIS IN CL/400 OPNQRYF FILE((MADE07/GLM0120)) QRYSLT('(GLFINP *NE 99) *AND (GLPRDC *EQ "AR" *OR GLPRDC *EQ "SW" *OR GLPRDC *EQ "WP" *OR GLPRDC *EQ "LR" *OR GLPRDC *EQ "MD") *and (glbrnc *eq "%substr(&bc 1 1)")') HERE BC IS A FIELD IN DISPLAY FILE I NEED TO SELECT BRANCH CODE(BC)...

    Zilan85 pointsBadges:
  • cl

    If i create txt files in as400 directory with naming convention AA20080101 can we purge these files using an AS400 command.

    0 pointsBadges:
  • subfile

    I have created a message subfile but my code is not moving the error message to the display file.I did a debug and found that the write msgctl statement is executed but nothing is being written.Wat could be the possible reason

    0 pointsBadges:
  • AS400

    what will happen in system ( initial process) after sign on the new session.

    rajeshece1,215 pointsBadges:
  • Insert Data into AS400

    I am trying to insert 'int' (integer) datatype into a AS400 table. The fields on the AS400 are of type 'S' (numeric). I have tried to cast the data as numeric but I get an error. Can anyone help? INSERT INTO ebbillhp (BHNROV, BHCRTDT, BHBILLHWEB, BHUSERID) VALUES (convert(numeric,@Site),...

    Jtaylor755 pointsBadges:
  • How to schedule an iSeries job to do IPL?

    Is there any way where we can schedule a job to do IPL? Thank You, Nitin

    Nit40030 pointsBadges:
  • Message Monitoring

    Is there a way through Iseries Navigator to setup monitoring for messages from Qsysopr. I do not sit at the console so I would need my monitor at my desk to do a break message when a message appears in Qsysopr queue. I have tried to setup the monitor view but it does not do a break message.

    TRFCTL20 pointsBadges:
  • AS400

    I want to call a procedure from a RPG Program. Is it possible?

    rajeshece1,215 pointsBadges:
  • as/400 tools

    Hi can anybody tell me some thing about hawk eye and Turn over tools in AS/400 and fo rwhat purpose they are used?? thanks

    ten20081,150 pointsBadges:
  • Text files

    Can you write or add to text file in an RPG LE program?

    CHARLESG25 pointsBadges:
  • Scheduled Batch Jobs

    Hi, is there any way to find out who released a job that was scheduled but held? tried job log but no luck. thanks

    Rockleadme385 pointsBadges:
  • AS/400 LIC (Licensed Internal Code)

    Have reloaded mu Iseries 9406-270 from scratch. It is telling me that my licence will expire within 71 days. Problem is we cannot i cannot locate the Document that contains the code. My question is, can i retrieve the LIC from the full system save that i have and what procedure do i take to achive...

    AP25 pointsBadges:
  • opnqry

    I have four selection parameters in a screen which is used as selection criteria in my opnqry.Ideally if all parameters are given the qryslt in opnqry will have all four fields in the select criteria. Now i have a scenario where if any of the selection parameter is not given in the screen the...

    0 pointsBadges:
  • Upgrade V5R3 to V5R4

    We are upgrading from V5R3 to V5R4, Will there be any impact on Content Manager for iSeries.

    Shichy20 pointsBadges:
  • Overflow

    How to control overflow in RPG without using indicators. Is it possible?

    ten20081,150 pointsBadges:
  • Numeric fields in AS/400

    I have a numeric field 5,2 in a display file. when i am entering values i have blanks in between two numeric digits. the program is considering these blanks as zero. I hvae to avoid this, please let me know the way.

    frmdeva365 pointsBadges:
  • opnqry

    I need to select a range of dates for a single parameter in opnqry. qryslt(’date *EQ ‘ *CAT &wrkDTE),where date is numeric and wrkDTE is char.here i have just selected 1 day i want data for range of dates Please suggest.

    0 pointsBadges:
  • RRN to Chain the file

    I want to chain a file with RRN value but the file is not KEYED. How is it possible in RPG/400?. Please suggest me!

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

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy

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

Following