Tuesday, October 5, 2010

Current Major System Maintained by IT

Posted by Aries Wandari

Current major system maintained by IT (besides SAP). Most are inhouse applications developed by our software programmer division team.

System
Development
Description
CAFinhouseContract System
- Manage company contract related to vendor.
CRDSinhouseCustomer Relation Database System
- Provide information about PT TITAN customer (integrated with SAP already), specific customer requirement for the product, competitor purchasing information, etc.
- Record technical and sales visit of our technical service staff.
- Process sample request, customer trial request from customer.
- Manage customer complaint or record customer satisfaction from customer.
EDSinhouseElectronic Document System
- Manage company document electronically such as ISO Document, etc.
ERMinhouseEnterprise Risk Management
- Manage risk of a job/project to ensure its safety aspects (identify risk, search for outcomes, etc).
HR SysteminhouseHR System for Employee
- Web base application to create/display/approve employee annual leave, business travel, attendance report.
- Display employee personal data, medical record history.
- Display company HR related form and publication (Internal Memorandum, Organization Notice, etc).
IT Support/IT HelpdeskinhouseIT Support System.
- Record application and database backup routine.
- Record any event/problem on server system, application, network, pabx, etc.
- Managing IT helpdesk request from user.
LIMSexternalLaboratory Information Management System
- Maintain experiment and laboratory data about characteristic of a product)
LDSinhouseLaboratory Data System
- Maintain laboratorium data related to products development and quality
control. The system consume LIMS data for a judge that a product is sold as Prime, Near Prime etc.
Online ApplicationinhouseWeb based application for Admin Service Department request for service, such as transportation request, meal, office stationaries, business card, uniform request.
PersonelinhouseHR System for HR Department
- Manage employee personal data,
- Maintain employee personal information data, family data, working experience, education,
annual leave, medical, training and position history.
- Recognition achieved and warning accepted from the company.
- Create employee work schedule, process employee absens.
PTServiceinhouseSAP to Local Database Data Transporter (SQL)
- A system to download SAP mature data to TPN local database server.
Corporate IntranetinhousePT TITAN Intranet web, provide corporate matters, department links and publication.
Also provide links to another application (Phone Book, Web Mail, HR System for Employee, etc)
ServicesinhouseAdmin Service System
- Process logistic operation such as vehicle kilometers and petrol entry, telephone usage,
laundry, employee meals.
TrackinginhouseHSE Related Software
- Software for tracking Safety related issue of the company. Such as record any incident report,
near miss, sub standard, safety talk performed, inspection walkthrough, ideas/suggestion, emergency
drill, housekeeping, HSE Comitte and HSE Audit, Non Conformity Report and Safety Assesment.
Weightbridge SystemexternalWeightbridge System
- A system that validate between real truck load with product weight shows on Delivery Order, in order to deliver finish product to customer.

Wednesday, August 4, 2010

Fingerprint Project

Posted by Aries Wandari

Pemasangan fingerprint untuk di beberapa site di plant untuk menggantikan reader absensi dengan proximity card, Jumat dan Sabtu 30-31 Juni 2010 (2 hari).

Point safety:
1. Safety induction untuk si pekerja.
2. Pemakaian perlengkapan safety.

a. Glasses
b. Helmet
c. Jaket lengan panjang
d. Safety Shoes
e. Body harness (khusus untuk pemasangan di gate 2)
3. Pembuatan permit berdasarkan tipe pekerjaan.

Deskripsi pekerjaan:
1. Pemasangan fingerprint yang melekat di tembok. Mungkin perlu melakukan pekerjaan bor dinding. Mungkin juga ada pekerjaan pengelasan untuk pemasangan di store.
2. Pemasangan (penarikan) kabel jaringan dari lokasi fingerprint ke hub terdekat.
3. Khusus untuk pemasangan di gate 2, ada pekerjaan di ketinggian +- 4 m di atas permukaan tanah untuk pemasangan koneksi relay.

Lokasi pemasangan:
1. Gate 2
2. Kantin
3. Store
4. Control Building

