Extremely novice question regarding entry of current date

Using LiveCycle v. 8. Just want a field to display the current date when the form is opened.
The field type is date/time. When selected, I have the script bar set to "DocReady" as the event and script language = FormCalc. Can't figure out what to put in the script line to make the field display the date.
Thanks for any help.

Hi Claudia,
make the date field readonly and place this script in the layout:ready event of the date field:
var months = new Array ("01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12");
var now = new Date();
//var dateFormat = util.printd("yyyy-mm-dd", now); //this works but produces an error message in the warnings window "util undefined"
//this.rawValue = dateFormat;
var yyyy = now.getYear() + 2000 - 100;
var mm = now.getMonth(); mm = months[mm];
var dayNumber = now.getDate();
var dd;
if (dayNumber < 9)
{dd = "0" + dayNumber;}
else {dd = dayNumber;};
if (this.rawValue == null) this.rawValue = yyyy + "-" + mm + "-" + dd;
Regards,
Chris Fourie
www.inteliform.co.za

Similar Messages

Error while posting Incoming payment Cancellation entry in Current date

Hi Experts
Scenario
Incoming payenet created on 31-05-2009
Cancellation to be done on current date - 02-06-2009
Current period selected as 010609 to 300609 in general settings
When Incoming payment is cancelled - The system shows message ' The selected period is locked, Posting will be created in Current period', Continue - ?
When YES is clicked - 'Date deviates from permissible range - (Journal Entry - posting date) Msg - (173-11)
Document Numbering Journal entry is for Current period. (All the Journal entries are getting posted in current date, hence Document numbering is correct for Journal entry)
PLEASE NOTE - The cancellation entry is needed to be passed on system date (02-06-2009) and NOT original document date of incoming payment (31-05-2009)

Hi Sundaraja
In 2007 B this issue does not arise, working FINE
In 2005 B, there is option to set period as Current which I have done. and Active 'YES' & Locked 'NO'. Infact I have done this for all the periods of yr 2009-10.
Still getting the error.
Regards,
Sid

Question regarding sequences and fragmented data

Hi all,
I plan to implement two identical database schemas on two different oracle database servers. The two databases will then be linked via a Database Link and a View will be used to show the data from both db's using 1 sql statement.
My question is this:
If 5 records are inserted into the table on the first database and then 10 records are inserted into the matching table on the second database, how would the sequence for the table in the first database know that the next value should be 16 and not 6.
I hope this makes sense, any questions just ask.
Thanks,
Martin

Ok, I am not sure if I fully undserstand the question but let's give it a go. In the first place a sequence is stored in the data dictionary of a database. Te fact that you have two servers (and two databases : is that correct ?) means that you have two sequences also. The sequence is local to each db.
If you want the tables to be aware of each other so that the next record takes into account also the records in the other db you may have to manually generate the sequence. I don't know if you can share the sequence between two dbs but let's see if anyone else does.
Regards

Answer the following question regarding GUI_UPLOAD and Open Data Set

1. whats the connection or relationship of S_GUI to GUI_UPLOAD?
2. GUI_UPLOAD saves files to local directory of a use while OPEN DATA SET saves/archives files in the server directory. Where is the risk directed towards consuming disk space? Server disk or workstation disk space?
3. how will this work for multiple files?
4. Regarding Open Data Set - How the files will be put in AL11?

The GUI_DOWNLOAD only download the file to local PC...so any abap code running in other pc will not able to use the file.
BUt if you use open dataset to load the file APPLICATION server any ABAP pogram can access the file.
Following code explains how you load file using open data setto appl server,
you can check in t-code AL11 for files/dir in applicatin server.
you to change the value of myfile variable in my code..
you have to give the full path of the dirctory.
plz reward points if it hlps you.
Report ZANID_TEST2 message-id ZM.
data begin of itab occurs 0. "your internal table
include structure MARA.
data end of itab.
*--file upload purpose--
DATA: BEGIN OF it_file OCCURS 0,
buffer(200),
END OF it_file.
DATA: myfile(128) type c value 'E:\usr\sap\put\sample1xx.txt',
start-of-selection.
*--populating itab--
select * from mara into corresponding fields of table itab
up to 100 rows.
perform UPLOAD_FILE_TO_APPL.
*--form definitin--
form UPLOAD_FILE_TO_APPL.
OPEN DATASET myfile FOR OUTPUT IN TEXT MODE.
IF sy-subrc NE 0.
MESSAGE e999(zm) WITH 'File could not be opened'.
ENDIF.
*-- creating the file data table
loop at itab.
*-- i am only taking two fields
concatenate itab-matnr itab-matkl into it_file-buffer
separated by space.
append it_file.
endloop.
LOOP AT it_file.
TRANSFER it_file-buffer TO myfile.
CLEAR IT_FILE-BUFFER.
ENDLOOP.
CLOSE DATASET myfile.
IF sy-subrc NE 0.
MESSAGE e999(zm) WITH 'File could not be closed'.
ENDIF.
endform. " DUPLOAD_FILE_TO_APPL

Question regarding roaming and data usage

I am currently out of my main country of service, and as such I have a question regarding roaming and data usage.
I am told that the airplane mode is sufficient from keeping the phone off from roaming, but does this apply to any background data usage for applications and such?
If the phone is in airplane mode, are all use of the phone including wifi and application use through the wifi outside of all extra charges from roaming?

Ann154 wrote:
If you are getting charged to use the wifi, then it is possible. Otherwise no
Just to elaborate here, Ann154 is referring to access charges for wifi, which is nothing to do with Verizon, so if you are using it in a plane, hotel, an internet cafe etc that charges for Wifi rather than being free . Verizon does not charge you (or indeed know about!) wifi usage, or any other usage that is not on their cellular network (such as using a foreign SIM for example in global phones) So these charges, if any, will not show up on the verizon bill app. Having it in airplane mode prevents all cellular data traffic so you should be fine

