on 05-01-2008 7:36 AM
Dear all ,
I am using standard form for quotation printing but the text i enter in quotation header it is not getting displayed in the standard layout of the quotaion . is there any settings i need to do .
pls advise
Ramar
you have to read_text function module for that.......for that you need
id
object
name which is diffenrent for standard program ,you have to pass these parameters and on the basis you have to read text... i am sending you code
DATA: wa_ltext TYPE tline,
current_line TYPE i,
prev_line TYPE i.
LOOP AT ta_ltext WHERE tdline NE space.
CASE ta_ltext-tdformat.
WHEN '='.
prev_line = sy-tabix - 1.
READ TABLE ta_ltext INTO wa_ltext INDEX prev_line.
IF sy-subrc = 0.
CONCATENATE wa_ltext-tdline ta_ltext-tdline
INTO ta_ltext2-tdline.
MODIFY ta_ltext2 INDEX current_line.
ENDIF.
WHEN OTHERS.
ta_ltext2-tdline = ta_ltext-tdline.
APPEND ta_ltext2.
current_line = sy-tabix.
ENDCASE.
ENDLOOP.
-
DATA: BEGIN OF ttab OCCURS 0.
INCLUDE STRUCTURE tline.
DATA: END OF ttab.
DATA: BEGIN OF tinlinetab OCCURS 0.
INCLUDE STRUCTURE tline.
DATA: END OF tinlinetab.
DATA: BEGIN OF thead.
INCLUDE STRUCTURE thead.
DATA: END OF thead.
lv_objname = it_lips-posnr.
CONCATENATE it_lips-vbeln lv_objname INTO lv_objname.
PERFORM read_item_text1 USING lv_objname it_lips-vbeln.
&----
*& Form read_item_text1
&----
text
----
-->P_LV_OBJNAME text
-->P_IT_LIPS_VBELN text
----
FORM read_item_text1 USING P_OBJNAME
P_IT_LIPS_VBELN.
CLEAR : v_regcarr , v_intcarr ,
v_reqdate , v_commdate.
CLEAR: thead,it_likp-traty.
REFRESH : ttab, tinlinetab.
thead-tdid = '0001'.
thead-tdspras = sy-langu.
thead-tdname = p_objname.
thead-tdobject = 'VBBP'.
CALL FUNCTION 'READ_TEXT_INLINE'
EXPORTING
id = thead-tdid
inline_count = 1
language = thead-tdspras
name = thead-tdname
object = thead-tdobject
IMPORTING
header = thead
TABLES
inlines = tinlinetab
lines = ttab
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
OTHERS = 7.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
and if you ar using smartforms
you kan read text in this way
program lines
-
input parameters output parameters
gs_vbrp GV_TYPPKG
gs_item
CLEAR: GV_TYPPKG.
CONCATENATE
gs_ITEM-vbeln
gs_ITEM-posnr INTO GV_TYPPKG.
create>text, type>include text
1)text name --> &GV_TYPPKG&
2)text object-->VBBP
3)Text id ->Z009
4)lan -->en
tick mark no error if no text exists
also provide standard paragraph and first paragraph
reward points if satisfied
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
The header text I believe is really not printed in the standard script.
you have to edit the script then perform a subroutine that will then call function read_text.
reward if helpful.
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
95 | |
11 | |
10 | |
9 | |
9 | |
7 | |
6 | |
5 | |
5 | |
4 |
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.