明けましておめでとうございます。

２０１１年になりました。
今年は記事が書けるように頑張ります。

オープンソースERP Adempiereをインストール

オープンソースのERPがないかＷｅｂで探していたところAdempiereというものを発見。 さっそくインストール
OS:Ubuntu10.04
Adempiere3.6
DB:PostgreSQL
まず、ＤＢ

$sudo apt-get install postgresql
$sudo passwd postgres
新しいUNIXパスワードを入力してください: 
新しいUNIX パスワードを再入力してください: 
passwd: パスワードは正しく更新されました

続いてjava

$ sudo apt-cache search java|grep jre
default-jre - Standard Java or Java compatible Runtime
default-jre-headless - Standard Java or Java compatible Runtime (headless)
gcj-4.4-jre - Java runtime environment using GIJ/classpath
gcj-4.4-jre-headless - Java runtime environment using GIJ/classpath (headless version)
gcj-4.4-jre-lib - Java runtime library for use with gcj (jar files)
gcj-jre - Java runtime environment using GIJ/classpath
gcj-jre-headless - Java runtime environment using GIJ/classpath (headless version)
docbook-jrefentry - DocBook XML JRefEntry DTD
libjrexx-java - automaton based regular expression API for java
openjdk-6-jre - OpenJDK Java runtime, using Hotspot JIT
openjdk-6-jre-headless - OpenJDK Java runtime, using Hotspot JIT (headless)
openjdk-6-jre-lib - OpenJDK Java runtime (architecture independent libraries)

あれ、sunがない。ま、いいか。

$ sudo apt-get install openjdk-6-jre openjdk-6-jdk

本体のダウンロード＆展開

$ wget http://my.vector.co.jp/servlet/System.FileDownload/download/http/0/441673/pack/winnt/business/hanbai/adempiere360_ja_rev001.zip
$ unzip adempiere360_ja_rev001.zip
$ cd adempiere360_ja_rev001
$ unzip Adempiere360.zip -d ../
$ cd ../Adempiere

ここでRUN_setup.shを実行すればいいようだが、GUIになってしまう。
CUIでインストールする場合は「AdempiereEnvTemplate.properties」をリネームして 「AdempiereEnv.properties」で保存して「RUN_silentsetup.sh」を実行すればいいらしい。ここを参考に内容を書き換え

$ sudo ./RUN_silentsetup.sh
 .
 .

とりあえずインストール終了。
続きは別の日

VBAでPDF

だいぶ時間がたってしまったな。
エクセルのVBEを開いて「libharu\if\vb6」のフォルダにある「*.bas」をインポート。標準モジュールを追加して下記コードを貼り付け＆実行する。

Sub test1()
Dim pdf As Long
Dim font As Long
Dim page As Long
Dim fname As String * 256

fname = ThisWorkbook.Path & "\練習.pdf"

pdf = HPDF_New(AddressOf Error_Handler, ByVal vbNullString)

If pdf = 0 Then
Exit Sub
End If

Call HPDF_SetCompressionMode(pdf, HPDF_COMP_ALL)

Call HPDF_SetPageMode(pdf, HPDF_PAGE_MODE_USE_NONE) 'アウトラインやサムネイルを表示しません。

Call HPDF_SetPageLayout(pdf, HPDF_PAGE_LAYOUT_SINGLE) 'シングル表示

'Call HPDF_SetPassword(pdf, "owner", "user")

page = HPDF_AddPage(pdf)

'Call HPDF_Page_SetSize(page, HPDF_PAGE_SIZE_A4, HPDF_PAGE_LANDSCAPE) '横
Call HPDF_Page_SetSize(page, HPDF_PAGE_SIZE_A4, HPDF_PAGE_PORTRAIT) '縦

Call print_grid(pdf, page)

Call HPDF_UseJPEncodings(pdf)
Call HPDF_UseJPFonts(pdf)

'font = HPDF_GetFont(pdf, ByVal "Helvetica", ByVal vbNullString)
font = HPDF_GetFont(pdf, ByVal "MS-Gothic", ByVal "90ms-RKSJ-H")

'Call HPDF_Page_SetTextRenderingMode(page, HPDF_STROKE)
Call HPDF_Page_SetRGBFill(page, 0#, 0#, 1)
Call HPDF_Page_SetFontAndSize(page, font, 24)

Call HPDF_Page_BeginText(page)

Call HPDF_Page_TextOut(page, 10, HPDF_Page_GetHeight(page) - 50, "ハローワールド　hello world")

Call HPDF_Page_EndText(page)

Call HPDF_SaveToFile(pdf, fname)

Call HPDF_Free(pdf)

End Sub

すばらしい！

Haru PDF1

前の投稿の続き。
まず、Haru PDF Libraryのページへ行き、
Downloadsコーナーから
libharu_2_0_8_dll_win32.zip
をダウンロードします。

解凍してできる[libhpdf.dll]をwindowsのシステムフォルダへコピー。

これで準備ＯＫ

PDF

エクセルからＰＤＦ使えたら便利と思いませんか？

PHP、Pythonといった言語ではフリーのライブラリがあるようですね。
調べたところ、Ｃ言語ではありますが、Haru Free PDF libraryで配布されているdllを使うと実現できそうです｡

試してみましょ。