Current date as deafult for Calender Day and user entry

Hello All,
There is a select option for Calender Day for a BW query.
This Calender Day should have a default as Current Date and User entry is also possible.
I have used a Customer exit and written the following code under i_step = 1
data: v_currdt like sy-datum.
clear: v_currdt, vfl_range.
         if i_step = 1.
          vfl_range-sign = 'I'.
          vfl_range-opt = 'EQ'.
          v_currdt = sy-datum.
          vfl_range-low = v_currdt.
          append vfl_range to e_t_range.
         endif.
Please inform if this code is incorrect, because I am not able to see the date at all.
Cheers,
KP

Hi
Check with this code!
Implemented for the same function as you require.-
if i_step = 1.
case i_vname.
    WHEN 'ZZZZZZ'.
      IF i_step = 1.
        REFRESH e_t_range.
        CLEAR l_s_range.
        l_date1 = sy-datum.
        L_S_RANGE-LOW = l_date1.
        L_S_RANGE-SIGN = 'I'.
        L_S_RANGE-OPT = 'EQ'.
        APPEND L_S_RANGE TO E_T_RANGE.
      endif.
endcase.
endif.
Regards
M.A

I have to reset factory settings but Apple ID is old email no longer used. I can't recall the password and when I went to answer security questions it told me my date of birth was wrong. How do i rest password but get it sent to my current email addr

I have to reset factory settings but Apple ID is old email no longer used. I can't recall the password and when I went to answer security questions it told me my date of birth was wrong. How do i rest password but get it sent to my current email address

Go to http://iforgot.apple.com to get help with your password.

Current Date Field question

Hello
I'm a novice user of LiveCycle and I'm trying to see if there's a solution for this issue we've come across.
We've used LiveCycle to redesign human resource/payroll forms in our organization. One of the items we use is the current date field, which automatically populates to today's date once opened. When users complete forms, we encourage them to save an electronic copy of the form to their own drive in case they need to retrieve it at a later date. The problem here is that the current date field will not stay static once filled out and saved.
For example, if a dept completes a form on 12/1/10, saves it, but then needs to retrieve it later for some reason, we need the current date field to stay as the date the form was originally filled out (12/1/10). If they retrieve the form later on say 2/15/10, that particular date field will read the new date. Is this possible?
Thanks for any help!

Test if the field is null before assigning the current date.
// form1.page1.currentDate::ready:layout - (FormCalc, client)
if (this.isNull) then
$.rawValue = Concat(Num2Date(Date(), "MM/DD/YYYY"))
endif
Steve

Question regarding the date in MARC for a daily movement report

Hi,
I have a requirement, where i need to create a report, based on the selection screen parameters for purchasing group and date (the default is 1 minus the current date.)
The report is used to view the daily movement, relating to the selected purchasing group and date.
Where and how do i find entries for that specific date? What tables and field or fields do i use?
Points will be rewarded and all help will be greatly appreciated.
Thank You,
John

See the below example code :
REPORT ZQA_MOVEMENT_ANALYSIS no standard page heading.
*>>> ELEMENTS COPIED FROM REPORT BALVHT01 .
ALV
TYPE-POOLS: SLIS.
Includes
INCLUDE .
tables: mkpf, mseg, marc, mara, makt, mard.
DATA =============================================================== *
DATA: G_BOXNAM TYPE SLIS_FIELDNAME VALUE 'BOX',
 G_EXPANDNAME TYPE SLIS_FIELDNAME VALUE 'EXPAND',
 P_F2CODE LIKE SY-UCOMM VALUE '&ETA',
 P_LIGNAM TYPE SLIS_FIELDNAME VALUE 'LIGHTS',
 G_SAVE(1) TYPE C,
 G_TABNAME_HEADER TYPE SLIS_TABNAME,
 G_TABNAME_ITEM TYPE SLIS_TABNAME,
 g_default(1) type c,
 G_EXIT(1) TYPE C,
 GX_VARIANT LIKE DISVARIANT,
 G_VARIANT LIKE DISVARIANT.
CONSTANTS:
GC_FORMNAME_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE',
GC_FORMNAME_ITEM_EXPAND TYPE SLIS_FORMNAME VALUE 'ITEM_EXPAND',
GC_FORMNAME_user_command type slis_formname value slis_ev_user_command.
DATA: GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
 GS_LAYOUT TYPE SLIS_LAYOUT_ALV,
 GS_KEYINFO TYPE SLIS_KEYINFO_ALV,
 GT_SORT TYPE SLIS_T_SORTINFO_ALV,
 GT_SP_GROUP TYPE SLIS_T_SP_GROUP_ALV,
 GT_EVENTS TYPE SLIS_T_EVENT.
DATA: G_REPID LIKE SY-REPID.
DATA: GT_LIST_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER.
data: begin of i_movement occurs 0,
 matnr like mseg-matnr,
 bwart like mseg-bwart,
 budat like mkpf-budat,
 mblnr like mseg-mblnr,
 gjahr like mseg-gjahr,
 shkzg like mseg-shkzg,
 menge like mseg-menge,
 meins like mseg-meins,
 end of i_movement.
data: begin of i_mat occurs 0,
 matnr like mara-matnr,
 maktx like makt-maktx,
 labst like mard-labst,
 meins like mara-meins,
 end of i_mat.
data: begin of i_output occurs 0.
 include structure ZFD_MOVEMENT_ANALYSIS.
