Code: Alles auswählen.
when 'ungueltig'.
CALL METHOD <PUB__SERVICE>->API__SET_VALUE
EXPORTING
I_ALIAS = l_txticon
I_VALUE = '@5C@'
i_occ = l_zeile.
<pub__service>->api__mark_tabline( i_alias = l_tab i_occ = l_zeile ).
if <pub__service>->api__tabline_is_marked( i_alias = l_tab i_occ = l_zeile ) = true.
....
endif.
.....
Code: Alles auswählen.
form z_inaktiv_setzen.
data: y_value type datatype,
y_valdec type string,
l_zeile type i,
l_ausw type string.
l_zeile = <pub__this_line>. "Nr. der aktuellen Zeile ermitteln
case sy-dynnr. "je nach ausgewählter Registerkarte den Alias des Dropdownfeldes übergeben
when 0002. "Registerkarte Körperpflege
l_ausw = 'ZPDKPAUSW'.
when 0003. "Registerkarte Atmung
l_ausw = 'ZPDATMAUSW'.
when 0004. "Registerkarte Ruhe und Schlaf
l_ausw = 'ZPDRUSAUSW'.
when 0005. "Registerkarte Sterben
l_ausw = 'ZPDDIEAUSW'.
when 0006. "Registerkarte Kommunizieren
l_ausw = 'ZPDKOMAUSW'.
when 0007. "Registerkarte sichere Umgebung
l_ausw = 'ZPDUMGAUSW'.
when 0008. "Registerkarte Mobilität
l_ausw = 'ZPDMOBAUSW'.
when 0009. "Registerkarte sich als Mann, Frau fühlen
l_ausw ='ZPDMNFRAUS'.
when 0010. "Registerkarte Ausscheiden
l_ausw = 'ZPDAUSAUSW'.
when 0011. "Registerkarte Körpertemperatur
l_ausw = 'ZPDKTAUSW'.
when 0012. "Registerkarte Ernährung
l_ausw = 'ZPDERAUSW'.
when 0013. "Registerkarte Arbeiten und Spielen
l_ausw = 'ZPPAUSPAUS'.
endcase.
*Wert ermitteln der im Dropdownfeld ausgewählt wurde
call method <pub__service>->api__get_value
EXPORTING
i_alias = l_ausw
i_occ = l_zeile
IMPORTING
e_value = y_value
e_vdecoded = y_valdec.
*Feld auf "nicht eingabebereit setzen" wenn der Status ungültig ausgewählt wurde
if y_valdec = 'ungültig'.
<pub__field_input> = false.
endif.
endform.