Note:
- Melihat waktu pekerjaan yang singkat (hanya 2 hari), item safety bisa dipinjam melalui admin secretary (untuk visitor). Untuk pekerjaan lebih lama dapat meminta ke HSE.
- Pekerjaan mengebor dinding memerlukan secondary hot permit. Sedangkan pekerjaan pengelasan/gerinda memerlukan primary hot permit (mungkin ada pekerjaan ini untuk pemasangan fingerprint di store, mengingat konstruksi pintunya yang terbuat dari besi).
- Pekerjaan mengebor dinding perlu konfirmasi pula ke bagian yang mengurus layout bangunan (Maint. Dept.) bila ada kemungkinan di dalam dinding tersebut terdapat instalasi kabel dsb.
- Permit pekerjaan dikeluarkan per area.
- Area gate 2,kantin dan store, permit dikeluarkan oleh Admin Service Dept.
- Area control building, permit dikeluarkan oleh shift supervisor.

Wednesday, July 21, 2010

(Few) SQL Function

Posted by Aries Wandari

Get first day of current year:
SELECT     *
FROM         tbl
WHERE     (tbl.datefield = DATEADD(yy, DATEDIFF(yy, 0, GETDATE()), 0))

Get last day of current year:
SELECT     *
FROM         tbl
WHERE     DATEADD(dd,-1,DATEADD(yy,0,DATEADD(yy,DATEDIFF(yy,0,getdate())+1,0)))

Get first day of current month:
SELECT     *
FROM         tbl
WHERE     select DATEADD(mm, DATEDIFF(mm,0,getdate()), 0)

Get first day of last month:
SELECT     *
FROM         tbl
WHERE     DATEADD(mm, DATEDIFF(mm,0,DATEADD(mm,-1,getdate())), 0)

Get month part of a datetime field.
DATEPART(MONTH, A.AEDAT)

Get year part of a datetime field.
DATEPART(YEAR, A.AEDAT)

Cast field to char.
CAST(aField AS char(4))

Set 2 digit literal with trailing 0.
RIGHT('0' + RTRIM(MONTH(A.AEDAT)), 2)

Get Date Part Only of Datetime Field
CONVERT(varchar(8), GETDATE(), 112)

Get Time Part Only of Datetime Field
CONVERT(varchar(8), GETDATE(), 108)

Get Yesterday Date

DATEADD(DAY,DATEDIFF(DAY,'20000102',GETDATE()),'20000101')


And many else (from shanecooper.net) 
Monday of the Current Week
select DATEADD(wk, DATEDIFF(wk,0,getdate()), 0)
Sunday of the Current Week
set DATEFIRST 1
select DATEADD(dd, 1 - DATEPART(dw, getdate()), getdate())
First Day of the Year
select DATEADD(yy, DATEDIFF(yy,0,getdate()), 0)
First Day of the Quarter
select DATEADD(qq, DATEDIFF(qq,0,getdate()), 0)
Midnight for the Current Day
select DATEADD(dd, DATEDIFF(dd,0,getdate()), 0)
Last Day of Prior Month
select dateadd(ms,-3,DATEADD(mm, DATEDIFF(mm,0,getdate()  ), 0))
Last Day of Prior Year
select dateadd(ms,-3,DATEADD(yy, DATEDIFF(yy,0,getdate()  ), 0))
Last Day of Current Month
select dateadd(ms,-3,DATEADD(mm, DATEDIFF(m,0,getdate()  )+1, 0))
Last Day of Current Year
select dateadd(ms,-3,DATEADD(yy, DATEDIFF(yy,0,getdate()  )+1, 0))
First Monday of the Month
select DATEADD(wk, DATEDIFF(wk,0, dateadd(dd,6-datepart(day,getdate()),getdate()) ), 0)    

Tuesday, July 20, 2010

Instal/Uninstal Windows Service

Posted by Aries Wandari

Many customized SAP reports run slowly in SAP environment. So we make a bapi to download a mature data and store it on our sql server. The program run as service on the server and run in daily basis. We also profide small application so user can update the data on request.

To install service manually
  1. Go to directory in which installutill located (for me, in WINDOWS\Microsoft.NET\Framework\v2.0.50727).
  2. Run InstallUtil.exe with your exe as parameter. Enter code below:
    installutil abc.exe


To uninstall service manually



  • Run InstallUtil.exe with your exe as a parameter. Enter code below:


    installutil /u abc.exe

