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
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 |
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 |
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 |
Answer / syam
A1. C CUSTNO CHAIN(E) CUSTMAST
A2. QTY = %ABS(QTY * -1)
| Is This Answer Correct ? | 2 Yes | 6 No |
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...?
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
there is any limit to display the members in rpg400?
explain sflclr, sflend, sfldlt, and sflcsrrrn?
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'
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.
When it is desirable to describe files Internally?
Can we possible to key with the date field?
Anybody know the difference of primary file and full procedural file
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.
difference betwen keywords and opcodes
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...