data: end of i_output.
data i_popuptext like popuptext occurs 2 with header line.
data: v_matnr like mara-matnr.
data: x_movement like i_movement.
SELECTION-SCREEN --------------------------------------------------- *
SELECTION-SCREEN BEGIN OF BLOCK period WITH FRAME TITLE text-001.
select-options: so_budat for mkpf-budat obligatory no-extension.
SELECTION-SCREEN END OF BLOCK period.
SELECTION-SCREEN BEGIN OF BLOCK org WITH FRAME TITLE text-002.
parameters: p_werks like marc-werks obligatory default '1000',
 p_lgort like mard-lgort obligatory default '1000'.
select-options: so_matnr for mseg-matnr,
 so_dept for marc-zzdept,
 so_kostl for mseg-kostl,
 so_ekgrp for marc-ekgrp.
SELECTION-SCREEN END OF BLOCK org.
SELECTION-SCREEN SKIP 1.
Variant
SELECTION-SCREEN BEGIN OF BLOCK 0 WITH FRAME TITLE TEXT-P01.
PARAMETERS: P_VARI LIKE DISVARIANT-VARIANT.
SELECTION-SCREEN END OF BLOCK 0.
INITITALIZATION ==================================================== *
INITIALIZATION.
G_REPID = SY-REPID.
G_TABNAME_ITEM = 'I_OUTPUT'.
define keyinfo
CLEAR GS_KEYINFO.
GS_KEYINFO-ITEM01 = 'MATNR'.
PERFORM E01_FIELDCAT_INIT USING GT_FIELDCAT[].
PERFORM E03_EVENTTAB_BUILD USING GT_EVENTS[].
PERFORM E04_COMMENT_BUILD USING GT_LIST_TOP_OF_PAGE[].
PERFORM E06_T_SORT_BUILD USING GT_SORT[].
PERFORM E07_SP_GROUP_BUILD USING GT_SP_GROUP[].
Set Options: save variants userspecific or general
G_SAVE = 'A'.
PERFORM VARIANT_INIT.
Get default variant
GX_VARIANT = G_VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
 EXPORTING
 I_SAVE = G_SAVE
 CHANGING
 CS_VARIANT = GX_VARIANT
 EXCEPTIONS
 NOT_FOUND = 2.
IF SY-SUBRC = 0.
 P_VARI = GX_VARIANT-VARIANT.
ENDIF.
AT SELECTION-SCREEN ================================================ *
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_VARI.
PERFORM F4_FOR_VARIANT.
PAI
AT SELECTION-SCREEN.
PERFORM PAI_OF_SELECTION_SCREEN.
START-OF-SELECTION ================================================= *
start-of-selection.
perform check_background_processing.
PERFORM E05_LAYOUT_BUILD USING GS_LAYOUT. "wg. Parameters
perform get_data.
perform build_report.
perform write_report.
AT LINE SELECTION ================================================== *
at line-selection.
if sy-lsind = 1.
 format intensified off.
 if not i_output-matnr is initial.
 v_matnr = i_output-matnr.
 loop at i_movement where matnr = i_output-matnr.
 write: / i_movement-mblnr hotspot on,
 i_movement-bwart,
 i_movement-budat,
 i_movement-shkzg.
 if i_movement-shkzg = 'H'.
 format color col_negative.
 else.
 format color col_positive.
 endif.
 write: i_movement-menge,
 i_movement-meins.
 format color off.
 hide: i_movement-mblnr, i_movement-gjahr.
 endloop.
 clear i_movement.
 endif.
elseif sy-lsind = 2.
 set parameter id 'MBN' field i_movement-mblnr.
 set parameter id 'MJA' field i_movement-gjahr.
 call transaction 'MB03' and skip first screen.
endif.
==================================================================== *
top-of-page.
perform top_of_page.
top-of-page during line-selection.
read table i_mat with key matnr = i_output-matnr.
write: i_output-matnr,
 i_mat-maktx,
 so_budat-low, ' to ', so_budat-high.
uline.
clear: i_mat, i_output.
*& Form write_report
 text
--> p1 text
<-- p2 text
FORM write_report.
Call ABAP/4 List Viewer
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
 EXPORTING
 I_INTERFACE_CHECK = ' '
 I_BYPASSING_BUFFER =
 I_BUFFER_ACTIVE = ' '
 I_CALLBACK_PROGRAM = g_repid
 I_CALLBACK_PF_STATUS_SET = ' '
 I_CALLBACK_USER_COMMAND = ' '
 I_STRUCTURE_NAME =
 IS_LAYOUT = gs_layout
 IT_FIELDCAT = gt_fieldcat[]
 IT_EXCLUDING =
 IT_SPECIAL_GROUPS = gt_sp_group[]
 IT_SORT = gt_sort[]
 IT_FILTER =
 IS_SEL_HIDE =
 I_DEFAULT = 'X'
 I_SAVE = g_save
 IS_VARIANT = g_variant
 IT_EVENTS = gt_events[]
 IT_EVENT_EXIT =
 IS_PRINT =
 IS_REPREP_ID =
 I_SCREEN_START_COLUMN = 0
 I_SCREEN_START_LINE = 0
 I_SCREEN_END_COLUMN = 0
 I_SCREEN_END_LINE = 0
IMPORTING
 E_EXIT_CAUSED_BY_CALLER =
 ES_EXIT_CAUSED_BY_USER =
 TABLES
 T_OUTTAB = i_output
 EXCEPTIONS
 PROGRAM_ERROR = 1
 OTHERS = 2
IF SY-SUBRC <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " write_report
*& Form get_data
 text
