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



Q1.How we can copy the data of file one session to another session? Q2.how we can execute a loop ..

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

Q1.How we can copy the data of file one session to another session? Q2.how we can execute a loop ..

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

Q1.How we can copy the data of file one session to another session? Q2.how we can execute a loop ..

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

Q1.How we can copy the data of file one session to another session? Q2.how we can execute a loop ..

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.How we can copy the data of file one session to another session? Q2.how we can execute a loop ..

Answer / jayaprabhu

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

Q1.How we can copy the data of file one session to another session? Q2.how we can execute a loop ..

Answer / gayathri

2. Do *Hival
Call program or perform calculation
Enddo

Is This Answer Correct ?    0 Yes 1 No

Post New Answer

More RPG400 Interview Questions

What is SFLNXTCHG keyword why it has used and where? Briefly explain with Example.

2 Answers   IBM,


How to set on/off a group of indicators in a single statement?

3 Answers  


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.

1 Answers  


wat is meant by hidden field , why it is used?

4 Answers   Four soft,


i want to perform uniqness on db file bt my db file nt hving key by useing rpgle.

3 Answers   HSBC,


What is the difference between iter and do?

0 Answers  


The RP program is displaying records 11 times .But there are 10 records in a pf.(ie last record is displayed twice).How to display records only 10 times?

5 Answers  


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

0 Answers   IBM,


How can we call CL program to RPG? How many number of parameter we can pass

2 Answers   TCS,


how to run only 10 modules of existing N modules in service program in RPGILE ?

3 Answers   Wipro,


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?

2 Answers   IBM, Patni,


How can you delete a record from a file in RPG without using DELETE oppcode?

2 Answers   UST,


Categories