Q1.How we can copy the data of file one session to another
session?
Q2.how we can execute a loop infinitely in AS/400 coding?
Q3.In ALDON tool,multitask is posible on a perticular
object by the user?
Answers were Sorted based on User's Feedback
Answer / venkat b
Q2.how we can execute a loop infinitely in AS/400 coding?
Loop with a condition which is always true.
DOW '1'
//whatever
ENDDO
| Is This Answer Correct ? | 9 Yes | 2 No |
Answer / jay
1.By FTP command we can transfer data from one session to
another session.
2. By the various command like DOW and DOU.
3. Multi task can contain for the same object but that
object should be in Production.
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / divakar
1. -SavObj OBJ(FILE) SAVLIB(FLIB) SAVF(FLIB/FSAVF)
-FTP << ip >>
user: USER
pwd: xxxxxx
bin
put FLIB/FSAVF TLIB/TSAVF
quit
- RSTOBJ *ALL SAVLIB(FLIB) SAVF(TLIB/TSAVF) TOLIB(TLIB)
2. DCL &Flag *char 1 '1'
Dow cond(&flag *eq '1')
. . . .
. . . .
EndDo
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / sunita singh
1. By using CRTDDMF command you can copy the data of file
of one session to another
2. By using DOW and DOU command
D Done s n inz(*off)
/free
DOU Done;
//work done
ENDDO;
/end-free
| Is This Answer Correct ? | 0 Yes | 0 No |
Q1 you can copy the data from one session to other session
using NDM
on Menu ispf
type START NDM
Then seelct to the req option for your requriments
| Is This Answer Correct ? | 4 Yes | 5 No |
Answer / gayathri
2. Do *Hival
Call program or perform calculation
Enddo
| Is This Answer Correct ? | 0 Yes | 1 No |
RPG/400 number of Records present in a physical file using file information data structure FPF001 IP E DISK F KINFDS INFDS1 IINFDS1 DS I *RECORD RECORD Is this coding correct sir,i have given I P E that is I- input,P-primary file,E-externally described. Primary to use RPG logic cycle,is this the correct method because we have to find number of records present using file information data structure in RPG/400 without doing any input/output operations on the file and also without using DSPFD,SQL. If the above coding is correct means,when i compile the program it gets compiled,but if i call the program it does not return anything,i need number of records,please complete the coding sir.
what is data area and how it is used in rpg program ?
list down and describe the sub systems vailable
This is my Physical file 'EMPS' existing in library "TAMIL1" and its record format is 'EMPRCD" a)its source is R EMPRCD ENO 4 0 ENAME 10 EADD 10 b)The records present in EMPS are as follows ENO ENAME EADD 0001 tamil coimbatore 0002 kumar bangalore 0003 sunder bangalore 0004 arunkumar chennai 0005 pandi hyderabad 0006 santhosh hyderabad 0007 sasi salem 0008 kalai chennai 0009 suresh hyderabad 0010 vijay bangalore 0011 Arul chennai 0012 velu chennai 0013 khan bangalore 0014 praba chennai 0015 praba.p coimbatore 0016 anand ooty 0017 raja erode 0018 sankar erode 0019 vadivel namakkal 0020 anbu chennai 0021 Ajith mumabi c)now i want to select the 'ENAME' field records starting with 'S' for that i have created a RPG program its source code is PGM DCLF FILE(TAMIL1/EMPS) DCL VAR(&MYENO) TYPE(*CHAR) LEN(4) OVRDBF FILE(EMPS) SHARE(*YES) OPNQRYF FILE((TAMIL1/EMPS)) QRYSLT('ENAME *EQ %WLDCRD("S *")') READ: RCVF RCDFMT(EMPRCD) MONMSG MSGID(CPF0864) EXEC(GOTO CMDLBL(END)) CHGVAR VAR(&MYENO) VALUE(&ENO) SNDUSRMSG MSG(&MYENO) SNDUSRMSG MSG(&ENAME) SNDUSRMSG MSG(&EADD) GOTO READ END: CLOF OPNID(EMPS) DLTOVR FILE(EMPS) ENDPGM Is this coding correct sir,the program gets compiled,and if i call it it says query running but records are not displayed.please help me out
WHAT IS MENT BY RECORD LEVEL IDENTIFIER ? WHAT IS THE PURPOSE OF THIS?
steps involved in debugging and types of debugging modes?
IN RLU what are the record level keyword is used?
What are different ways to pass data between programs and which one is the efficient way?
why we do STRSRVJOB in batch debugging in as400
How to read data from Nth member of a physical file containing some X number of members in it? "Provided member names are unknown"
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.
Suppose we have 10 records with same name and we are reading using READE,after 4 record i have to use CHAIN what is the output