--> p1 text
<-- p2 text
FORM get_data.
if so_dept[] is initial and
 so_matnr[] is initial and
 so_kostl[] is initial and
 so_ekgrp[] is initial.
 i_popuptext-text = 'Please choose a department, material number,'.
 append i_popuptext.
 i_popuptext-text = 'cost center or purchasing group'.
 append i_popuptext.
 CALL FUNCTION 'DD_POPUP_WITH_INFOTEXT'
 EXPORTING
 TITEL = 'Please Note'
 START_COLUMN = 1
 START_ROW = 1
 END_COLUMN = 5
 END_ROW = 3
 INFOFLAG = ' '
 IMPORTING
 ANSWER =
 TABLES
 LINES = i_popuptext.
Stop execution until user enters a purch group or dept.
 stop.
endif.
get all materials matching selection criteria - exclude finished
materials
select kmatnr kmaktx labst meins
from ( ( ( marc as c inner join makt as k
 on cmatnr = kmatnr ) INNER JOIN mard as d
 on cmatnr = dmatnr ) INNER JOIN mara as a
 on cmatnr = amatnr )
into table i_mat
where c~matnr in so_matnr and
 c~ekgrp in so_ekgrp and
 c~zzdept in so_dept and
 c~werks = p_werks and
 d~werks = p_werks and
 k~spras = 'E' and
 d~lgort = p_lgort
order by k~matnr.
if sy-subrc = 0.
 read table so_budat index 1.
 loop at i_mat.
 get all material movements for all materials identified since
 start date on date interval selected by user
 select matnr bwart budat bmblnr bgjahr shkzg menge meins
 appending table i_movement
 from ( mseg as b INNER JOIN mkpf as a
 ON bmblnr = amblnr AND
 bmjahr = amjahr )
 where b~matnr = i_mat-matnr and
 a~budat >= so_budat-low.
 endloop.
endif.
ENDFORM. " get_data
*& Form build_report
 text
--> p1 text
<-- p2 text
FORM build_report.
data: x_movement like i_movement,
 v_processed_inv like mseg-menge.
sort i_movement by matnr ascending
 budat descending.
loop at i_movement.
if movement after end of period specified, use movement to work
backwards to inventory at end of selected period end date
 if i_movement-budat > so_budat-high.
 if i_movement-shkzg = 'H'.
 add i_movement-menge to i_output-ending_inv.
 else.
 subtract i_movement-menge from i_output-ending_inv.
 endif.
 endif.
compute inventory at beginning of period
 if i_movement-shkzg = 'H'.
 add i_movement-menge to i_output-begin_inv.
 else.
 subtract i_movement-menge from i_output-begin_inv.
 endif.
if movement in the time period specified, summarize movements by
type
 if i_movement-budat >= so_budat-low and
 i_movement-budat <= so_budat-high.
 if i_movement-bwart+0(1) = '1'.
 if i_movement-shkzg = 'S'.
 add i_movement-menge to i_output-purchased_inv.
 else.
 subtract i_movement-menge from i_output-purchased_inv.
 endif.
 elseif i_movement-bwart+0(1) = '2'.
 if i_movement-shkzg = 'S'.
 add i_movement-menge to i_output-transferred_inv.
 else.
 subtract i_movement-menge from i_output-transferred_inv.
 endif.
 elseif i_movement-bwart+0(1) = '4'.
 if i_movement-shkzg = 'S'.
 add i_movement-menge to i_output-transferred_inv.
 else.
 subtract i_movement-menge from i_output-transferred_inv.
 endif.
 elseif i_movement-bwart+0(2) = '55'.
 if i_movement-shkzg = 'S'.
 add i_movement-menge to i_output-scrapped_inv.
 else.
 subtract i_movement-menge from i_output-scrapped_inv.
 endif.
 elseif i_movement-bwart+0(1) = '6'.
 if i_movement-shkzg = 'S'.
 add i_movement-menge to i_output-sold_inv.
 else.
 subtract i_movement-menge from i_output-sold_inv.
 endif.
 elseif i_movement-bwart+0(1) = '7'.
 if i_movement-shkzg = 'S'.
 add i_movement-menge to i_output-cycled_inv.
 else.
 subtract i_movement-menge from i_output-cycled_inv.
 endif.
 elseif i_movement-bwart+0(2) = '96'.
 if i_movement-shkzg = 'S'.
 add i_movement-menge to i_output-recovered_inv.
 else.
 subtract i_movement-menge from i_output-recovered_inv.
 endif.
 else.
 if i_movement-shkzg = 'S'.
 add i_movement-menge to i_output-other.
 else.
 subtract i_movement-menge from i_output-other.
 endif.
 endif.
 endif.
Summarize data for material number and add to output list
 x_movement = i_movement.
 at end of matnr.
 clear i_mat.
 read table i_mat with key matnr = i_movement-matnr.
 i_output-maktx = i_mat-maktx.
 inventory at end of period = current inventory + changes since end
 of period
 add i_mat-labst to i_output-ending_inv.
 inventory at begin of period = ending inventory + changes in
 interval
 add i_mat-labst to i_output-begin_inv.
 build percentages for types of movements in period - the only
 reason this data needs to be stored rather than computed on the
 fly is for sorting of data
 v_processed_inv = ( i_output-begin_inv - i_output-ending_inv )
 + i_output-purchased_inv.
 if v_processed_inv <> 0.
 i_output-percent_sold =
 ( i_output-sold_inv / v_processed_inv ) * 100 * -1.
 i_output-percent_scrapped =
 ( i_output-scrapped_inv / v_processed_inv ) * 100 * -1.
 i_output-percent_transferred =
 ( i_output-transferred_inv / v_processed_inv ) * 100 * -1.
 i_output-percent_cycled =
 ( i_output-cycled_inv / v_processed_inv ) * 100 * -1.
 i_output-percent_recov =
 ( i_output-recovered_inv / v_processed_inv ) * 100 * -1.
 i_output-other =
 ( i_output-other / v_processed_inv ) * 100 * -1.
 endif.
 record material number
 move i_movement-matnr to i_output-matnr.
 i_output-meins = x_movement-meins.
 append i_output.
 clear i_output.
 endat.
