Q:Hi all,i want accurate answer with code using in built
functions.please sent me code as soon as posible.
I have program nmed PGM1 which '' RETRIEVE Current
production date''should correctly default the production
date for the user who is issuing raw materials to the
manufacturing.The production date can be different from the
celendra date.
However, the program does not make the correct adjustment
for all manufacturing plants.
there is a parameter which determines the
production start time e.g. 07:00 if the system time
precedes this,the program subtracts one from the celendra
day.This work fine when the celendar day starts after
production day as it does in England,the system should be
adding one to the celendar day during the overlap.
unfortunately the program was desined to assumed the
celendar day always starts before the production day.
Change required in the program:
Change the
PROGRAM PGM1 to use the new parrameter to decide whether to
add or subtract 1 from the celendar day when determining
the production date.
No Answer is Posted For this Question
Be the First to Post Answer
what is estimation? and what is the level identifier parameter in PF?
thanks mr.Harshad R Suryawaunshi,i'm new to as400 i think you are telling in rpgile i know only rpg400 if possible can you tell in rpg400
How to search particular records from the database file in rpg?
How to find d key field of a pf that doesn’t have source physical file?
difference between 1:%found and %equal built function in detail with example .
Why we need to give File and To file Names While we are using OVRDBF. What is your understanding related to this?
what is commitment control?explain about it?
how to display all the members records in a physical file without using ovrdbf?
we are sending data of physical file to screen design and it is showing no record why?
how do u find whether a record is locked or not??
list down and describe the sub systems vailable
1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the error through the RPG/400
10 Answers IBM, Tech Mahindra,