RPG programming Tutorial by AS400 and SQL Tricks

Edit Mode

IBM i, AS400 Tutorial, iSeries, System i-Read all source member of source PF in RPG-override-writePF

#ibmi #rpgle #as400 IBM i, AS400 Tutorial, iSeries, System i -Read all source member of source physical file in RPG || Overriding all the source member -write PF. override source physical file using EXTFILE override source member using EXTMBR read all the source member of QRPGLESRC source file. ______________________________________________________________ Source for output fileSOURCEOUT: --------------------------------------------------------- A R RSRCOUT A SRCMBR 10A A SRCRRN 5P 0 A SRCSEQ 6P 2 A SRCDAT 6P 0 A SRCDTA 100A PGM11: ------------ F* File Specification FsourceIn IF F 112 disk F EXTFILE('IBMICLASS1/QRPGLESRC') F EXTMBR('*ALL') F INFDS(FileInfo) FSourceOut O E disk D FileInfo DS D Member 129 138 D Rrn 397 400B 0 ISourceIn NS I 1 6 2srcseq1 I 7 12 0srcdat1 I 13 112 srcdta1 /Free Read sourceIn; Dow Not%EOF(SourceIn); SrcMbr = Member; SrcRRN = RRN; srcseq = srcseq1; srcdat = srcdat1; srcdta = srcdta1; Write Rsrcout; Read sourceIn; ENDDO; *INLR = *ON; /End-Free ______________________________________________________________________________ Important note: _______________ Please change the library name and source physical file name as per your need in EXTFILE keyword.

List of Videos

IBM i, AS400 Tutorial, iSeries, System i-Read all source member of source PF in RPG-override-writePF

IBM i, AS400 Tutorial, iSeries, System i -Read source member in SRC PF in RPG & write source to PF

IBM i, AS400 Tutorial, iSeries, System i -String Parsing|Extract chars b/w backslash in input string

IBM i, AS400 Tutorial, iSeries, System i - Rename keyword in RPGLE| write one member to other member

IBM i, AS400 Tutorial, iSeries, System i - Prefix keyword in RPG | EXTFILE| EXTMBR| EXTDESC

IBM i, AS400 Tutorial, iSeries, System i - EXTMBR - override file member without using OVRDBF

IBM i, AS400 Tutorial, iSeries, System i -EXTDESC Keyword in F-specs in RPG|NO OVRDBF during compile

IBM i, AS400 Tutorial, iSeries, System i -Write forcefully in output file in RPG -OVRDBF FRCRATIO(1)

IBM i, AS400 Tutorial, iSeries, System i - Write forcefully output--BLOCK(*NO) & OVRDBF SEQONLY(*NO)

IBM i, AS400 Tutorial, iSeries, System i - Write forcefully in output file in RPG - FEOD function

IBM i, AS400 Tutorial, iSeries, System i - Same Name File in different library- Use OVRDBF command

IBM i, AS400 Tutorial, iSeries, System i - Same Name File present in different library- Use EXTFILE

Flat File Processing in RPG program - Create Flat Files

Pre-Run Time Array IN RPG AS400

PERRCD keyword in Compile Time Array in RPG AS400

Compile Time Array in RPG AS400

Run Time Array in RPG AS400

Lookup to an array element in RPG AS400

Lookup to or Search Array data Structure in RPGLE

Passing Data Structure as a pointer to a RPG program | Data STRUCTURE pointer in rpg

Array based on pointers in RPG AS400

Dynamically sized array in RPG AS400

Bif's used with pointers in RPG AS400

Simple calculator using pointers in RPG AS400

Pointers in RPG AS400

IBM i, AS400 Tutorial, iSeries, System i -Remove any character from the string occur any no. of time

Pointers based on UCS2 string with CCSID 1200 in RPG.

IBM i, AS400 Tutorial, iSeries, System i -Read any 2 members out of 3(any) of a file in RPG program

IBM i, AS400 Tutorial, iSeries, System i - Can we use *LOVAL always with SETLL operation ?

IBM i, AS400 Tutorial, iSeries, System i - Why we use SETLL with READ operation in RPGLE?

IBM i, AS400 Tutorial, iSeries, System i - Use SETLL-READE in RPGLE program to read all key records

IBM i, AS400 Tutorial, iSeries, System i - CHAIN vs SETLL-READE_ENGLISH

IBM i, AS400 Tutorial, iSeries, System i - *HIVAL/Key value with SETGT and then using READP concept

IBM i, AS400 Tutorial, iSeries, System i - SETGT with READPE concept in Detail_ENGLISH

IBM i, AS400 Tutorial, iSeries, System i - Introduction to RPG programming for Beginners_ENGLISH

Numeric to Character in RPGLE AS400

Data Structure in RPG IV AS400 to Break fields into subfields | My Easy Classes

Data Structure in RPG IV AS400 to group fields | My Easy Classes

File information data structure in RPGLE | infds in as400 | My Easy Classes

Exception handling in rpgle || INFDS used with INFSR to catch file exception in RPG.

Program status data structure in RPGLE AS400 | PSDS in RPGLE

Exception handling in rpgle as400 | PSDS and *PSSR to catch program exceptions in RPGLE

LIKEDS Keyword in RPGLE AS400

qualified data structure in rpgle

indicator data structure in rpgle | INDARA keyword | INDDS keyword

data area data structure in rpgle

*lda | local data area data structure in rpgle

externally described data structure in rpgle | EXTNAME & EXTFLD

Nested data structure concept in RPGLE AS400

Reading Data area in RPGLE AS400 - Update and Lock issues | MY EASY CLASSES