endloop.
clear i_movement.
ENDFORM. " build_report
 FORM E01_FIELDCAT_INIT *
--> E01_LT_FIELDCAT *
FORM E01_FIELDCAT_INIT USING E01_LT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
DATA: LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 I_PROGRAM_NAME =
 I_INTERNAL_TABNAME = G_TABNAME_ITEM
 I_STRUCTURE_NAME = 'ZFD_MOVEMENT_ANALYSIS'
 I_CLIENT_NEVER_DISPLAY = 'X'
 I_BYPASSING_BUFFER = 'X'
 CHANGING
 CT_FIELDCAT = E01_LT_FIELDCAT[].
ENDFORM.
 FORM E03_EVENTTAB_BUILD *
--> E03_LT_EVENTS *
FORM E03_EVENTTAB_BUILD USING E03_LT_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
 EXPORTING
 I_LIST_TYPE = 1
 IMPORTING
 ET_EVENTS = E03_LT_EVENTS.
tell program which form to call for top of page event
READ TABLE E03_LT_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
 INTO LS_EVENT.
IF SY-SUBRC = 0.
 MOVE GC_FORMNAME_TOP_OF_PAGE TO LS_EVENT-FORM.
 APPEND LS_EVENT TO E03_LT_EVENTS.
ENDIF.
tell program which form to call for item expand event
READ TABLE E03_LT_EVENTS WITH KEY NAME = slis_ev_item_data_expand
 INTO LS_EVENT.
IF SY-SUBRC = 0.
 MOVE GC_FORMNAME_ITEM_EXPAND TO LS_EVENT-FORM.
 APPEND LS_EVENT TO E03_LT_EVENTS.
ENDIF.
ENDFORM.
 FORM E04_COMMENT_BUILD *
--> E04_LT_TOP_OF_PAGE *
FORM E04_COMMENT_BUILD USING E04_LT_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER.
DATA: LS_LINE TYPE SLIS_LISTHEADER.
Listenüberschrift: Typ H
CLEAR LS_LINE.
LS_LINE-TYP = 'H'.
LS_LINE-KEY: not used for this type
write sy-datum to LS_LINE-INFO.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
CLEAR LS_LINE.
LS_LINE-TYP = 'H'.
LS_LINE-KEY: not used for this type
LS_LINE-INFO = 'FreshDirect Product Reorder Report'.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
Kopfinfo: Typ S
CLEAR LS_LINE.
LS_LINE-TYP = 'S'.
LS_LINE-KEY = TEXT-050.
LS_LINE-INFO = TEXT-010.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
LS_LINE-KEY = TEXT-051.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
Aktionsinfo: Typ A
CLEAR LS_LINE.
LS_LINE-TYP = 'A'.
LS_LINE-KEY: not used for this type
LS_LINE-INFO = TEXT-002.
APPEND LS_LINE TO E04_LT_TOP_OF_PAGE.
ENDFORM.
 FORM E05_LAYOUT_BUILD *
<-> E05_LS_LAYOUT *
FORM E05_LAYOUT_BUILD USING E05_LS_LAYOUT TYPE SLIS_LAYOUT_ALV.
E05_LS_LAYOUT-F2CODE = P_F2CODE.
E05_LS_LAYOUT-ZEBRA = 'X'.
E05_LS_LAYOUT-colwidth_optimize = 'X'.
ENDFORM.
 FORM E06_T_SORT_BUILD *
--> E06_LT_SORT *
FORM E06_T_SORT_BUILD USING E06_LT_SORT TYPE SLIS_T_SORTINFO_ALV.
DATA: LS_SORT TYPE SLIS_SORTINFO_ALV.
CLEAR LS_SORT.
LS_SORT-FIELDNAME = 'MATNR'.
LS_SORT-TABNAME = G_TABNAME_ITEM.
LS_SORT-SPOS = 1.
LS_SORT-UP = 'X'.
APPEND LS_SORT TO E06_LT_SORT.
ENDFORM.
 FORM E07_SP_GROUP_BUILD *
--> E07_LT_SP_GROUP *
FORM E07_SP_GROUP_BUILD USING E07_LT_SP_GROUP TYPE SLIS_T_SP_GROUP_ALV.
DATA: LS_SP_GROUP TYPE SLIS_SP_GROUP_ALV.
CLEAR LS_SP_GROUP.
LS_SP_GROUP-SP_GROUP = 'A'.
LS_SP_GROUP-TEXT = TEXT-005.
APPEND LS_SP_GROUP TO E07_LT_SP_GROUP.
ENDFORM.
 FORM TOP_OF_PAGE *
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
 EXPORTING
 IT_LIST_COMMENTARY = GT_LIST_TOP_OF_PAGE.
 data v_repid like sy-repid.
write: / sy-datum, sy-uzeit,
 100 'FreshDirect Material Movement Type Analysis Report'.
show parameters chosen on selection screen in header
v_repid = sy-repid.
CALL FUNCTION 'Z_WRITE_SELECTION_SCREEN'
 EXPORTING
 REPID = v_repid
 EXCEPTIONS
 REPORT_NOT_FOUND = 1
 OTHERS = 2.
write column headings
format color col_heading.
write: /(18) 'Material #',
 (40) 'Description',
 (16) ' Beginning Inv.',
 (16) ' Purchased',
 (16) ' Available Inv.',
 (16) ' Ending Inv.',
 (16) ' Processed Inv.',
 (25) ' Sold',
 (25) ' Scrapped',
 (25) ' Transferred',
 (25) ' Cycle Counted',
 (25) ' Other'.
format color off.
uline /1(278).
ENDFORM.
 FORM F4_FOR_VARIANT *
