1.WHAT IS WRONG WITH THE CODE BELOW?
C CUSTNO CHAIN CUSTMAST
IF %ERROR

can any body find the wrong please?

2.What builtin function will you use to achieve the
following functionality?
C QTY IFLT *ZERO
C QTY MULT-1 QTY
ENDIF

Answers were Sorted based on User's Feedback



1.WHAT IS WRONG WITH THE CODE BELOW? C CUSTNO CHAIN CUSTMAST ..

Answer / ajit

C CUSTNO CHAIN CUSTMAST
IF %ERROR

1) The position is incorrect.
2) If you mistakenly wrote incorrect position, then for %ERROR, you should use CHAIN(E).
3) Use EVAL %ABS(Name of the variable) for 2nd Q.

Is This Answer Correct ?    7 Yes 1 No

1.WHAT IS WRONG WITH THE CODE BELOW? C CUSTNO CHAIN CUSTMAST ..

Answer / jaijo

1. CHAIN(E)has to be used and not chain.

2. %abs

Is This Answer Correct ?    5 Yes 1 No

1.WHAT IS WRONG WITH THE CODE BELOW? C CUSTNO CHAIN CUSTMAST ..

Answer / ved dubey

1. The Position of opcode if is not valid...
2. %ABS can be used instead of this code

Is This Answer Correct ?    3 Yes 1 No

1.WHAT IS WRONG WITH THE CODE BELOW? C CUSTNO CHAIN CUSTMAST ..

Answer / naveen chandra joshi

%error should nto be user with Chain opcode. %Found()/% Not
Found() is used with Chain opcode.

Is This Answer Correct ?    4 Yes 2 No

1.WHAT IS WRONG WITH THE CODE BELOW? C CUSTNO CHAIN CUSTMAST ..

Answer / syam

A1. C CUSTNO CHAIN(E) CUSTMAST
A2. QTY = %ABS(QTY * -1)

Is This Answer Correct ?    2 Yes 6 No

Post New Answer

More RPG400 Interview Questions

Set on command is used for closed all opened files , initialize var and release resource , return cmd is used for return to calling program but my req. Is dnt close opened files and resource must released while doing transactions , how can i do this...?

1 Answers  


i want code and what are used key words are ...like wrkmbrpdm screen (q) i have a file with 3 fields empno,empname,empaddr... here you give the empno it displays from that number to remaining empno's how? sub file screen: employee details pos to:empno then enter empno empname empaddr so file have 100 records from 1 to 100 so the above pos you give the 55 empno...it displays the from 55 to remaining... ...... please share this answel

2 Answers   IBM,


there is any limit to display the members in rpg400?

3 Answers  


explain sflclr, sflend, sfldlt, and sflcsrrrn?

1 Answers   IBM,


What will be the value of STRING after line 0106 is executed in the code below? 0101 E* Fromfiletofile..tabnameprnentlenpdatabnamlenpda 0102 E ARR 8 1 0103 ISTRING DS 0104 I 1 8 ARR 0105 C MOVE *BLANK STRING 0106 C MOVEA'ABC' ARR A) 'AAAAAAAA' B) 'BBBBBBBB' C) 'CCCCCCCC' D) 'ABC ' E) ' ABC'

2 Answers  


Mr.Sidc sirfor my question{how to convert date format from one format to another i think in CL/400 its CVTDAT,Please tell in RPG/400 sir not in RPGILE} you have answered using MOVE opcode,can you illustrate me with a small example sir very kind of you.

1 Answers   CTS, IBM, iGate,


When it is desirable to describe files Internally?

1 Answers  


Can we possible to key with the date field?

1 Answers   IBM,


Anybody know the difference of primary file and full procedural file

4 Answers  


Thanks gagan for your answer,i'm new to as400,i don't know embedded sql in rpg.can you send me the coding for the below mentioned question in embedded sql rpg. how to retrieve particular field records from a physical file,say i have a physical file called 'employee' in it i have to retrieve the records of a field 'admin' present in pf 'employee' using rpg,but i should not use logical file or openquery file.

2 Answers   iGate,


difference betwen keywords and opcodes

3 Answers  


How to get only unique records from a file which contains duplicate data using CPYF command ? Example : FILEA has duplicate records and FILEB is a UNIQUE defined.... and I want to get the data from FILEA to FILEB by eliminating all the duplicate records...

2 Answers  


Categories