Monday, July 19, 2010

SAP Error in spool C call: spool overflow

Posted by Aries Wandari

Error in spool C call: spool overflow
t.code SPAD
menu path: Administration > Clean Spool

Add Full Trust Location on VS2008

Posted by Aries Wandari

Im developing .net application in my local computer. Because we’ll develop it in team, I have to save it in share forlder so any else developer can access. Then come this error when I run the application.

Message=”Request for the permission of type ‘System.Data.OleDb.OleDbPermission, System.Data, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089′ failed.”
Its because .net dont trust developer location. Run caspol.exe (in directory C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727) to add developer trust site.
D:\WINDOWS\Microsoft.NET\Framework\v2.0.50727>caspol.exe -pp off -m -ag 1.2 –url file:w:\* FullTrust
image

Monday, June 28, 2010

BAPI_SALESORDER_CREATEFROMDAT2

Posted by Aries Wandari

     Im on the way creating waste selling on intranet. User will input material that will be sold, do some level approval and create sales order in SAP. Im using BAPI_SALESORDER_CREATEFROMDAT2 to create sales order. Test using the function is ok (sales document number diplayed). But when I try to display the SO via VA03, error ‘SD document xxx is not in the database or has been archived’ displayed.
Function test displaying sales order successfully created.
image

To handle this, we  need to commit the transaction by running BAPI_TRANSACTION_COMMIT.

Sequence test on creating sales order and commit transaction:
On function module SE37, click menu Function Module > Test > Test sequence, input BAPI_SALESORDER_CREATEFROMDAT2 and BAPI_TRANSACTION_COMMIT, then run.

Example of abap program testing the function:

*&---------------------------------------------------------------------*
*& Report  ZCREATESALESDOC                                             *
*&                                                                     *
*&---------------------------------------------------------------------*
*&                                                                     *
*&                                                                     *
*&---------------------------------------------------------------------*
REPORT  ZCREATESALESDOC                         .
DATA: order_header_in LIKE standard table of bapisdhd1 with header line.
DATA: order_items_in TYPE STANDARD TABLE OF bapisditm WITH HEADER LINE.
DATA: order_schedules_in
TYPE STANDARD TABLE OF bapischdl WITH HEADER LINE.
DATA: order_partners TYPE STANDARD TABLE OF bapiparnr WITH HEADER LINE.
DATA: return TYPE STANDARD TABLE OF bapiret2 WITH HEADER LINE.
data: itemx like bapisditmx occurs 10 with header line.
order_header_in-doc_type = 'ZORL'.
order_header_in-sales_org = 'ID10'.
order_header_in-distr_chan = 'DC'.
order_header_in-division = '00'.
order_header_in-purch_date = sy-datum.
order_header_in-purch_no_c = 'BAPITEST'.
APPEND order_header_in.
order_partners-partn_role = 'AG'.
order_partners-partn_numb = '0000100080'.
APPEND order_partners.
order_partners-partn_role = 'WE'.
order_partners-partn_numb = '0000100082'.
APPEND order_partners.
*req deliv date, pricing date
*payment terms, incoterms
*add next line with more than one item
order_items_in-itm_number = '000010'.
order_items_in-material = 'LL0209AA'.
order_items_in-target_qty = '1000'.
order_items_in-target_qu = 'KG'.
order_items_in-sales_unit = 'KG'.
APPEND order_items_in.
order_schedules_in-itm_number = '000010'.
order_schedules_in-req_qty = '1000'.
APPEND order_schedules_in.
*Add following lines with more than one line
itemx-itm_number = '000010'.
itemx-updateflag = 'I'.
itemx-material = 'X'.
itemx-target_qty = 'X'.
append itemx.
*stop add more lines
REFRESH return.
*BREAK-POINT.
CALL FUNCTION 'SD_SALESDOCUMENT_CREATE'
EXPORTING
  sales_header_in = order_header_in
TABLES
  return = return
  sales_items_in = order_items_in
  sales_items_inx = itemx
  sales_partners = order_partners
  sales_schedules_in = order_schedules_in.
COMMIT WORK.
LOOP AT return.
WRITE: / return-message.
ENDLOOP.