• Change date format in RPGILE

    Can you advise me how to change date format from mmddyyyy to yyyymmdd in rpgile?

    Askt265 pointsBadges:
  • RPG/400 xodstsf

    Below program write a records to xodstsf in two times.... I am not sure what I am missing... can you advise? FWDRPIK CF E WORKSTN FXODSTSF O E DISK FTFL01 UF E K DISK DORDINV S 15A D*ORD S 8A C* *IN03 DOWEQ *OFF C DOW *IN03=*OFF C EXFMT PKSCR C PKLBL CHAIN TFOOD00 C* *IN25 IFEQ *OFF C IF...

    Askt265 pointsBadges:
  • CWBAD1003

    I am getting CWBAD1003 - I need help

    GregFa5 pointsBadges:
  • Can you update physical file through OPNQRYF?

    Can we update physical file through OPNQRYF command in clle (AS400)?Is it possible? OPNQRYF FILE((lib/pf)) OPTION(*UPD) QRYSLT('CDE + *EQ 101 ') KEYFLD((CDE))

    shyedajmal285 pointsBadges:
  • Difference between two OVRDBF approaches

    What is the difference between the below two approaches? OVRDBF FILE(FILE1) SHARE(*YES) SEQONLY(*YES) OPNQRYF (SOME CONDITION) CALL PGM1 DLTOVR FILE(FILE1) CLOF OPNID(FILE1) OVRDBF FILE(FILE1) SHARE(*YES) SEQONLY(*YES) OPNQRYF (SOME CONDITION) CALL PGM1 CLOF OPNID(FILE1) DLTOVR FILE(FILE1)

    rajeshece1,215 pointsBadges:
  • Access a OPNQRYF file using keys

    Is it possible to access a file created by opnqryf in an RPG/400 program using keys? I have defined the KEYFLD parameter but the RPG doesn't find the records when using READE or CHAIN.

    Marg5 pointsBadges:
  • OPNQRYF problem CPF9899

    DCLF FILE(LIBRARY/DISPLAY) START: SNDRCVF RCDFMT(REC) WAIT(*YES) IF COND(&IN03 *EQ '1') THEN(DO) GOTO CMDLBL(END) ENDDO IF COND(&ENQQUA1 *EQ ' ') THEN(DO) GOTO CMDLBL(START) ENDDO IF COND(&ENQQUA1 *NE *BLANKS) THEN(DO) OPNQRYF FILE((SARKNS/ENQP002)) OPTION(*ALL) + QRYSLT('&ENQQUA...

    Khadar90 pointsBadges:
  • WRKQRY query

    Hi, I have a CL program which uses WRKQRY to generate a report out of it. Now I have a requirement to change a field which holds Quantity and I want to divide this by 10 to the power of another field say DecFld. ie if Quantity is 359686 and DecFld is 2, I want 359686/10**2 = 3596.86 . Is it...

    RamvishakRamesh2,505 pointsBadges:
  • OPNQRYF query not working to filter pfdiv records

    I have 4-fileds on Display File like frdiv(zoned),todiv(zoned),frpr(char),topr(char). All the fields are of size 2 only. I am using a "OPNQRYF" to filter the records from a Physical file (pfdiv), it contains 1,25,000 records . Through this openqryf all the selected records I will copy to a file...

    Khadar90 pointsBadges:
  • OPNQRYF error in QRYSLT

    PGM DCLF FILE(LIBRARY/DISPLAY) START: SNDRCVF RCDFMT(REC) WAIT(*YES) IF COND(&IN03 *EQ '1') THEN(DO) GOTO CMDLBL(END) ENDDO IF COND(&ENQQUA1 *EQ ' ') THEN(DO) GOTO CMDLBL(START) ENDDO IF COND(&ENQQUA1 *NE *BLANKS) THEN(DO) OPNQRYF FILE((SARKNS/ENQP002)) OPTION(*ALL) +...

    Khadar90 pointsBadges:
  • How to toggle between two columns in a subfile

    I want to toggle between two columns in a subfile...I'm using following code to condition the fields...however when i display subfile none of the fields are displayed...is there anything else i need to take care of?A #PROCP 8A O 6 22 A 15 DSPATR(ND) A #ORDERP 8A O 6 22 A N15 DSPATR(ND) ---------- C...

    Nutangujar895 pointsBadges:
  • How to remain on same page on Load All Subfile

    I am using Load All Subfile. I used Page Down key and went to 2nd page then on 2nd Page I pressed ENTER Key, then it went back to the first page of subfile. I am using COBOL program to write the subfile. Can anybody tell me how to remain on the same page after pressing ENTER key on Load All...

    Vids295 pointsBadges:
  • Single Page Subfile code

    Hi i have started learning Subfile and i've written a Load All Subfile code to display all the records in a PF. Iit is working fine.But I want to know what else should i include in this code to make it accodring to coding standard. Also i need help in writing the single page Subfile program.So what...

    ITKBHARAT120 pointsBadges:
  • Display only subfile record format

    I am using load all subfile...in that first it will display all records. My question is when i give any condition it has to display empty subfile ie.only subfile record format? plz guide me as early as possible..

    shyedajmal285 pointsBadges:
  • Delete all records from file using SQLRPGLE

    How to delete all the records from file(bpro1) using sqlrpgle?

    Minuvinu35 pointsBadges:
  • Variable not found when calling a SQLRPGLE program

    Variable not found when calling a SQLRPGLE program with parameters in CL program CALL PGM(LIBXYZ/TESTRPG1) PARM(&LIBNAM &FILNAM) here LIBNAM AD FILNAM are passed with VALUES to the SQLRPGLE program and at sql statemet ie. insert INTO LIB/FILl( LIB is having the value and FILL is not getting...

    ravula725 pointsBadges:
  • Problem with updating status of PF1 in SQLRPGLE

    Please help. I am trying to execute the below code but the update doesn't seems to be happening. DDATS E DS EXTNAME(PF1) C/EXEC SQL C+ DECLARE TESTC CURSOR FOR SELECT * FROM PF1 ORDER BY NUMBER C+ FOR UPDATE OF STATUS C/END-EXEC *OPEN the CURSOR C/EXEC SQL C+ OPEN TESTC C/END-EXEC C/EXEC SQL C+...

    juslikdat1440 pointsBadges:
  • How to write multiple SQLRPGLE records into a printer file

    C/EXEC SQL C+ SELECT DISTINCT(CTP),COUNT(*) INTO :$Ctp,:#Ctotl FROM CUSTPF C+ GROUP BY CTP C/END-EXEC CTP is CustomerType in Customer File. Here actually I am getting 3 records as output. But I don't know how to write those 3 records into a printer file. Can anybody explain me how to write the...

    Sasikumarr200 pointsBadges:
  • Character in Cast argument not valid

    I need to retrieve the RRN and use it within my RPGLE program. I have the Select RRN(file) statement, but I get a Character in Cast argument not valid when executing. Any suggestions?

    trishahles10 pointsBadges:
  • How to write SQLRPGLE query with many select criteria

    I have a report to print using SQLRPGLE. The Report criteria screen has around 15-20 select conditions. Based on the conditions entered by the user, I build a query of type: Select * from emp1 where val1 = ? and val2 =? and val3 = ? and........... This is the first time I'm dealing with so many...

    Nutangujar895 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