Filemakerでレセコンと電子カルテを自作しよう

 
オンライン請求をすると,デジタルの"返戻レセプト"をdownloadできます。これを修正して, 当月のレセプトに追加して電子レセプトとして再請求することができます。
(H24 4月以降は診療行為, 薬剤の総回数, 実施日付, その回数を末尾に記載するルールに変わりました。その部分は記載していませんが, 内容はご理解いただけると思います。)
今, 仮に, 2件のレセプトが返戻されたとします(下記)。そして当月のレセプト 総数 1025枚, 総点数 535147 でしたら, 
HI,1,42103,31,1,0215224,,00 (一次請求に混ぜて請求するならこの行消す)
RE,1,1112,42102,○島 ○義, 1,3270930,,,,,,,68966,,,,,31142103910000268,42004,,,,,,(連番 1 は新たに付け直す, その月のレセ最後尾のREが1025なら, 1026とする。)  (年月42004は消して空白にする)
HO,31110281,,06668953,1,273,,,,,,,,, (31110281を修正, 正しくは31110282だった)
SY,2169022,4210221,1,20561066,,01,
SI,11,1,111000110,,,,,,,,,
SI,,1,111012370,,273,1,,,,,,
HR,42103,1,,L5110,保険者番号の不備です。,,,,31142103910000268,,,,(←この行削除)
8,10,0,RE,1,1112,42102,○島 ○義,1,3270930,,,,,,,68966,,,,, 31142103910000268,42004,,,,,,(以下, 8で始まる行は残す)
8,20,0,HO,31110281,,06668953,1,273,,,,,,,,,
8,30,0,SY,2169022,4210221,1,20561066,,01,
8,40,0,SI,11,1,111000110,,,,,,,,,
8,50,0,SI,,1,111012370,,273,1,,,,,,
8,60,0,HR,42103,1,,L5110,保険者番号の不備です。,,,,31142103910000268,,,,
8,70,0,RC,Ver00001797eabb69da600e16235c70efd30437d
RE,2,1116,42102, ○山 福○,2,3500624,,,,,,,58994,,,,,31142103911110381,42004,,,,,, (連番は1027とする)(年月42004は消す)
HO, 5702,米はさき, 667,1,571,,,,,,,,,(修正 , 実際は"米はさみ"だった)
SY,8836770,4210228,1,20491066,,01,
SI,11,1,111000110,,,,,,,,,
SI,,1,111012470,,,,,,,,,
SI,,1,111012370,,323,1,,,,,,
SI,60,1,160057710,,25,1,,,,,,
SI,60,1,160062210,,150,1,,,,,,
SI,60,1,160177770,1,5,1,,,,,,
SI,80,1,120002910,,68,1,,,,,,
HR,42103,1,,L5111, 記号・番号の不備です。,,,,31142103910000381,,,,(←この行削除)
8,10,0,RE,2,1116,42102,○山 福○,2,3500624,,,,,,,58994,,,,, 31142103910000381,42004,,,,,,(以下, 8で始まる行は残す)
8,20,0,HO, 5702,米はさき,667,1,571,,,,,,,,, 
8,30,0,SY,8836770,4210228,1,20491066,,01,
8,40,0,SI,11,1,111000110,,,,,,,,,
8,50,0,SI,,1,111012470,,,,,,,,,
8,60,0,SI,,1,111012370,,323,1,,,,,,
8,70,0,SI,60,1,160057710,,25,1,,,,,,
8,80,0,SI,60,1,160062210,,150,1,,,,,,
8,90,0,SI,60,1,160177770,1,5,1,,,,,,
8,100,0,SI,80,1,120002910,,68,1,,,,,,
8,110,0,HR,42103,1,,L5111,記号・番号の不備です。,,,,31142103910000381,,,,
8,120,0,RC,Ver000013dd442c03a1e20e2419e621aafaf4d85
HG,2,842,99 -> (この行は消す。2枚の返戻を当月レセに追加して, 枚数, 総点数を再計算する, 例えば "GO,1027,535989,99")

電子レセプト_補足    電子_返戻レセプトの再請求