select * from EMRINF
where EMRSHTTYP = 'S' and EMROCMDTE= '20240510'
and EMRchtnum = '7601091892624';

select EXERSVMT.* from EXERSVMT
where resno = '7601091892624' and orddat = '20240510';


select * from EMRINF
where emrocmnum = '  80177525';

select * from OICINF
where OICOCMNUM = '  80177525';

select * from ODRINF
where ODROCMNUM = '  80177525';

        DrBit_Emrinf_Select(vOcmnum, 'S', 'C.C', vOrddat, 'Tab1');

        row := DBEMRINF.DBEMRINF_L1(tEmrocmnum,
                                    tEmrshttyp,
                                    tEmrshtcod,
                                    tEmrocmdte
                                    );


select * from EMRINF
where emrocmnum = '  80177525'
AND EMRSHTTYP = 'S';
AND EMRSHTCOD = 'C.C';

select EMRSHTVAL,  EMRINF.* from EMRINF
where emrocmnum = '  80177525'
AND EMRSHTTYP = 'S'
AND EMRSHTCOD = 'C.C'
and EMRSHTVAL > ' ';

---------------------------
운동처방관리
---------------------------
  80177525//S//C.C//20240510
---------------------------
OK   
---------------------------
          Sql.Add('SELECT                                     ');
          Sql.Add('   EMROCMNUM, EMRSHTTYP, EMRSHTCOD, EMRSHTSEQ  ');
          Sql.Add(' , EMRBILYON, EMROCMDTE, EMRCHTNUM, EMRDEPCOD, EMRUPDDTM ');
          Sql.Add('FROM EMRINF                                ');
          Sql.Add('WHERE EMROCMNUM = :EMROCMNUM               ');
          Sql.Add('  AND EMRSHTTYP = :EMRSHTTYP               ');
          Sql.Add('  AND EMRSHTCOD = :EMRSHTCOD               ');
          if IsEmrocmdte <> '' then
              Sql.Add('  AND EMROCMDTE = :EMROCMDTE           ');
          Sql.Add('  AND EMRSHTVAL > '' ''                    ');



select EMROCMDTE,  EMRINF.* from EMRINF
where emrocmnum = '  80177525'
AND EMRSHTTYP = 'S'
AND EMRSHTCOD = 'C.C'
and EMRSHTVAL > ' ';




select EMROCMDTE,  EMRINF.* from EMRINF
--update EMRINF set EMROCMDTE = '20240514'
where emrocmnum = '  80177603'
AND EMRSHTTYP = 'S'
AND EMRSHTCOD = 'C.C'
and EMRSHTVAL > ' '


---------------------------
운동처방관리
---------------------------
  80177603//S//C.C//20240514
---------------------------
OK   
---------------------------