탈수 혹은 식사량이 적거나 식욕부진 환자에서 수액/영양치료시 주입속도를 계산하여 의사가 지시를 내릴 경우
대체로 "분당 몇 방울"을 넣어야 하는지를 지시사항에 기술해야 한다.
환자마다 다양한 경우가 있을 수 있기 때문에 아래 계산식을 활용하면 도움이 된다.
현재 수액 주입세트의 1cc는 20 방울(drops)이다. (과거에는 15 방울이 1cc 였다)
변수는 3가지
1. 주입할 총 수액량
2. 주입해야할 시간
3. 수액세트의 방울수/1cc - 이것은 보통의 수액 주입세트에서는 고정된 변수(20drops/1cc)
미세 수액세트일 경우에 1cc당 방울수가 변하기 때문에 변수로 설정
이를 통해서 주입속도[보통 분당 ~ 방울수(drops)]를 계산한다.
화면 구성
[계산] 버튼 클릭시
local nDrops_min,nDrops_sec
with this.parent
nDrops_min = ( .spinnerVol.value * .spinnerDrops.value ) / (.spinnerHrs.value * 60)
nDrops_sec = round(nDrops_min/60,1)
.text1.value = nDrops_min
.text2.value = nDrops_sec
.label11.caption = allt(str(.spinnerVol.value))+' '
.label12.caption = allt(str(.spinnerHrs.value,5,1))+' '
.label13.caption = allt(str(nDrops_min,5,1))+' '
.label14.caption = allt(str(nDrops_sec,5,1))+' '
.cmdRefresh.click
endwith
데이터 파일구조와 리스트(예)
시간당 주입속도 리스트 계산 - [Refresh] 버튼 클릭시
local i, nDrops_min, nDrops_sec
sele infusion
with this.parent
go top
do while !eof()
replace 주입시간 with 0.5 * recno()
replace 주입량_ml with .spinnerVol.value
nDrops_min = ( 주입량_ml * .spinnerDrops.value ) / ( 주입시간 * 60)
nDrops_sec = nDrops_min/60
replace 주사속도분 with nDrops_min
replace 주사속도초 with nDrops_sec
replace 방울수_cc with .spinnerDrops.value
skip
enddo
locate for 주입시간=.spinnerHrs.value
if eof()
go top
endif
.grid1.refresh
endwith
'의학.건강 > SW 개발자용' 카테고리의 다른 글
명상 진행 프로그램(SW) - 설치, 계획, 진행, 평가 등 (1) | 2024.02.17 |
---|---|
암병기 결정 프로그램(SW) - TNM system (1) | 2024.01.25 |
문항척도 평가도구 점수 계산 (0) | 2023.07.25 |
나의 노트 관리 프로그램(SW) (0) | 2023.06.25 |
(n)년 누적 생존율 계산 (0) | 2023.01.18 |