10-07-2005 7:22 AM
Hi everyone,
I want to know the logic and steps involved in implmenting the functionality. pls help me out
Table YKXRDAWERKS consists of two fields Landlord plant YWERKS_LANDLORD and Logical Plant YWERKS_LOGICAL. The table holds the plant number of the landlord and the logical. Two new fields should be added to hold the description of the plant. The plant description is existing in another table T001W under field Name1. The T001W-name1 field holds the description of both the landlord and logical plant
The Business requirement is that 2 new fields need to bring automatically T001W-name1 into the table. Users will only enter landlord plant and logical plant number into the table and the plant description should automatically be populated with the T001W-name1 description.
So its clear that when user enter the landlord & logical plant number the corresponding description should be fetched from the table T001W and added to 2 new fields.
10-07-2005 7:41 AM
Hi Suresh,
If the table maintainance generator is activated for your table, then go to environment->modification->events
under event 21 create one subroutine which address the requirement.
cheers
charan.
10-07-2005 7:41 AM
Hi Suresh,
If the table maintainance generator is activated for your table, then go to environment->modification->events
under event 21 create one subroutine which address the requirement.
cheers
charan.
10-07-2005 9:55 AM
Hi Suresh,
Let us assume new fields of the table to be inserted as "landlord_name"
and "logical_name" both of which are of type T001W-NAME1.
add these fields to the table "YKXRDAWERKS" and regenerate the table maintenance generator.
You can create a subroutine and insert it in "Form routine" against event "21" in "FORM Routines to be called from view maintenance".
For example you created a routine by name "get_text".
then you add
perform get_text.
code][/code]
form get_text.
select single name1 from T001W into YKXRDAWERKS-landlord_name
where werks eq YWERKS_LANDLORD.
select single name1 from T001W into YKXRDAWERKS-logical_name
where werks eq YWERKS_LOGICAL.
endform.