Screen compression problems in sales order additional data b screens

Question

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

Answer 1

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'.