explain sflclr, sflend, sfldlt, and sflcsrrrn?
Answer / Amit Singh Harit
SFLCLR (Sequence File Clear) - Clears the sequence file from record 0 through the last allocated record.nnSFLENDB - Returns the last used record number in a sequence file.nnSFLDLT (Sequence File Delete) - Deletes the specified record(s) within a sequential file.nnSFLCSR RRN (Sequence File Change Record Relative Record Number) - Moves the current position of the sequence file pointer to the specified relative record number.
| Is This Answer Correct ? | 0 Yes | 0 No |
what is estimation? and what is the level identifier parameter in PF?
I have two sessions S1 & S2 under this 3 jobs(say j1,j2,j3 under session S1) And 2 jobs(Say j4, j5 Under session S2)is running. How many QTEMP & how many LDA will create for the same.
suppose one file is used by 100 user and file is locked by 100 user, what are the impact analysis?
I have a file .In that file i have 3 fields. Those fields are eno, ename, esal.Keyfield is eno. In that file i have data like this for eno 1,2,3,4,5. Now i need to display 2nd record. That means i need to set the pointer on 2nd record... Then, write the complete rpg program using setll.
What are the necessary keywords required to code a message subfile?
How can read PF in reverse order (end to start) in CL pgm..
What is the purpose of FRCDTA keyword?
what is meant by record lock.how records are locked.what is the purpose of record lock.if records are locked what happens.how to find out which record is locked.
Q:HI friends accually ihave one problem plesase let me know the alternate code of this code. Related field description of code: Add a field, CALvsPRD, "Calendar Day Starts Before/After Production Day" to the parameter set WRKORDER which accepts values 'A' or 'B' o B = Calendar Day Starts Before Production Day o A = Calendar Day Starts After Production Day o Any other value indicates the production and calendar dates are always the same. code: Automatic Execution Of *INZSR Subroutine /Z01 * retrieves WRKORDER field values. /Z01 * Calculate default Production Date and return it to caller. /Z01 * Production date defaults to system date /Z01 C Eval P@Pdate = %DATE() /Z01 * unless Calendar date starts Before PDN(production) date and /Z01 * system time is before PDN Start Time then /Z01 * PDN date is yesterday. /Z01 C If W@CALvsPRD = 'B' and /Z01 C %TIME() < %TIME (W@Strtime) /Z01 C Eval P@Pdate -= %Day(1) /Z01 * unless Calendar date starts After PDN date and /Z01 * system time is *GE PDN(production) Start Time then /Z01 * PDN date is tomorrow. /Z01 C ElseIf W@CALvsPRD = 'A' and W@Strtime > *Zero and /Z01 C %TIME() >= %TIME (W@STrtime) /Z01 C Eval P@Pdate += %Day(1) /Z01 C EndIf /Z01 C Eval *InLr = *On
How can i check the object existance in RPG program without using QCMDEXC command.
what is overlay? how can we pass parameters in cl or rpg programing? how can we get data area value in cl or rpg programming?
thanks mr.Harshad R Suryawaunshi,i'm new to as400 i think you are telling in rpgile i know only rpg400 if possible can you tell in rpg400