[cvs] jma-receipt/cobol/copy, jma-receipt/cobol/orca23, jma-receipt/record: 診療科・入外区分を判断して初期表示するよう修正

[ota@xxxxxxxxxxxxxxxxxx (ota)]

ota         Thu, 12 Dec 2002 11:20:04 +0900

  Modified files:
    jma-receipt/cobol/copy:
      S02.INC
    jma-receipt/cobol/orca23:
      ORCGS02.CBL
    jma-receipt/record:
      S02.rec
  Log:
    $B?GNE2J!&F~306hJ,$rH=CG$7$F=i4|I=<($9$k$h$&=$@5(B
    $B?GNE2J#9#97oBP1~(B
  
  
  Revision    Changes    Path
  1.3         +1   -1    jma-receipt/cobol/copy/S02.INC
    http://www.orca.med.or.jp/cgi-bin/cvsweb/jma-receipt/cobol/copy/S02.INC?cvsroot=local&r1=1.2&r2=1.3
  1.10        +219 -43   jma-receipt/cobol/orca23/ORCGS02.CBL
    http://www.orca.med.or.jp/cgi-bin/cvsweb/jma-receipt/cobol/orca23/ORCGS02.CBL?cvsroot=local&r1=1.9&r2=1.10
  1.3         +1   -1    jma-receipt/record/S02.rec
    http://www.orca.med.or.jp/cgi-bin/cvsweb/jma-receipt/record/S02.rec?cvsroot=local&r1=1.2&r2=1.3