Photo upload into infotype 2
Hi All,
After uploading photos into infotype 2, the photos are dipalying in infotype 3, 14, 15 infotype but not in IT0001, IT0002.
Can anybody help me out?
Thanx in advance.
Hi Shiv,
These are the steps to add photos.
1) You'll find the customizing settings in :-
IMG - Personnel management - personnel administration - customizing user interfaces - change screen header.
Regarding the archiving part you better ask your basis admin to set that up for document type HRICOLFOTO.
2) Photo in the PA IT0002
1. Define physical archives using transaction OAC0 Arx. ZZ
2. Assign objects types & document types to archive & documents tables for Obj PREL , doc.type HRIEMPFOTO,
Arx. ZZ using transaction OAC3
3. Define number range using transaction OANR
4. Using transaction OAC2 define doc.typ & tech doc types for exmpl. HRIEMPFOTO - TIF
5. Create protocol for Archive link using transactions OAA3 for exmpl. Comm.prot.,version. Generate it will define
application type from list and so on.
6. In the table 585O define relevant infotype for object and document type for exmpl. for IT0002
7. Using transaction OAAD create link for PERNR with relevant infotype & files on the server, which described on the
first step.
Please check this link for reference
How to upload Employee Photo in HR Personnel Adminstration
upload photo to infotypes!!
http://sapr3.tripod.com/saphr.htm
<b>***Reward Points if Useful</b>
Warm Regards
Gokul
Similar Messages
-
Photo upload in infotype 2, or infotype header
Can anyone tell me in detail how to upload photo of employee in infotype header and what all needs to be done in terms of basis also , archieve link or something. I know oAAD but how does that linkage happen.
Solution in https://wiki.sdn.sap.com/wiki/display/ERPHCM/Add%20Employee%20Photo%20on%20Infotype%200002?showChildren=false is very good.
Mass upload program ZHR_BDC_UPLOADPIC requires input every file path for photos in dialog window.
I have improved this process:
1. Made a copy of program OANEWCON (program in transaction OAOH) ZOANEWCON (hung on new transaction ZOAOH)
inserted two lines allow to pass a path as a parameter to this program:
PROGRAM ZOANEWCO MESSAGE-ID OA.
TABLES: TOAV0, TOAOM, TWFDB, TOAPA.
DATA: KEY LIKE OJINT-KEY.
DATA: OBJECT LIKE OJINT-NAME.
DATA: OBJECT_ID LIKE TOAV0-OBJECT_ID.
DATA: ARCHIV_ID LIKE TOAV0-ARCHIV_ID.
DATA: ARC_DOC_ID LIKE TOAV0-ARC_DOC_ID.
DATA: ABLAGEDATUM LIKE SAPB-SAPABLDATE.
DATA: AR_DATE LIKE TOAV0-AR_DATE.
DATA: DEL_DATE LIKE TOAV0-DEL_DATE.
DATA: SAP_OBJECT LIKE TOAOM-SAP_OBJECT.
DATA: AR_OBJECT LIKE TOAOM-AR_OBJECT.
DATA: EXPIRY_TIM LIKE TOAOM-EXPIRY_TIM.
DATA: METHOD LIKE OJINT-METHOD.
DATA: RETURN LIKE OJINT-RETURN.
DATA: PARAMETER LIKE OJINT-PARAMETER.
DATA: BEGIN OF I_TOAV0 OCCURS 1.
INCLUDE STRUCTURE TOAV0.
DATA: END OF I_TOAV0.
DATA: BEGIN OF I_TOAOM OCCURS 1.
INCLUDE STRUCTURE TOAOM.
DATA: END OF I_TOAOM.
DATA: BEGIN OF FIELDS OCCURS 1.
INCLUDE STRUCTURE OJFIELDS.
DATA: END OF FIELDS.
DATA: OK_CODE(4) TYPE C,
OK_CODE_SAVE(4) TYPE C.
DATA: CREATE(2) VALUE '01'.
DATA: infile(70).
MODULE INIT0100 OUTPUT *
MODULE INIT0100 OUTPUT.
SET TITLEBAR '000'.
CLEAR: OBJECT, AR_OBJECT.
SET PF-STATUS 'POPU100'.
ENDMODULE.
MODULE EXIT_BEARBEITEN INPUT *
MODULE EXIT_BEARBEITEN INPUT.
OK_CODE_SAVE = OK_CODE.
CLEAR OK_CODE.
CASE OK_CODE_SAVE.
WHEN 'ESC'.
SET SCREEN 0.
LEAVE SCREEN.
WHEN 'BACK'.
SET SCREEN 0.
LEAVE SCREEN.
WHEN 'CANC'.
SET SCREEN 0.
LEAVE SCREEN.
ENDCASE.
ENDMODULE.
MODULE READ0100 INPUT *
MODULE READ0100 INPUT.
OK_CODE_SAVE = OK_CODE.
CLEAR OK_CODE.
CLEAR KEY.
CASE OK_CODE_SAVE.
WHEN 'NEW'.
OBJECT = TOAOM-SAP_OBJECT.
AR_OBJECT = TOAOM-AR_OBJECT.
SELECT * FROM TOAOM WHERE AR_OBJECT = AR_OBJECT
AND SAP_OBJECT = OBJECT.
ENDSELECT.
IF SY-SUBRC <> 0.
MESSAGE W251 WITH AR_OBJECT OBJECT.
"MESSAGE: NO NCI-DOCTYPE with this Objecttyp
ELSE.
Corr. 3.0. Begin
Authority check with Archive id
ARCHIV_ID = TOAOM-ARCHIV_ID.
PERFORM AUTHORITY_CHECK_CREATE(OAALL)
USING ARCHIV_ID OBJECT SPACE AR_OBJECT SPACE
CHANGING SY-SUBRC.
IF SY-SUBRC NE 0.
MESSAGE ID SY-MSGID TYPE 'E' NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ELSE.
Corr. 3.0 End.
Change 5.0 for BOR Objecttypes with GUID vok
METHOD = 'EDIT'.
Eingabe der Object_Id
CALL FUNCTION 'OJ_KEY_FIELDS'
EXPORTING
KEY = KEY
METHOD = METHOD
OBJECT = OBJECT
TITLE_DIALOG = TEXT-001
IMPORTING
KEY = KEY
TABLES
FIELDS = FIELDS
EXCEPTIONS
EXC_OBJECT_NOT_FOUND = 01.
CALL FUNCTION 'ARCHIV_POPUP_OBJECT_KEY'
EXPORTING
DISPLAY = ' '
OBJTYPE = OBJECT
TITLE = TEXT-001
OBJKEY = ' '
LASTTYPE = ' '
LASTKEY = ' '
CHECKEXISTENCE = 'X'
GENERIC = ' '
EDIT = ' '
IMPORTING
CHANGED =
RETURN =
OBJKEY = KEY
USE_LAST =
EXCEPTIONS
ERROR_PARAMETER = 1
USER_CANCEL = 2
OTHERS = 3
End of change 5.0 for BOR Objecttypes with GUID vok
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE 'W' NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
CLEAR TOAV0.
ELSE.
TOAV0-OBJECT_ID = KEY.
IF KEY EQ SPACE.
MESSAGE W252.
CLEAR TOAV0.
'Kein SAP-Beleg vorhanden.'.
ELSE." create archiveobject versus dialog
PERFORM CREATE_ARCHIVE_OBJECT.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
ENDCASE.
ENDMODULE.
FORM CREATE_ARCHIVE_OBJECT *
FORM CREATE_ARCHIVE_OBJECT. "Create an archiveobject
CALL FUNCTION 'ARCHIV_CREATE_DIALOG_META'
EXPORTING
AR_OBJECT = TOAOM-AR_OBJECT
OBJECT_ID = TOAV0-OBJECT_ID
SAP_OBJECT = TOAOM-SAP_OBJECT
FILE = infile
IMPORTING
ARCHIV = TOAV0-ARCHIV_ID
ARCHIV_DOC_ID = TOAV0-ARC_DOC_ID
DOCUMENTCLASS = TOAOM-DOC_TYPE
EXCEPTIONS
ERROR_ARCHIV = 01
ERROR_COMMUNICATIONTABLE = 02
ERROR_CONNECTIONTABLE = 03
ERROR_KERNEL = 04
ERROR_PARAMETER = 05
ERROR_SCANQUEUE = 06
others = 7.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE 'W' NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
CLEAR TOAV0.
ELSE.
MOVE TOAOM-DOC_TYPE TO TOAV0-RESERVE.
TOAV0-SAP_OBJECT = TOAOM-SAP_OBJECT.
TOAV0-AR_OBJECT = TOAOM-AR_OBJECT.
COMMIT WORK.
MESSAGE I044.
ENDIF.
ENDFORM.
2. in program ZHR_BDC_UPLOADPIC calling transaction ZOAOH
added parameters for data file, for a photo ID in archive, and add date of a photo into the data file
e.g.: 0000000527.09.2004C:\Photos\5.jpg
{REPORT ZHR_BDC_UPLOADPIC NO STANDARD PAGE HEADING LINE-SIZE 255.
DATA : BEGIN OF IT_DATA OCCURS 0,
PERNR(8), " LIKE RP50G-PERNR,
DATUM(10), "date of the photo
FILENAME(128),
END OF IT_DATA.
DATA: T1(80),
file_path(132).
SELECTION-SCREEN: BEGIN OF BLOCK sp WITH FRAME TITLE text-f01
NO INTERVALS.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 5(4) A1 .
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN: END OF BLOCK sp.
INCLUDE BDCRECX1.
SELECTION-SCREEN SKIP 2.
SELECTION-SCREEN: BEGIN OF BLOCK vst WITH FRAME TITLE text-f02.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 3(25) TEXT-S11 FOR FIELD IDOBJ.
selection-screen position 45.
PARAMETERS POPFILE(128) VISIBLE LENGTH 50
DEFAULT 'C:\PICTURE.TXT'. "input data file
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 3(25) TEXT-S12 FOR FIELD IDOBJ.
selection-screen position 45.
PARAMETERS IDOBJ(2) DEFAULT '01'. "id object
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN: END OF BLOCK vst.
at selection-screen on value-request for POPFILE.
call function 'F4_FILENAME'
exporting
field_name = file_path
importing
file_name = POPFILE.
exception
others = 1.
START-OF-SELECTION.
PERFORM OPEN_GROUP.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
FILENAME = POPFILE
FILETYPE = 'ASC'
TABLES
DATA_TAB = IT_DATA
EXCEPTIONS
CONVERSION_ERROR = 1
INVALID_TABLE_WIDTH = 2
INVALID_TYPE = 3
NO_BATCH = 4
UNKNOWN_ERROR = 5
GUI_REFUSE_FILETRANSFER = 6
OTHERS = 7.
IF SY-SUBRC NE 0.
WRITE : / 'No to able read input file'.
STOP.
ELSE.
WRITE : / 'Data processing ...'.
T1 = 'Data processing ...'.
MESSAGE T1 Type 'S'.
ENDIF.
LOOP AT IT_DATA.
PERFORM BDC_DYNPRO USING 'ZOANEWCON' '0100'.
PERFORM BDC_FIELD USING 'BDC_CURSOR' 'TOAOM-AR_OBJECT'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '=NEW'.
PERFORM BDC_FIELD USING 'TOAOM-SAP_OBJECT' 'PREL'.
PERFORM BDC_FIELD USING 'TOAOM-AR_OBJECT' 'HRICOLFOTO'.
PERFORM BDC_FIELD USING 'INFILE' IT_DATA-FILENAME."JPG
PERFORM BDC_DYNPRO USING 'SAPLOA12' '0200'.
PERFORM BDC_FIELD USING 'BDC_CURSOR' 'OBJID-VALUE(03)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '=OK'.
PERFORM BDC_FIELD USING 'OBJID-VALUE(01)' IT_DATA-PERNR.
PERFORM BDC_FIELD USING 'OBJID-VALUE(02)' '0002'.
PERFORM BDC_FIELD USING 'OBJID-VALUE(04)' IDOBJ.
PERFORM BDC_FIELD USING 'OBJID-VALUE(05)' IT_DATA-DATUM.
PERFORM BDC_TRANSACTION USING 'ZOAOH'.
clear IT_DATA-FILENAME.
ENDLOOP.
PERFORM CLOSE_GROUP.} -
Photos uploaded into iPhoto do not appear as available for upload in Safari
Hi
When using Safari 6.0.2 to post a photo, there is a lag before I can access recently uploaded photos into iPhoto 9.4.2.
Sometimes I need to close iphoto before the photos will appear as 'uploadable' by Safari. Other times, closing iPhoto does not initially help.
I don't recall this being an issue in the past.If the Photos are under 'Last Import' or 'Last N Months' then they are in the Library somewhere, just not where you are expecting them to be. We know this as both Last Import and 'Last N Months' are not places, just listings of elements in the the Library.
The two most common reasons that they can't be found is either an incorrect date on the camera or the Sorting (View Menu -> Sort Photos - or Sort Events, as appropriate) has changed.
Quick route to find them: Right-click on one of the images in Last Import and select 'Show Event'. This will bring you to the image in the Library. -
Data upload into infotype 2003
Hiii
I have a customer requirement to upload flat file containing
below fileds into IT2003
PersNo,
Begindate,
Endate,
Daily work schedule.
currently they are using LSMW.
Can i use Function Module HR_INFOTYPE_OPERATION'
to upload in to IT2003
Regards,
naziYes. for data which u have for Upload ,U can surely use the FM HR_INFOTYPE_OPERATION
with Operation options :
COP Copy
DEL Delete
DIS Display
EDQ Lock/unlock
INS Create
LIS9 Delimit
MOD Change
INSS Create for Actions is not converted to Change
Apart this u will be reqd to Use BAPI_EMPLOYEE_ENQUEUE : so that the records stored for this
person cannot be accessed.
Once done with operation ,end it with BAPI_EMPLOYEE_DEQUEUE.
Regds,
AS -
How to upload records into Infotype 382(Awards)
Hi,
Could anyone suggest me how to upload records into infotype 382(Awards) of an Employee.
For solutions points rewarded.
Regards,
RadhuHi
you can develop a <b>BDC</b> for transaction <b>PA30</b>
using infotype 382.
(or)
can upload using batch input recording in <b>LSMW</b>.
regards,
Thangesh -
Query on uploading data into infotype
Hi,
I am in search of a method to upload data into infotypes IT0001,HRP1001.
I have serached and found we can do it using BDC,LSMW and through Hr_INOFYTPE_OPERATION--fm.
But in my flat file am having pernr ,begda,endda and supervisor..
Some of my searches said if i had a pernr in flat file its impossible to do with HR_INFOTYPE_OPERATION.
CAN ANYONE PLS SUGGEST ME THE BEST WAY TO DO?
ThanksHi Salini
Using BDC or LSMW might lead to some inconsistencies.
Uploading of various infotype data depends upon its volume.
There is a FM: HR_MAINTAIN_MASTERDATA through which you can upload the data. But this does for one record at a time. So the performance gets affected at times. Before calling this FM each time, clear the buffer using the FM: 'HR_PSBUFFER_INITIALIZE'. This will be of great help.
Incase you want to upload all your data at once, you can use BAPI_HRMASTER_SAVE_REPL_MULT.
Let me know incase you need any help in any of these.
Regards
Harsh -
I just loaded some July pictures into my PC iCloud photos upload folder, but I do not see them with my iPad. Are they not shared because they are past the 30 day window, or is there a different issue?
Generally I would not use Facebook for sharing any photos, it compresses the photos substantially, and when you have shadows and dark colours you get visible "bands" where there should be subtle gradients, ie at sunsets and sunrises.
It sounds like you are using two methods to upload to Facebook:
1. Sharing from within Aperture, which basically syncs Facebook with your Aperture album, so any changes made at either end gets synced, hence the deletions from Albums, although the original file should still be in your library, just removed rom the album. It is like a playlist in iTunes.
2. Exporting pics and uploading to Facebook from the browser.
I am not sure how method 1 gets compressed, but I know that uploading hi-res jpegs to Facebook using method 2 results in poor quality images.
I wouldn't even bother comparing option 1 or 2, and they will both be poor images once you view them on Facebook, as opposed to viewing uploaded images on proper image sharing / hosting sites.
Your problem is not with Aperture, it is using Facebook for showing your work.
If you export pics form Aperture at high res jpegs or TIFFs your images will be fine.
If you insist to use Facebook as your way to share your work, then your workflow should be this:
1. Right click images you want to share.
2. Select Export version.
3. Export as 100% size and ensure the export settings are set at 100% quality.
4. Upload this pic into Facebook.
This will get you the best image size and resolution on Facebook.
See how you go. -
Hi Guys,
I found CF 'ARCHIV_CREATE_DIALOG_META' is useful for massive photo upload.I tried tat,but getting an error(file_open_error) eventhough valid file exists.
And also,
-What should be the name of photo? i kept as (emp no).jpg ,
- Do we need to give ARCHIV_ID? while debugging i found Z2 as archiv_id,but i didnt mention tat in a call function.
Please help in this regard.Points will ve rewarded.
Have a look @ my code:
*& Data Declaration *&
DATA : BEGIN OF T_RECORD OCCURS 0,
PERNR(12) TYPE C, "Employee Number
PATH LIKE SAPB-SAPPFAD, "Photo Path
END OF T_RECORD.
DATA : w_pernr_zero LIKE t_record-pernr,
w_pernr_pass TYPE SAPB-SAPOBJID.
*& Selection screen *&
SELECTION-SCREEN BEGIN OF BLOCK A1 WITH FRAME.
SELECT-OPTIONS : PERNR FOR T_RECORD-PERNR,
PATH FOR T_RECORD-PATH NO INTERVALS.
SELECTION-SCREEN END OF BLOCK A1.
*& Start of selection *&
START-OF-SELECTION.
LOOP AT PERNR.
T_RECORD-PERNR = PERNR+3(4).
T_RECORD-PATH = PATH+3(140).
APPEND T_RECORD.
ENDLOOP.
LOOP AT t_record.
"Since the employee photo is always stored in 0002 infotype,
" - Concatenation of emp id with preceding zeros and pad "0002" in
" - right into the pernr field which will be passed to object_id.
SHIFT t_record-pernr LEFT DELETING LEADING '0'.
CONDENSE t_record-pernr.
CONCATENATE t_record-pernr '0002' INTO t_record-pernr.
w_pernr_zero = t_record-pernr.
CLEAR w_pernr_pass.
w_pernr_pass = w_pernr_zero.
CALL FUNCTION 'ARCHIV_CREATE_DIALOG_META'
EXPORTING
ar_object = 'HRICOLFOTO'
object_id = w_pernr_pass
sap_object = 'PREL'
file = t_record-path.
IF SY-SUBRC EQ 0.
WRITE:/ 'SUCCESSFULLY ASSIGNED'.
ELSE.
WRITE :/ 'NO RECORDS HAVE BEEN ASSIGNED'.
ENDIF.
ENDLOOP.Hi,
for uploading the photograph you need to do some customization.
1. Initial customization
Execute transaction code OAQ1 and put X in all the boxes.
Execute t code OAB4 and schedule the job
Execute t code SPAD and configure an output device
Execute T code OANR and configure the number range
Execute T code OAGI and deactivate Print list management system
EXecute T code SA38 and execute program RAPARAM and check for rspo/archive_format and make sure it should have 2 assigned on it.
2. Execute t code OAC0 and configure content repository
Execute t code OAC2 and make your document type
Assign JPG doc class to your doc type made in OAC2 in t code OAC3.
3. Now go to transaction code OAD5 and configure your settings
Come to t code OAWD and upload all your scanned photo to SAP
I know the procedure is tedious and lenghthy but there is no way out.
If it helps you then reward it.
Enjoy
For further help contact at [email protected] -
When I try to upload a new album to Facebook or pictures to printerpix the photo upload window where I choose which photos to add does not come up, until I click on another screen. But then when it does come up everything is frozen and I have to force quit safari. Pop-ups are not blocked on my computer and all soft wear updates are complete, any other ideas? Thank you!
Hey, I don't have any answer for you right now but I saw your post and wanted to let you know I'm looking into your issue with Kaleb.
John M. -
Facebook Photo uploader not working
Hi
a few weeks ago (nov 2012) i upgraded to the latest vresion of facebook, but if i now go into the app and click to upload a photo, nothing happens, not even an error message appears. everythign else is working fine though. Photo uploading works if i go to the gallery and select send to facebook.
ive tried uninstalling, resetting my phone and upgrading my software but nothing has worked. any help would be good and i have a blackberry curve9300 3Gdo you confirm you are using Facebook 3.3.0.11 ?
The search box on top-right of this page is your true friend, and the public Knowledge Base too: -
Employee Photo Upload through binary data
Hi all,
I know the Provision for Photo upload through OAAD Tcode, I know FM to upload the photos by giving path as input data. my requirement is I have picture in the form of binary data . i want to upload that into PA30. I have return the following code. No Error but image is not displayed in PA30.Can u Please correct me?
tables: toav0, toaom, twfdb, toapa.
data: key like ojint-key,
object like ojint-name,
object_id like toav0-object_id,
archiv_id like toav0-archiv_id,
arc_doc_id like toav0-arc_doc_id,
ablagedatum like sapb-sapabldate,
ar_date like toav0-ar_date,
del_date like toav0-del_date,
sap_object like toaom-sap_object,
ar_object like toaom-ar_object,
expiry_tim like toaom-expiry_tim,
method like ojint-method,
return like ojint-return,
parameter like ojint-parameter.
data:begin of i_toav0 occurs 1.
include structure toav0.
data: end of i_toav0.
data: begin of i_toaom occurs 1.
include structure toaom.
data: end of i_toaom.
data: begin of fields occurs 1.
include structure ojfields.
data: end of fields.
DATA: filename1 TYPE string.
Data: i_name TYPE STXBITMAPS-TDNAME value 'TEST',
* archiv_id like toav0-archiv_id,
i_id TYPE STXBITMAPS-TDID VALUE 'BMAP',
i_btype TYPE STXBITMAPS-TDBTYPE VALUE 'BCOL',
l_bds_bytecnt TYPE i,
FLENGTH TYPE SAPB-LENGTH,
l_bds_content TYPE TABLE OF bapiconten,
OUTDOC LIKE TOADT ,
wa_l_bds_content TYPE bapiconten.
*DATA : BINARY TYPE STANDARD TABLE OF TBL1024,
data : BINARY TYPE STANDARD TABLE OF TBL1024 WITH HEADER LINE,
ARCHIVOBJECT type standard table of docs,
archiv_doc_id like toav0-arc_doc_id,
wa_binary type TBL1024.
data: lw_ar_object like toaom-ar_object,
lw_object_id like sapb-sapobjid,
lw_sap_object like toaom-sap_object,
lw_doc_type like toadd-doc_type,
lw_path like sapb-sappfad,"toav0-arc_doc_id
* archiv_doc_id like toav0-arc_doc_id,
doc_type like toadt-doc_class.
constants: c_sap_object type toaom-sap_object value 'PREL',
c_ar_object type toaom-ar_object value 'HRICOLFOTO',
c_doc_type type toaom-doc_type value 'JPG'.
PARAMETERS: filename(150) TYPE c OBLIGATORY. "Name of the File where source as txt format
AT SELECTION-SCREEN ON VALUE-REQUEST FOR filename.
PERFORM getfile.
start-of-selection.
filename1 = filename.
key = '010001380002'.
lw_ar_object = c_ar_object.
* lw_object_id = w_pernr_pass.
lw_sap_object = c_sap_object.
lw_doc_type = c_doc_type.
* lw_path = it_data-file_nam.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
filename = filename1
filetype = 'BIN'
TABLES
data_tab = archivobject.
* Object to be archived
select single * from toaom where ar_object = c_ar_object and sap_object = c_sap_object.
if sy-subrc <> 0.
raise UPLOAD_ERROR.
else.
* Authority check with Archive id
archiv_id = toaom-archiv_id.
perform authority_check_create(oaall)
using archiv_id object space ar_object space
changing sy-subrc.
if sy-subrc ne 0.
raise UPLOAD_ERROR.
else.
if sy-subrc <> 0.
raise UPLOAD_ERROR.
clear toav0.
else." Transfer key for archiving
toav0-object_id = key.
if key eq space.
Raise FUNCTION_ERROR.
clear toav0.
else.
perform create_archive_object_new .
endif.
endif.
endif.
endif.
form create_archive_object_new .
CALL FUNCTION 'ARCHIV_CREATE_TABLE'
EXPORTING
AR_OBJECT = lw_ar_object
* DEL_DATE =
OBJECT_ID = '010001380002'
SAP_OBJECT = lw_sap_object
* FLENGTH = '2328'
DOC_TYPE = lw_doc_type
* DOCUMENT =
* MANDT = SY-MANDT
* IMPORTING
* OUTDOC =
TABLES
ARCHIVOBJECT = ARCHIVOBJECT
* BINARCHIVOBJECT = binary
* EXCEPTIONS
* ERROR_ARCHIV = 1
* ERROR_COMMUNICATIONTABLE = 2
* ERROR_CONNECTIONTABLE = 3
* ERROR_KERNEL = 4
* ERROR_PARAMETER = 5
* ERROR_USER_EXIT = 6
* ERROR_MANDANT = 7
* OTHERS = 8
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
call function 'ARCHIVOBJECT_CREATE_TABLE'
EXPORTING
archiv_id = archiv_id
document_type = lw_doc_type
* length = '2328'
IMPORTING
archiv_doc_id = i_toav0-arc_doc_id
TABLES
archivobject = archivobject
* binarchivobject = BINARY
EXCEPTIONS
error_kernel = 1
error_communicationtable = 2
error_archiv = 3.
move i_toav0 to toav0.
toav0-sap_object = lw_sap_object.
toav0-object_id = key.
move archiv_id to toav0-archiv_id.
move i_toav0-arc_doc_id to toav0-arc_doc_id.
toav0-ar_object = lw_ar_object.
move lw_doc_type to toav0-reserve.
move lw_doc_type to doc_type.
commit work.
call function 'ARCHIV_CONNECTION_INSERT'
exporting
archiv_id = toav0-archiv_id
arc_doc_id = toav0-arc_doc_id
ar_date = ar_date
ar_object = toav0-ar_object
* DEL_DATE = ' '
* MANDANT = ' '
object_id = '010001380002'
sap_object = toav0-sap_object
doc_type = doc_type
* barcode = barcode
exceptions
error_connectiontable = 1
others = 2
endform.
FORM getfile .
CALL FUNCTION 'WS_FILENAME_GET'
EXPORTING
def_filename = ' '
def_path = '*.*'
mask = ''
mode = 'O'
title = ' SELECTING FILE FOR SOURCE PROGRAM'
IMPORTING
filename = filename
EXCEPTIONS
selection_cancel = 3
selection_error = 4.Hi all,
I know the Provision for Photo upload through OAAD Tcode, I know FM to upload the photos by giving path as input data. my requirement is I have picture in the form of binary data . i want to upload that into PA30. I have return the following code. No Error but image is not displayed in PA30.Can u Please correct me?
tables: toav0, toaom, twfdb, toapa.
data: key like ojint-key,
object like ojint-name,
object_id like toav0-object_id,
archiv_id like toav0-archiv_id,
arc_doc_id like toav0-arc_doc_id,
ablagedatum like sapb-sapabldate,
ar_date like toav0-ar_date,
del_date like toav0-del_date,
sap_object like toaom-sap_object,
ar_object like toaom-ar_object,
expiry_tim like toaom-expiry_tim,
method like ojint-method,
return like ojint-return,
parameter like ojint-parameter.
data:begin of i_toav0 occurs 1.
include structure toav0.
data: end of i_toav0.
data: begin of i_toaom occurs 1.
include structure toaom.
data: end of i_toaom.
data: begin of fields occurs 1.
include structure ojfields.
data: end of fields.
DATA: filename1 TYPE string.
Data: i_name TYPE STXBITMAPS-TDNAME value 'TEST',
* archiv_id like toav0-archiv_id,
i_id TYPE STXBITMAPS-TDID VALUE 'BMAP',
i_btype TYPE STXBITMAPS-TDBTYPE VALUE 'BCOL',
l_bds_bytecnt TYPE i,
FLENGTH TYPE SAPB-LENGTH,
l_bds_content TYPE TABLE OF bapiconten,
OUTDOC LIKE TOADT ,
wa_l_bds_content TYPE bapiconten.
*DATA : BINARY TYPE STANDARD TABLE OF TBL1024,
data : BINARY TYPE STANDARD TABLE OF TBL1024 WITH HEADER LINE,
ARCHIVOBJECT type standard table of docs,
archiv_doc_id like toav0-arc_doc_id,
wa_binary type TBL1024.
data: lw_ar_object like toaom-ar_object,
lw_object_id like sapb-sapobjid,
lw_sap_object like toaom-sap_object,
lw_doc_type like toadd-doc_type,
lw_path like sapb-sappfad,"toav0-arc_doc_id
* archiv_doc_id like toav0-arc_doc_id,
doc_type like toadt-doc_class.
constants: c_sap_object type toaom-sap_object value 'PREL',
c_ar_object type toaom-ar_object value 'HRICOLFOTO',
c_doc_type type toaom-doc_type value 'JPG'.
PARAMETERS: filename(150) TYPE c OBLIGATORY. "Name of the File where source as txt format
AT SELECTION-SCREEN ON VALUE-REQUEST FOR filename.
PERFORM getfile.
start-of-selection.
filename1 = filename.
key = '010001380002'.
lw_ar_object = c_ar_object.
* lw_object_id = w_pernr_pass.
lw_sap_object = c_sap_object.
lw_doc_type = c_doc_type.
* lw_path = it_data-file_nam.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
filename = filename1
filetype = 'BIN'
TABLES
data_tab = archivobject.
* Object to be archived
select single * from toaom where ar_object = c_ar_object and sap_object = c_sap_object.
if sy-subrc <> 0.
raise UPLOAD_ERROR.
else.
* Authority check with Archive id
archiv_id = toaom-archiv_id.
perform authority_check_create(oaall)
using archiv_id object space ar_object space
changing sy-subrc.
if sy-subrc ne 0.
raise UPLOAD_ERROR.
else.
if sy-subrc <> 0.
raise UPLOAD_ERROR.
clear toav0.
else." Transfer key for archiving
toav0-object_id = key.
if key eq space.
Raise FUNCTION_ERROR.
clear toav0.
else.
perform create_archive_object_new .
endif.
endif.
endif.
endif.
form create_archive_object_new .
CALL FUNCTION 'ARCHIV_CREATE_TABLE'
EXPORTING
AR_OBJECT = lw_ar_object
* DEL_DATE =
OBJECT_ID = '010001380002'
SAP_OBJECT = lw_sap_object
* FLENGTH = '2328'
DOC_TYPE = lw_doc_type
* DOCUMENT =
* MANDT = SY-MANDT
* IMPORTING
* OUTDOC =
TABLES
ARCHIVOBJECT = ARCHIVOBJECT
* BINARCHIVOBJECT = binary
* EXCEPTIONS
* ERROR_ARCHIV = 1
* ERROR_COMMUNICATIONTABLE = 2
* ERROR_CONNECTIONTABLE = 3
* ERROR_KERNEL = 4
* ERROR_PARAMETER = 5
* ERROR_USER_EXIT = 6
* ERROR_MANDANT = 7
* OTHERS = 8
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
call function 'ARCHIVOBJECT_CREATE_TABLE'
EXPORTING
archiv_id = archiv_id
document_type = lw_doc_type
* length = '2328'
IMPORTING
archiv_doc_id = i_toav0-arc_doc_id
TABLES
archivobject = archivobject
* binarchivobject = BINARY
EXCEPTIONS
error_kernel = 1
error_communicationtable = 2
error_archiv = 3.
move i_toav0 to toav0.
toav0-sap_object = lw_sap_object.
toav0-object_id = key.
move archiv_id to toav0-archiv_id.
move i_toav0-arc_doc_id to toav0-arc_doc_id.
toav0-ar_object = lw_ar_object.
move lw_doc_type to toav0-reserve.
move lw_doc_type to doc_type.
commit work.
call function 'ARCHIV_CONNECTION_INSERT'
exporting
archiv_id = toav0-archiv_id
arc_doc_id = toav0-arc_doc_id
ar_date = ar_date
ar_object = toav0-ar_object
* DEL_DATE = ' '
* MANDANT = ' '
object_id = '010001380002'
sap_object = toav0-sap_object
doc_type = doc_type
* barcode = barcode
exceptions
error_connectiontable = 1
others = 2
endform.
FORM getfile .
CALL FUNCTION 'WS_FILENAME_GET'
EXPORTING
def_filename = ' '
def_path = '*.*'
mask = ''
mode = 'O'
title = ' SELECTING FILE FOR SOURCE PROGRAM'
IMPORTING
filename = filename
EXCEPTIONS
selection_cancel = 3
selection_error = 4. -
Hi Experts,
I need to upload the photographs of employee to SAP.
All the config required for photo upload is done
These photograph path details and Emp Id will be available in a flat file.
As BDC approach using OAAD is not able to workout (picking of text file is via a Operating system screen so we cant record it in BDC) so we used below approach.
Using GUI_UPLOAD and ARCHIV_CREATE_DIALOG_META .
The above approach works FINE for foreground and presentation server upload.
Now the requirement is:
I have 2 questions.
1. It is not working for background processing.
2. The photo has to be called from app server (images available on App. Server (UNIX)). is it possible to get JPEG file from app server without using GUI_UPLOAD?
If it is possible do guide me.
Regards,
RahulI thought I'd share this with everyone. We figured out how to load pictures in batch processing using pictures stored on a unix server. The code below is what we are using. For now, I'm using a driver file from the local drive to determine which picture goes with which associate, but we plan to automate this by storing the pictures with the associate number in the name. We'll then read the directory each night and load any new pictures. I thought I'd share what we discovered for now so you can build what you need for your side.
REPORT ZHR_EMPLOYEE_PICTURES_UPLOAD
NO STANDARD PAGE HEADING LINE-SIZE 255.
Program Title: Program to mass load employee pictures into HR module
INCLUDE
PARAMETERS:
P_INFILE LIKE RLGRAP-FILENAME
DEFAULT 'c:\PICTURE.TXT',
P_UNXDIR LIKE RLGRAP-FILENAME
DEFAULT '/usr/sap/data/WINDOWS_DFS/'.
I N T E R N A L T A B L E S
DATA : BEGIN OF INFILE_DATA OCCURS 0,
IN_LINE(80) type c,
END OF INFILE_DATA.
DATA : begin of inrec,
raw(1024) type x,
end of inrec.
DATA : begin of itab occurs 0,
raw(1024) type x,
end of itab.
Data: WS_FILENAME TYPE STRING,
WS_OBJID LIKE SAPB-SAPOBJID,
WS_FILELENGTH TYPE I,
WS_FLENGTH LIKE SAPB-LENGTH.
S T A R T - O F - S E L E C T I O N
START-OF-SELECTION.
Read input file that controls which picture goes with which associate.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
FILENAME = P_INFILE
FILETYPE = 'DAT'
TABLES
DATA_TAB = INFILE_DATA.
IF SY-SUBRC NE 0.
WRITE : / 'Unable to upload data'.
STOP.
ENDIF.
LOOP AT INFILE_DATA.
Determine file name and personnel ID from input file.
concatenate P_UNXDIR INFILE_DATA-IN_lINE+9(71) into WS_FILENAME.
WS_OBJID = INFILE_DATA-IN_LINE+0(8).
Clear table holding picture data.
clear ITAB.
refresh ITAB.
Reset overall file length variable.
ws_flength = 0.
Open dataset to read in binary mode.
open dataset WS_FILENAME for input in binary mode.
do.
Read file one record at a time in binary mode.
clear inrec.
read dataset WS_FILENAME into inrec
maximum length 1024
actual length ws_filelength.
Determine accumulated file length as each record read in.
ws_flength = ws_flength + ws_filelength.
Last record of file will cause sy-subrc to not be 0 and will be
less in length than record size.
if ws_flength > 0.
move inrec to itab.
append itab.
endif.
end loop at end of file.
if sy-subrc ne 0.
exit. "end of file must have been reached
endif.
enddo.
close dataset WS_FILENAME.
Add picture file to content server for specific associate.
CALL FUNCTION 'ARCHIV_CREATE_TABLE'
EXPORTING
ar_object = 'HRICOLFOTO'
object_id = WS_OBJID
sap_object = 'PREL'
flength = WS_FLENGTH
TABLES
binarchivobject = ITAB.
IF SY-SUBRC = 0.
WRITE : / WS_OBJID+0(8), ' -- picture loaded: ', WS_FILENAME,
' -- length: ', WS_FLENGTH.
else.
WRITE : / WS_OBJID+0(8), ' -- Unable to load pic: ', WS_FILENAME,
' -- length: ', WS_FLENGTH.
ENDIF.
clear INFILE_DATA-IN_LINE.
ENDLOOP. -
Photos app do not back up my Photos library into iCloud
I have just updated to OS x 10.10.3.
When I tried to enter the Photo app, I got the message ״There is not enough disk space to migrate your library. It is estimated that you need at least 33GB of additional free space.״
I have a 256 GB SSD hard drive, Mostly occupied by images and videos that where in iPhoto app.
By your recommendation I made the following steps:
Get another drive and move the Library there:
Make sure the drive is formatted Mac OS Extended (Journaled)
1. Quit iPhoto
2. Copy the iPhoto Library from your Pictures Folder to the External Disk.
3. Hold down the option (or alt) key while launching iPhoto. From the resulting menu select 'Choose Library' and navigate to the new location. From that point on this will be the default location of your library.
4. Test the library and when you're sure all is well, trash the one on your internal HD to free up space.
After doing that, I noticed that the Photos app created a new "Photos library" in my external HD.
I deleted the old "iPhoto library" on my internal HD and copied the new "Photos library" from my external HD into my internal HD.
I defined the new "Photos library" on my internal HD as the "System Photos library".
Now I can view and edit my photos on my internal HD, but it doesn't back up my "Photos library" into iCloud (I did all needed in Mac System Preferences/iCloud and in Photos app/Preferences/iCloud).
What can I do in order to back up my "Photos library" into iCloud?
Thanks,
ArikUpdate - it started uploading "items" to iCloud.
-
Not all of my photos upload to my website when I publish it. when my site finishes publising I get an error that says, "There was an error communicating with the FTP server. Try again later, or check with your service provider."
I am publishing directly to an FTP server (option 1). Is this the optimal method or should I be publishing to a folder and then (how do/would I?) publish to my hosting domain?
I'm wondering if this has really anything to do with the publishing process, or whether it just has to do with the photos and/or the photo albums. I've deleted the photo albums with the missing pictures from my site on iweb thinking a file might be corrupt. (I'm getting the albums from iphoto -- drag/drop method into iweb) I then replaced these albums with the same albums as the previous ones from iphoto and then published my site again -- and the EXACT same photos were once again missing in the NEW albums as were missing in the old albums...
Maybe it is a publishing issue, or it could be a photo/file issue. However, these albums aren't very large -- the largest containing 135 photos --
Please! if you have any suggestions or ideas as to what is happening I would be greatly appreciative!
I'm pulling my hair out here trying to diagnose the problem... -
Report on employee photo upload [HRICOLFOTO]
Hi Experts,
Have gone thru many posts regarding photo upload, but is there any report or table which gives PERNR wise details for all the uploaded photos?
Basically I want to know for how many employees photos have not been uploaded or the other way will also do.
Have checked content repository table SDOKCONT1 but not of much help.
Please help on the issue.Hi,
Run report OAADMILI via SE38 for the relevant content repository.
There restrict the output to PREL object.
There you'll see all the personnel numbers who have a photo in the SAP Object ID column (along with the infotype number e.g. XXXXXXXXYYYY where XXXXXXXX is the personnel number and YYYY is the infotype)
Regards,
Dilek
Maybe you are looking for
-
My 2009 iMac started running very slowly this past week. I have searched the forums and used EtreCheck to get rid of Genieo, but it seems to be getting slower. How is that even possible. Here is the data from EtreCheck. EtreCheck version: 2.1.5 (108)
-
Photoshop cs6 hangs when saving file
Photoshop cs6 is hanging when tyring to save. Seems to pause at 83% and then takes over a minute to save the file. Computer details below and the system info. Gone back to using cs5.5 for now, hoping someone has some idea where the issue might be. Ha
-
About Layout control and Image alt text
Can i use normal HTML div tags to control layout ? is it bad practice or not? or i should go for template? Can anyone please suggest how to add alt text and title to the images(logo) in ADF .
-
Problems connecting to internet via bluetooth from...
I am trying to connect to the internet from my Mac PowerBook using my Nokia 5300. The phone pairs nicely and sets up but when I press "Join network on Nokai 5300" which should connect me to the Internet, the computer connects briefly to the phone aft
-
How to play AVI format Video files in Nokia C6
Hello All, How to play AVI format Video files in Nokia C6-00. Thanks shanth