5
3

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?

More than 5 years have passed since last update.

PowerShellAdvent Calendar 2018

Day 10

PowerShellとLibreOffice Drawで請求書作成

Last updated at Posted at 2018-12-26

LibreOffice AdventCalendar 2018 25日目

請求書を作ります。
請求書は業務システムでは最も一般的な帳票です。

一番の難関はページングです。

以下の条件で作ります。

  1. 6行明細の請求書に9行の売上。
  2. 請求書は2枚出力。
  3. 2枚目の最後の行には請求合計を出力

ソースは下記のGitHubにあります。

invoice - GitHub

環境

  • Windows10 Pro
    • PowerShell
  • LibreOffice Draw
    • Flat ODT(fodg)

##作成開始

では作成していきます。

Templateを作成

  1. LibreOffice Drawで下記のようなTemplateを作ります
    • 用紙サイズはA4縦
      -invoice.png
  2. Flat XML ODF 図形描画(.fodg)で保存します

Dataを作成

  1. data.csvを作成
  2. headerは salesno,customer,supplier,item,subtotal
  3. 売上の内容をゴリゴリ書いていきます。

下記な感じになります。

salesno customer supplier item subtotal
1 You Amazon Nintendo Switch1 100
1 You Amazon Nintendo Switch2 200
1 You Amazon Nintendo Switch3 300
1 You Amazon Nintendo Switch4 400
1 You Amazon Nintendo Switch5 500
1 You Amazon Nintendo Switch6 600
1 You Amazon Nintendo Switch7 700
1 You Amazon Nintendo Switch8 800
1 You Amazon Nintendo Switch9 900

帳票作成シェル

makeinvoice.ps1 を作成します。
詳しくはソースを見て下さい。
ざっくりした説明をすると

  1. dataを読込
  2. templateを読込
  3. templateの{salesno}等を該当するデータに書換
  4. 6行目になったら請求書を出力
  5. 以下繰り返し
  6. 最後のあまりを請求書に出力
  7. 最後の請求書に合計を出力

となります。

makeinvoice.ps1
# load data
$data=Import-Csv -Path .\data.csv -Encoding UTF8

# load template
$temp=Get-Content .\invoice.fodg -Encoding UTF8

# cnt row in report
$i=1
# reportrows
$rprow=6
# total row count
$rc=0
# page
$p=0

# total page
$tp=$data.Count/$rprow
$tp=[Math]::Ceiling($tp)

# calcurate total
$sum=$data | Measure-Object 'subtotal' -sum

foreach($d in $data){     

    # merge template
    $temp=$temp -replace '{salesno}',$d.salesno
    $temp=$temp -replace '{customer}',$d.customer
    $temp=$temp -replace '{supplier}',$d.supplier
    $temp=$temp -replace "{item$i}",$d.item
    $temp=$temp -replace "{subtotal$i}",$d.subtotal
    
    # rowcount
    $rc=$rc+1

    # report end write build report
    if($i%$rprow -eq 0){
        # Write-Output "行"$rc
        # Write-Output "data数"$data.Count
        
        # Page Count
        $p=$p+1

        # write total
        if($rc -eq $data.Count){
            $temp=$temp -replace '{total}',$sum.Sum
        }

        # add Page No
        $temp=$temp -replace '{page}',"$p"
        # add Total Page
        $temp=$temp -replace '{total page}',"$tp"
        # delete {}
        $temp=$temp -replace "{(.*)}",""

        # output name 
        $date=Get-Date -Format yyyyMMddhhmmss
        $file="output\"+$date+$p

        # output newfile
        $temp | out-file -FilePath $file'.fodg' -Encoding utf8
        
        $i=$i-$rprow
        
        # load template
        $temp=Get-Content .\invoice.fodg -Encoding UTF8
    }
    
    # report in row
    $i=$i+1    
}

# output remainder data to report
if($data.Count%$rprow -ne 0){
    $p=$p+1
    $file="output\"+$date+$p

    # write total
    $temp=$temp -replace '{total}',$sum.Sum
    $temp=$temp -replace '{page}',"$p"
    $temp=$temp -replace '{total page}',"$tp"
    
    # delete {}
    $temp=$temp -replace "{(.*)}","" 
    
    #output report
    $temp | out-file -FilePath $file'.fodg' -Encoding utf8

}

印刷

print.ps1

下記の動作をしてくれます。

  1. outputに出力された請求書を標準プリンターに印刷
  2. 印刷後削除
print.ps1
# Get report list to print
$outputs=(Get-ChildItem output\*.fodg)

foreach($invoice in $outputs){

    # Print to Default Printer
    Start-Process $invoice -Verb Print | Stop-Process
    # After print and Delete
    Remove-Item $invoice

}

##最後に

夢のDrawで帳票ができてしまいました。

  1. エンドユーザーが帳票を設計できる
  2. OSSで導入が低コスト

結構いけるんじゃないでしょうか?

メリー、クリスマス!

5
3
0

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
5
3

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?