Screen compression problems in sales order additional data b screens

[Former Member]

When i enter va01 for the slaes order he screens are:

SAPMV45A8309, Sales Document Header - User Exit Header

SAPMV45A8459, Sales doc. Item - User exit item

Use screen painter to change them. (transaction SE51)

what happened is that i have four boxes in additional data b subscreens and i am calling another sub screen 9801 which contains table control what happened is that while run time i am getting gap in the boex of screen 8459, how to compreess the boxes or spaces to accomodate the table control.

very urgent pls.....

regards

subba

[Former Member]

When i enter va01 for the slaes order he screens are:

SAPMV45A8309, Sales Document Header - User Exit Header

SAPMV45A8459, Sales doc. Item - User exit item

Use screen painter to change them. (transaction SE51)

what happened is that i have four boxes in additional data b subscreens and i am calling another sub screen 9801 which contains table control what happened is that while run time i am getting gap in the boex of screen 8459, how to compreess the boxes or spaces to accomodate the table control.

very urgent pls.....

regards

subba

[Former Member]

Hi

You should do it by screen painter, try to assign a sizes are right for you.

Max

[Former Member]

Hi Max,

Thanks for your reply i tried to adjust the screen sizes , but not coming

BASICALLY WHAT WE WANT IS WE NEED TO HIDE some boxes in additonal data b screens when we run va01 total ffive boxes have to come when we run va01 including the table control from sapmv45a 9801 screen.

i used sapmv45a 8301 header - normal screen

sapmv45a 8459 subscreen calling sub screen 9801.

i used modification groups for different fields in the boxes for 8459 screen,

pls let me know if ur not clear...pls traet this urgent.

regards

subba

[email protected]

[Former Member]

Hi

If at runtime you want to hide some boxes you should use LOOP AT SCREEN/ENDLOOP statament, but you should hide all fields in those boxes too.

LOOP AT SCREEN.

screen-ACTIVE = 0.

modify screen.

ENDLOOP.

I haven't sapmv45a 9801 screen in my release

[Former Member]

Thanks for your reply , Actually i am calling 9801 sub screen with table control on to 8459 sub screen(sapmv45a program)

still the problemm remains the same. I am using the code as below.zie,z01,zia are all modification groups to hide the boxes in the 8459 screen, pls check my code and revert back urgently urgently.....

PROCESS BEFORE OUTPUT.

• Verarbeitung vor der Ausg

MODULE ZZ_GET_TEXT.

MODULE ZZ_FIELD_SETTINGS.

CALL SUBSCREEN ZZAUDIT INCLUDING 'SAPMV45A' '9801'.

PROCESS AFTER INPUT.

CALL SUBSCREEN ZZAUDIT.

MODULE ZZ_FIELD_SETTINGS OUTPUT.

LOOP AT SCREEN.

• Determine main grouping based upon mod group 3 field.

CASE SCREEN-GROUP3.

WHEN 'ZIA'. " Orbit /interface architecture.

PERFORM ZZ_FIELD_ZIA.

WHEN 'ZIE'. " ERI interface.

PERFORM ZZ_FIELD_ZIE.

WHEN 'Z01'. " Generic -Relevant for all interfaces potentially.

PERFORM ZZ_FIELD_Z01.

ENDCASE.

• Handle display of contract versus other doc types.

IF VBAK-VBTYP EQ 'G'. "Contract doc type.

IF SCREEN-GROUP4 NE 'Z02'.

SCREEN-ACTIVE = 0. " field not relevant for contract display.

ENDIF.

ELSE. "other doc types.

IF SCREEN-GROUP4 EQ 'Z02'.

• Field not relevant for non-contract display.

SCREEN-ACTIVE = 0.

ENDIF.

ENDIF.

FORM ZZ_FIELD_ZIE.

IF NOT VBAK-AUART IN ZZR_AUART.

• IA related Doc Type - Hide ERI fields

SCREEN-ACTIVE = 0.

ELSE.

• IF SY-BINPT NE 'X'. " Not Processing in BDC Mode

• SCREEN-INPUT = 0. " Turn Off Input Ability

• ENDIF.

CASE SCREEN-GROUP4.

WHEN 'ZAU'. " Audit Toggle Related

• IF zzshowaudit NE 'X'.

• screen-active = 0.

• ENDIF.

WHEN 'ENA'.

SCREEN-INPUT = 1.

WHEN 'ZTS'.

IF SY-SYSID EQ 'DV2'.

SCREEN-INPUT = 1. " Testing Allowed in Development

ENDIF.

ENDCASE.

ENDIF.

FORM ZZ_FIELD_ZIA.

IF VBAK-AUART IN ZZR_AUART.

• ERI related Doc Type -Hide IA related fields

SCREEN-ACTIVE = 0.

ELSE.

CASE SCREEN-GROUP1.

WHEN '001'. "0902 specific fields

WHEN '002'. "0902 WebCore fields

IF VBAK-VKORG NE '0902' AND

VBAK-VKORG NE '0903' AND

VBAK-VKORG NE '0917'.

SCREEN-INPUT = 0.

ENDIF.

WHEN '003'. "0917 specific fields

IF VBAK-VKORG NE '0917'.

SCREEN-INPUT = 0.

ENDIF.

WHEN '999'. "Generic Fields

IF VBAK-VKORG EQ '0917' OR

VBAK-VKORG EQ '0902' OR

VBAK-VKORG EQ '0903'.