LinuxのLAN内のコンピュータがルータにより
インターネットに繋がっている場合です。
外部ホームページサーバのperlの動く部分に置く
ip.cgi
--------------------------------------------------
#!/usr/local/bin/perl
print "Content-type: text/html\n\n";
$ip=$ENV{'REMOTE_ADDR'};
$ip=~/(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})/;
$err=0;
if($1<0 || $1>255){$err=1;}
if($2<0 || $2>255){$err=1;}
if($3<0 || $3>255){$err=1;}
if($4<=0 || $4>=255){$err=1;}
if($err==0){print $ip;}
else {print "ERR";}
--------------------------------------------------
クライアントは、インターネット接続できればLAN内クライアントでもかまわない。
モジュール「libwww-perl」をインストール
qu.cgi
--------------------------------------------------
#!/usr/bin/perl
use LWP::UserAgent;
$webagent = new LWP::UserAgent;
#ip.cgiを置いた場所
$url="http://www2d.biglobe.ne.jp/~hasegawa/ip/ip.cgi";
$request = new HTTP::Request(GET => $url);
$response = $webagent->request( $request );
if ( $response->is_success ) {
$doc=$response->content;
print "$doc\n";
}
--------------------------------------------------
投稿日時: 2005.06.26 カテゴリ: Linux・Ubuntu・Debian
isoファイルがmountできる
例:
sudo mount -t iso9660 -o loop debian-30r1-i386-binary-1.iso /isocdrom
投稿日時: 2005.06.26 カテゴリ: Linux・Ubuntu・Debian
「diff -r」は双方のディレクトリにある、対応するファイルをアルファベット順にそれぞれ比較する。
例:
diff -r /cdrom /isocdrom > diff.txt
投稿日時: 2005.06.26 カテゴリ: Linux・Ubuntu・Debian
特定ディレクトリ以下のファイルバックアップスクリプト
rsyncを使います
#!/bin/sh
TIME1=`date +%y%m%d`
TIME2=`date -d '8days ago' +%y%m%d`
rsync -auv --delete /moto/ /backup/saki$TIME1/
if [ -r /saki$TIME2/ ]
then
rm -r /backup/saki$TIME2/
fi
投稿日時: 2005.06.26 カテゴリ: Linux・Ubuntu・Debian
Q
請求管理の「手書き修正」とは
A
請求管理の「手書き修正」とは、この画面で診療行為入力に関係なく点数を直し総括表・請求書に含めることができます。
投稿日時: 2005.06.26 カテゴリ: レセプト作成
Q
これまで正しく算定されていた判断料、指導料などが算定されない。別患者では正しく算定されます。
A
同月内の以前の診療で、月1度しか算定できない項目(検査判断料など)をすでに算定していませんか。
投稿日時: 2005.06.26 カテゴリ: 診療行為入力
Q
カルメイクの入力方法がわからない
A
カルメイク1〜3号
→ 副木(形状賦形型(手指・足指用))
カルメイク4〜6号
→ 副木(形状賦形型・上肢用)
投稿日時: 2005.06.26 カテゴリ: 診療行為入力
Q
職員などで、会計を0円、または割引にする患者の登録方法は。
A
下記の通り割引率情報を設定下さい
「91マスタ登録」「101システム管理マスタ」
↓
管理コード「1027割引率情報」
区分コード 01
選択番号 1
有効年月日 00000000〜99999999
↓
定率定額区分「1定率」
割引率 「100」%
↓
登録
管理コード「1026減免理由情報」
区分コード 01
選択番号 1
有効年月日 00000000〜99999999
↓
減免理由「スタッフ」
減免率区分「01 100(%)」
↓
登録
「12登録」で対象患者を選ぶ
下の方の減免理由「01スタッフ」を選び登録すると、請求金額0になります。
投稿日時: 2005.06.26 カテゴリ: 日レセ使い方