FORM F4_FOR_VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
 EXPORTING
 IS_VARIANT = G_VARIANT
 I_SAVE = G_SAVE
 I_TABNAME_HEADER = G_TABNAME_HEADER
 I_TABNAME_ITEM = G_TABNAME_ITEM
 it_default_fieldcat =
 IMPORTING
 E_EXIT = G_EXIT
 ES_VARIANT = GX_VARIANT
 EXCEPTIONS
 NOT_FOUND = 2.
IF SY-SUBRC = 2.
 MESSAGE ID SY-MSGID TYPE 'S' NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ELSE.
 IF G_EXIT = SPACE.
 P_VARI = GX_VARIANT-VARIANT.
 ENDIF.
ENDIF.
ENDFORM.
*& Form PAI_OF_SELECTION_SCREEN
 text
FORM PAI_OF_SELECTION_SCREEN.
IF NOT P_VARI IS INITIAL.
 MOVE G_VARIANT TO GX_VARIANT.
 MOVE P_VARI TO GX_VARIANT-VARIANT.
 CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE'
 EXPORTING
 I_SAVE = G_SAVE
 CHANGING
 CS_VARIANT = GX_VARIANT.
 G_VARIANT = GX_VARIANT.
ELSE.
 PERFORM VARIANT_INIT.
ENDIF.
ENDFORM. " PAI_OF_SELECTION_SCREEN
*& Form VARIANT_INIT
 text
--> p1 text
<-- p2 text
FORM VARIANT_INIT.
CLEAR G_VARIANT.
G_VARIANT-REPORT = G_REPID.
ENDFORM. " VARIANT_INIT
INCLUDE ZQA_UTILITY_INCLUDE.
***INCLUDE ZQA_UTILITY_INCLUDE .
*& Form display_popup_message
 text
--> p1 text
<-- p2 text
form display_popup_message using x_text1
 x_text2.
data: int_popuptext like popuptext occurs 2 with header line.
int_popuptext-text = x_text1.
append int_popuptext.
int_popuptext-text = x_text2.
append int_popuptext.
call function 'DD_POPUP_WITH_INFOTEXT'
 exporting
 titel = 'Please Note'
 start_column = 1
 start_row = 1
 end_column = 5
 end_row = 3
 tables
 lines = int_popuptext.
endform. " display_popup_message
*& Form upload_data_file
 text
 -->P_int_INPUTDATA text
form upload_data_file tables x_inputdata
 using x_filename like rlgrap-filename.
clear x_inputdata.
refresh x_inputdata.
file on UNIX app server
if x_filename+0(1) = '/'.
 open dataset x_filename for input.
 if sy-subrc <> 0.
 perform display_popup_message using 'Error opening file'
 x_filename.
 stop.
 else.
 do.
 read dataset x_filename into x_inputdata.
 if sy-subrc <> 0.
 exit.
 endif.
 append x_inputdata.
 clear x_inputdata.
 enddo.
 endif.
 close dataset x_filename.
else.
file on local PC of GUI
 call function 'UPLOAD'
 exporting
 filename = x_filename
 filetype = 'ASC'
 tables
 data_tab = x_inputdata
 exceptions
 conversion_error = 1
 invalid_table_width = 2
 invalid_type = 3
 no_batch = 4
 unknown_error = 5
 guint_refuse_filetransfer = 6
 others = 7
 if sy-subrc <> 0.
 perform display_popup_message using 'Error opening file'
 x_filename.
 stop.
 endif.
endif.
endform. " upload_data_file
*& Form check_background_processing
 text
--> p1 text
<-- p2 text
form check_background_processing.
endform. " check_background_processing
Reward Points if it is helpful
Thanks
Seshu

Question regarding Polling data from database using DB Adapters in BPEL

Hi,
I have the following question regarding Polling data from database using DB Adapters in BPEL -
If I am selecting data from multiple tables/view to ultimately generate hierarchical xml document, is there a way that I specify polling all of these tables/views. Is polling limited only to one table/view?
Thanks
Ravi

Hi Ravi,
your question seems to have been answered for the question of polling a set of tables with one as the root, and getting back a hierarchical xml representing multiple related tables.
However you can also poll for changes to both the root table and its related tables. Not sure if this was your question or the one already answered. If the former please check out the sample
bpel/samples/tutorials/122.DBAdapter/advanced/polling/PollingForChildUpdates
Thanks
Steve

Javascript Question - How to Insert a Dynamic/Current Date into the Footer of a Scanned Document

Hi!
I am looking for help in finding a Javascript that would allow the insertion of a dynamic/current date into the footer of a scanned document at the time the document is printed.
I am currently using Adobe Acrobat Professional 8.0 at my work and there has arisen a need to have a dynamic/current date in the footer on scanned documents when they are printed out on different days by different people.
I am new to the Forum and I am also very new to Javascript and what this entails.
Thank you in advance for your help and input!
Tracy

