topic Re: Screen compression problems in sales order additional data b screens in Application Development and Automation Discussions

Screen compression problems in sales order additional data b screens

Former Member — Mon, 24 Oct 2005 14:35:35 GMT

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

Re: Screen compression problems in sales order additional data b screens

Former Member — Mon, 24 Oct 2005 14:56:38 GMT

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

Max

Re: Screen compression problems in sales order additional data b screens

Former Member — Mon, 24 Oct 2005 15:04:00 GMT

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

subba_kv@hotmail.com

Re: Screen compression problems in sales order additional data b screens

Former Member — Mon, 24 Oct 2005 15:15:55 GMT

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

Re: Screen compression problems in sales order additional data b screens

Former Member — Tue, 25 Oct 2005 04:31:24 GMT

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.

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