Hi Daxer’s !!!
Recently I have
gone through one customization.
Scenario:Add “Registrationnumber”
field in Other Information group of Customer form if you enter some value on registration
number it should update at taxes action pane  >>tax registration >>Registration number
>>First I have
added one field in custTable like sk_Registrationnumber and also added that
field to customer form as above screen shot
Note : Based on
Customer Accountnum in custTable ,i need to update  registrationnumber in TaxRegistration table so
I need to check relation between Custtable and Taxregistration
Taxregistration.dirpartylocation>>Dirpartylocation.party>>custtable.party
CustTable>>Modifiedfield()>>
case fieldNum(CustTable,sk_registrationnumber):
            if (this.SK_RegistrationNumber)
               
{
               
ttsBegin;
               
while select forupdate  taxregistration
                   
join DirPartyLocation
                        where taxregistration.DirPartyLocation==DirPartyLocation.RecId
                            join CustTable
                                where DirPartyLocation.Party==CustTable.Party
                   
if(TaxRegistration)
                   
{
                        {
                           
taxregistration.validTimeStateUpdateMode(validTimeStateupdate::Correction);
                           
taxregistration.ValidFrom=today();
                           
taxregistration.ValidTo=today()+20;
                            taxregistration.RegistrationNumber=this.SK_RegistrationNumber;
                           
taxregistration.update();
                        }
                   
}
               
ttsCommit;
               
}
---------------------------or------------------------------------
case fieldNum(CustTable,SK_RegistrationNumber):
            if(this.SK_RegistrationNumber)
            {
               
ttsBegin;
               
//TaxRegistration = TaxRegistration::find(DirPartyLocation::findByPartyLocation(CustTable::find(this.AccountNum)
              
//
TaxRegistration.DirPartyLocation=Dirpartylocation::findByPartyLocation(this.Party,true).Location;
              
//
TaxRegistration.TaxRegistrationTypeApplicabilityRule=5637146891;
               
//TaxRegistration.selectForUpdate(true);
               
TransDate = systemDateGet();
               
transDateTo = dateMax();
               
TaxRegistration.validTimeStateUpdateMode(ValidTimeStateUpdate::Correction);
               
SELECT forUpdate validTimeState(TransDate,
transDateTo) * from TaxRegistration
                   
Join dirpartylocation
                        where
TaxRegistration.DirPartyLocation==dirpartylocation.RecId
                            join
DirPartyTable 
                                where
dirpartylocation.Party==DirPartyTable.RecId
                                    join CustTable 
                                        where DirPartyTable.RecId==CustTable.Party;
                if(TaxRegistration)
               
{
                   
TaxRegistration.RegistrationNumber=this.SK_RegistrationNumber;
                   
TaxRegistration.update();
               
}
               
ttsCommit;
            }



 
 
No comments:
Post a Comment