this.addWatermarkFromText({
cText: util.printd("mmmm dd, yyyy", new Date()),
nTextAlign: app.constants.align.right,
nHorizAlign: app.constants.align.right,
nVertAlign: app.constants.align.bottom,
nHorizValue: -72, nVertValue: 72
Will insert the current Monday/Day/Year as a text watermark at the bottom of every page of a document, 1 inch up and 1 inch in from the right corner.

Regarding subtraction of 10 days from the current date

Need to know how I can get 10 days subtracted from the current date before the report is excuted. This needs to appear in the selection screen before the report is excuted.
The select option contains two fields the first field is the date which is 10 days subtracted from the current date and the next field is the current date.
Please suggest.
Thanks.

Hi Dolly
I had a same req before check that code:
AT SELECTION-SCREEN OUTPUT.
IF pa_older = 'X'.
CALL FUNCTION 'RP_CALC_DATE_IN_INTERVAL'
EXPORTING
date = pa_end "<<<<< date or in ur case sy-datum
days = '10'
months = '00'
signum = '-'
years = '00'
IMPORTING
calc_date = pa_end1. " <<< subtracted date
ENDIF.

New to LiveCycle and question on Current Date box.

Hi all,
I'm very new to designer and I'm trying to put in a Current Date box. The issue I have is that it displays as 2/26/09 and I need it to display as February 26, 2009.
I've gone into the patterns and enter that, but it doesn't change anything.
When I drag the Current Date box into the form, I get a message that says "This object has settings that this form does not support. These settings are removed when the object is placed on the form."
What is this? I made this form off of an existing PDF file that has nothing in it.
Thanks for any help,
Jason

Ah, ok I see what's going on - I didn't realize there was a prebuilt current date object.
The reason it doesn't change the format from the Patterns is because it is using a script like the one I gave you.
You need to open the Script Editor window (Window->Script Editor -- I think its default location is just under the toolbars above the page you're working on) then when you click on the object the Script Editor will list scripts attached to the object.
You need to change the script where it says DateFmt(1) to DateFmt(3).

I have some questions regarding setting up a software RAID 0 on a Mac Pro

I have some questions regarding setting up a software RAID 0 on a Mac pro (early 2009).
These questions might seem stupid to many of you, but, as my last, in fact my one and only, computer before the Mac Pro was a IICX/4/80 running System 7.5, I am a complete novice regarding this particular matter.
A few days ago I installed a WD3000HLFS VelociRaptor 300GB in bay 1, and moved the original 640GB HD to bay 2. I now have 2 bootable internal drives, and currently I am using the VR300 as my startup disk. Instead of cloning from the original drive, I have reinstalled the Mac OS, and all my applications & software onto the VR300. Everything is backed up onto a WD SE II 2TB external drive, using Time Machine. The original 640GB has an eDrive partition, which was created some time ago using TechTool Pro 5.
The system will be used primarily for photo editing, digital imaging, and to produce colour prints up to A2 size. Some of the image files, from scanned imports of film negatives & transparencies, will be 40MB or larger. Next year I hope to buy a high resolution full frame digital SLR, which will also generate large files.
Currently I am using Apple's bundled iPhoto, Aperture 2, Photoshop Elements 8, Silverfast Ai, ColorMunki Photo, EZcolor and other applications/software. I will also be using Photoshop CS5, when it becomes available, and I will probably change over to Lightroom 3, which is currently in Beta, because I have had problems with Aperture, which, until recent upgrades (HD, RAM & graphics card) to my system, would not even load images for print. All I had was a blank preview page, and a constant, frozen "loading" message - the symbol underneath remained static, instead of revolving!
It is now possible to print images from within Aperture 2, but I am not happy with the colour fidelity, whereas it is possible to produce excellent, natural colour prints using its "minnow" sibling, iPhoto!
My intention is to buy another 3 VR300s to form a 4 drive Raid 0 array for optimum performance, and to store the original 640GB drive as an emergency bootable back-up. I would have ordered the additional VR300s already, but for the fact that there appears to have been a run on them, and currently they are out of stock at all, but the more expensive, UK resellers.
I should be most grateful to receive advice regarding the following questions:
QUESTION 1:
I have had a look at the RAID setting up facility in Disk Utility and it states: "To create a RAID set, drag disks or partitions into the list below".
If I install another 3 VR300s, can I drag all 4 of them into the "list below" box, without any risk of losing everything I have already installed on the existing VR300?
Or would I have to reinstall the OS, applications and software again?
I mention this, because one of the applications, Personal accountz, has a label on its CD wallet stating that the Licence Key can only be used once, and I have already used it when I installed it on the existing VR300.
QUESTION 2:
I understand that the failure of just one drive will result in all the data in a Raid 0 array being lost.
Does this mean that I would not be able to boot up from the 4 drive array in that scenario?
Even so, it would be worth the risk to gain the optimum performance provide by Raid 0 over the other RAID setup options, and, in addition to the SE II, I will probably back up all my image files onto a portable drive as an additional precaution.
QUESTION 3:
Is it possible to create an eDrive partition, using TechTool Pro 5, on the VR300 in bay !?
Or would this not be of any use anyway, in the event of a single drive failure?
QUESTION 4:
Would there be a significant increase in performance using a 4 x VR300 drive RAID 0 array, compared to only 2 or 3 drives?
QUESTION 5:
If I used a 3 x VR300 RAID 0 array, and installed either a cloned VR300 or the original 640GB HD in bay 4, and I left the Startup Disk in System Preferences unlocked, would the system boot up automatically from the 4th. drive in the event of a single drive failure in the 3 drive RAID 0 array which had been selected for startup?
Apologies if these seem stupid questions, but I am trying to determine the best option without foregoing optimum performance.

Well said.
Steps to set up RAID
Setting up a RAID array in Mac OS X is part of the installation process. This procedure assumes that you have already installed Mac OS 10.1 and the hard drive subsystem (two hard drives and a PCI controller card, for example) that RAID will be implemented on. Follow these steps:
1. Open Disk Utility (/Applications/Utilities).
2. When the disks appear in the pane on the left, select the disks you wish to be in the array and drag them to the disk panel.
3. Choose Stripe or Mirror from the RAID Scheme pop-up menu.
4. Name the RAID set.
5. Choose a volume format. The size of the array will be automatically determined based on what you selected.
6. Click Create.
Recovering from a hard drive failure on a mirrored array
1. Open Disk Utility in (/Applications/Utilities).
2. Click the RAID tab. If an issue has occurred, a dialog box will appear that describes it.
3. If an issue with the disk is indicated, click Rebuild.
4. If Rebuild does not work, shut down the computer and replace the damaged hard disk.
5. Repeat steps 1 and 2.
6. Drag the icon of the new disk on top of that of the removed disk.
7. Click Rebuild.
http://support.apple.com/kb/HT2559
Drive A + B = VOLUME ONE
Drive C + D = VOLUME TWO
What you put on those volumes is of course up to you and easy to do.
A system really only needs to be backed up "as needed" like before you add or update or install anything.
/Users can be backed up hourly, daily, weekly schedule
Media files as needed.
Things that hurt performance:
Page outs
Spotlight - disable this for boot drive and 'scratch'
SCRATCH: Temporary space; erased between projects and steps.
http://en.wikipedia.org/wiki/StandardRAIDlevels
(normally I'd link to Wikipedia but I can't load right now)
Disk drives are the slowest component, so tackling that has always made sense. Easy way to make a difference. More RAM only if it will be of value and used. Same with more/faster processors, or graphic card.
To help understand and configure your 2009 Nehalem Mac Pro:
http://arstechnica.com/apple/reviews/2009/04/266ghz-8-core-mac-pro-review.ars/1
http://macperformanceguide.com/
http://www.macgurus.com/guides/storageaccelguide.php
http://www.macintouch.com/readerreports/harddrives/index.html
http://macperformanceguide.com/OptimizingPhotoshop-Configuration.html
http://kb2.adobe.com/cps/404/kb404440.html

Questions regarding Optimizing formulas in IP

Dear all,
This weekend I had a look at the webinar on Tips and Tricks for Implementing and Optimizing Formulas in IP.
Im currently working on an IP-implementation and encounter the following when getting more in-depth.
Id appreciate very much if you could comment on the questions below.
1.) I have a question regarding optimization 3 (slide 43) about Conditions:
If the condition is equal to the filter restriction, then the condition can be removed.
I agree fully on this, but have a question on using the Planning Function (PF) in combination with a query as DataProvider.
In my query I have a filter in the Characteristic restriction.
It contains variables on fiscal year, version. These only allow single value entry.
The DataProvider acts as filter for my PF. So Id suppose I dont need a condition for my PF since it is narrowed down on fiscal year and version by my query.
a.) Question: Is that correct?
I just one to make sure that I dont get to many records for my PF as input. How detrimental for performance is it to use conditions anyway?
2.) I read in training BW370 (IP-training) that a PF is executed for the currently set filter (navigational state) in the query and that characteristics that are used in restricted keyfigures are ignored in the filter.
So, if I use version in the restr. keyfig it will be ignored.
Questions:
a.) Does this mean that the PF is executed for all versions in the system or for the versions that are in the filter of the Characteristic Restrictions and not the currently set filter?
b.) Id suppose the dataset for the PF can never be bigger than the initial dataset that is selected by the query, right?
c.) Is the PF executed anaway against navigational state when I use filtering? If have an example where I filter on field customer thus making my dataset smaller, but executing the PF still takes the same amount of time.
d.) And I also encounter that the PF is executed twice. A popup comes up showing messages regarding the execution. After pressing OK, it seems the PF runs again...
3.) If I use variables in my Planning Function I dont want to fill in the parameter VAR_VALUE with a value. I want to use the variable which is ready for input from the selection screen of the query.
So when I run the PF it should use the BI-variable. Its no problem to customize this in the Modeler. But when I go into the frontend the field VAR_VALUE stays empty and needs a value.
Question:
a.) What do I enter here? For parameter VAR_NAME I use the variable name, but what do I use for parameter VAR_VALUE? Also the variable name?
4.) Question regarding optimization 6 (slide 48) about Formulas on MultiProviders:
'If the formula is using data of only one InfoProvider but is defined on a MultiProvider, the the complete formual should be moved to the single base InfoProvider'.
In our case we have three cubes in the MP, two realtime and one normal one. Right now we have one AggrLevel (AL) on op of the MP.
For one formula I can use one cube so it's better to cretae another AL with the formula based on that cube.
For another formula I need the two realtime cubes. This is interesting regarding the optimization statement.
Question:
a.) Can I use the AL on the MP then or is it better to create a new MP with only these two cubes and create an AL on top of that. And than create the formula on the AL based on the MP with the two cubes?
This makes the architecture more complex.
Thanks a lot in advance for your appreciated answers!
Kind regards, Harjan


