Interested to Buy Any Domain ? << Click Here >> for more details...
There is a excel sheet having details of Old account number
and new account number. I need to update these details in
my AS400 files. i.e. all the records having old account
number should be replaced with new account number. There
can be 100 or 200 or 300 PFs...no fix files known.
how can we do this?Solution should be performance oriented
- 3 Answers
- 9732 Views
- Cap Gemini, IBM, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / kusum
Excel sheet needs to converted in DB file. We can use AS400
utility or FTP to do so. Once it is converted in DB file. We
can use SQL update script to update the Database.
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / smita
We can convert the excel sheet into file by command
CPYTOIMPF. Read this file and write programs to update 100 -
200 files for given updation of old account number. But
this solution will not provide gud performance. Is there
any other solution?
| Is This Answer Correct ? | 3 Yes | 3 No |
Answer / mahalakshmi
CPYFRMIMPF and then update the records by using SQL
| Is This Answer Correct ? | 0 Yes | 0 No |
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
Write the subfile logic program for the given concept. Load the data to the subfile depends upon the designation where designation is not a key field?
Can someone tell me tell me what is meant by message wait...?
how to retrieve RRN value in RPGLE program
can i use UPDDTA command in rpg program in which contains a file
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.
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.
I need to generate outfile for object of all the user lib. in the sysmte using cmd DSPOBJD. But this cmd is correcpted in my server,Any body tell me is there any alternative...?
can you debug ile rpg program using isdb?
Why we need to give File and To file Names While we are using OVRDBF. What is your understanding related to this?
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.
wat is meant by hidden field , why it is used?
RPG400 
