Input_Box.spTETELEK.Parameters.ParamValues['@MUV']:='DELALL';
              Input_Box.spTETELEK.Parameters.ParamValues['@FEJID']:=SzamlakID.Value;
              Input_Box.spTETELEK.ExecProc;

              Input_Box.spFORGALOM.Parameters.ParamValues['@MUV']:='DEL';
              Input_Box.spFORGALOM.Parameters.ParamValues['@ID']:=SzamlakID.Value;
              Input_Box.spFORGALOM.ExecProc;