on 03-07-2007 4:55 AM
hi all,
this is the documentation in main window in script. i have migrated it into smartform. now what r the changes needed to do for this code in smartform. pls help me . its very urgent.
MAIN
Get Header data from LIKP table
IF &FLAG& NE 1
PERFORM GET_HEADER_DATA IN PROGRAM ZPTFS_PICKLISTROUTINES
USING <AK-VBELN&
CHANGING &LIKP-WADAT&
CHANGING &LIKP-KODAT&
CHANGING &LIKP-LFDAT&
CHANGING &LIKP-KUNNR&
CHANGING &CONTACT_NAME&
CHANGING &CONTACT_NUMBER&
CHANGING &LIKP-VSTEL&
ENDPERFORM
DEFINE &FLAG& = 1
ENDIF
Check the change in Storage type to reprint the column headings
PERFORM CHECK_STORAGE_TYPE IN PROGRAM ZPTFS_PICKLISTROUTINES
USING <AP-VLTYP&
USING &OLD_VLTYP&
CHANGING &PRINTHEADER&
CHANGING &OLD_VLTYP&
ENDPERFORM
Get the No. of Containers and Container Unit
PERFORM GET_CONT_INFO IN PROGRAM ZPTFS_PICKLISTROUTINES
USING <AP-TANUM&
USING <AP-LGNUM&
USING <AP-TAPOS&
CHANGING &CONT_NO&
CHANGING &CONT_UNIT&
CHANGING &ORD_REF&
ENDPERFORM
Print the column headings
IF &PRINTHEADER(C)& NE '1' OR &VPAGE& NE &PAGE&
PROTECT
From Storage Type <ap-vltyp&
,, ,,,,, ,, ,, ,, ,, ,, ,,,,
Material/ Line No.of Cntr Batch Source Cntr Picked
Description Item Qty UM Cntr Type Number Bin Number Order Reference by
&SYST-ULINE(125)&
ENDPROTECT
ENDIF
DEFINE &VPAGE& = &PAGE&
Print detail lines
PROTECT
SIR001000 - Wasimkhan - Aug 18, 2006
<AP-MATNR(09)& <AP-TAPOS(6)& <AP-VSOLA(11)& <AP-ALTME(3)& &CONT_NO(C)& &CONT_UNIT(3)& <AP-CHARG& <AP-VLPLA& &ORD_REF(C)&
Material Description Taken on Second Line
<AP-MAKTX(40)& ________ ____________ ____________
<AP-VLENR&
Get Item Picking Instructions from long text
DEFINE &LANGU& = &SYST-LANGU&
DEFINE &TEXTID& = 'ZNOI'
DEFINE &TEXTOBJECT& = 'VBBP'
PERFORM READ_TEXT_ITEM IN PROGRAM ZPTFS_PICKLISTROUTINES
USING <AK-VBELN&
USING <AP-POSNR&
USING &LANGU&
USING &TEXTID&
USING &TEXTOBJECT&
CHANGING &LINE_INST&
ENDPERFORM
IF &LINE_INST& NE &SPACE&
&LINE_INST(80)&
ENDIF
ENDPROTECT
thanks in advance,
Ramana
Hi Ramana Prasad,
If you closely look into the given code, you can find there are some dynamic calls for the routines to the program <i><b>'ZPTFS_PICKLISTROUTINES'</b></i> all the variables are getting populated from these routines.
In that way, what I can suggest is
1. Declare all the variables to be printed in the smartform first,
2. Create some code lines in smart form by right clicking on respective node,
3. Copy the code of respective routine from the program <i><b>'ZPTFS_PICKLISTROUTINES'</b></i>.
4. Now when you have all the values populated, print them by creating text windows.
5. Finally you need to take care of page breaks. (Instead of PROTECT ...ENDPROTECT)
If you feel this info is not enough, you can contact me for more information.
<i><b>
Thanks & Regards
Ali S</b></i>
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
hi idenify the requirement, then find the code in program ZPTFS_PICKLISTROUTINES,,
write this code in u smartform based the requirement
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
81 | |
10 | |
10 | |
9 | |
7 | |
6 | |
6 | |
5 | |
4 | |
4 |
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.