Marc,
Some additional questions regarding locking.
I encounter that the dataset that is locked depends on the restrictions made in the 'Characteristic Restrictions'-part of the query.
Restrictions in the 'Default Values'-part are not taken into account. In that case all data records of the characteristic are locked.
Q1: Is that correct?
To give an example: Assume you restrict customer on hierarchy node in Default Values. If you want people to plan concurrently this is not possible since all customers are locked then. When customer restriction is moved to Char Restr the system only locks the specific cutomer hier node and people can plan concurrently.
Q2: What about variables use in restricted keyfigures like variable for fy/period? Is only this fy/period locked then?
Q3: We'd like to lock on a navigational attribute. The nav attr is put as a variable in the filter of the Characteristic Restrictions. Does the system then only lock this selection for the nav.attr? Or do I have to change my locking settings in RSPLSE?
Then question regarding locking of data for functions:
Assume you use the BEx Analyzer and use the query as data_provider_filter for your planning function. You use restricted keyfigures with char Version. First column contains amount for version 1 and second column contains amount for version 2.
In the Char Restrictions you've restricted version to values '1' and '2'.
When executing the inputready query version 1 and 2 are locked. (due to the selection in Char Restr)
But when executing the planning function all versions are locked (*)
Q4: True?
Kind regards, Harjan

Extremely novice question regarding entry of current date

Similar Messages

Maybe you are looking for