Support payload_error in func_sdp_compose_cep_header().

applications/lofar2/libraries/sdp/tb/vhdl/tb_sdp_pkg.vhd

@@ -64,6 +64,7 @@ package tb_sdp_pkg is
                                        ip_header_checksum : natural;
                                        sdp_info           : t_sdp_info;  -- app header
                                        gn_index           : natural;
+                                       payload_error      : std_logic;
                                        beamlet_scale      : natural;
                                        beamlet_index      : natural;
                                        dp_bsn             : natural) return t_sdp_cep_header;
@@ -71,6 +72,7 @@ package tb_sdp_pkg is
   function func_sdp_compose_cep_header(ip_header_checksum : natural;
                                        sdp_info           : t_sdp_info;  -- app header
                                        gn_index           : natural;
+                                       payload_error      : std_logic;
                                        beamlet_scale      : natural;
                                        beamlet_index      : natural;
                                        dp_bsn             : natural) return t_sdp_cep_header;
@@ -283,6 +285,7 @@ package body tb_sdp_pkg is
                                        ip_header_checksum : natural;
                                        sdp_info           : t_sdp_info;  -- app header
                                        gn_index           : natural;
+                                       payload_error      : std_logic;
                                        beamlet_scale      : natural;
                                        beamlet_index      : natural;
                                        dp_bsn             : natural) return t_sdp_cep_header is
@@ -326,7 +329,7 @@ package body tb_sdp_pkg is
     v_hdr.app.sdp_source_info_nyquist_zone_id         :=     sdp_info.nyquist_zone_index;
     v_hdr.app.sdp_source_info_f_adc                   := slv(sdp_info.f_adc);
     v_hdr.app.sdp_source_info_fsub_type               := slv(sdp_info.fsub_type);
-    v_hdr.app.sdp_source_info_payload_error           := TO_UVEC(0, 1);
+    v_hdr.app.sdp_source_info_payload_error           := slv(payload_error);
     v_hdr.app.sdp_source_info_beam_repositioning_flag := slv(sdp_info.beam_repositioning_flag);
     v_hdr.app.sdp_source_info_beamlet_width           := TO_UVEC(c_sdp_W_beamlet, 4);
     v_hdr.app.sdp_source_info_gn_id                   := TO_UVEC(gn_index, 8);
@@ -345,6 +348,7 @@ package body tb_sdp_pkg is
   function func_sdp_compose_cep_header(ip_header_checksum : natural;
                                        sdp_info           : t_sdp_info;  -- app header
                                        gn_index           : natural;
+                                       payload_error      : std_logic;
                                        beamlet_scale      : natural;
                                        beamlet_index      : natural;
                                        dp_bsn             : natural) return t_sdp_cep_header is
@@ -356,6 +360,7 @@ package body tb_sdp_pkg is
                                        ip_header_checksum,
                                        sdp_info,
                                        gn_index,
+                                       payload_error,
                                        beamlet_scale,
                                        beamlet_index,
                                        dp_bsn);