컴트란
COMTRAN개발자 | 밥 베머 |
---|---|
첫 등장 | 1957 |
영향을 받은 | |
플로우-매틱 | |
영향받은 | |
코볼 |
COMTRAN(Commercial Translator)은 IBM에서 개발된 초기 프로그래밍 언어다.과학 프로그래밍 언어 FORTRAN(FORMULA TRANslator)에 상당하는 비즈니스 프로그래밍을 목적으로 했다.그것은 COBOL 언어의 선구자 중 한 가지 역할을 했다.밥 베머에 의해 1957년에 개발된 이 언어는 그림 절이라고 알려진 프로그래밍 언어 요소를 처음으로 특징지었다.
COBOL에 대한 기여
COMTRAN의 몇 가지 요소가 COBOL에 통합되었다.
- 그림 절.
- 패러그라핑: 코드를 단락으로 나눈다(줄 바꿈은 중요하지 않음).
- 단락 이름.단락에 이름 할당 및 점프(
GO TO
가 줄 번호가 아닌 단락 이름에 해당된다. AT END
파일 입력 작업에 대한 조항.- 비유상수
HIGH-VALUE
. - 숫자 값 전달(
RETURN-CODE
프로그램이 종료되면 운영 체제로 돌아가십시오.
그림절
그림 절 요소는 마치 사전이 단어를 정의하는 것과 같이 주어진 기준점의 길이를 정의한다.특히 그림 절은 기준점이 문자와 숫자와 형식, 크기 및 데이터 유형을 포함한 데이터의 다른 특성을 포함하는지 여부를 결정한다.
샘플 프로그램
이것은 급여 계산을 하는 COMTRAN의 샘플 프로그램이다.[1]
01001 *절차 01002 호출(직원.숫자) 고용인노, 01003 (접합부) 보세교, 01004 (본디노미네이션) 본데넘, 01005 (본드ACCUMULATION) 본다쿰, 01006 (보험.프리엠) 인스렘, 01007 (은퇴.프리엠) 레트프리미엄, 01008 (부서.총계) DPT. 01009 시작.. 오픈 모두 파일. 01010 얻다.마스터. 얻다 마스터, AT 끝 DO 끝.OF.마스터스. 01011 얻다.상세. 얻다 상세, AT 끝 바둑 토 끝.OF.세부 사항. 01012 비교.직원.숫자. 바둑 토 계산.페이 언제 상세 고용인노 01013 IS 이퀄 토 마스터 고용인노, 낮음.상세 언제 상세 01014 고용인노 IS LES TEN 마스터 고용인노. 01015 높은.상세. 이동'M' 토 마스터 에러코드, 파일 마스터 인 01016 오류.파일. 01017 얻다 마스터, AT 끝 DO 끝.OF.마스터스. 01018 바둑 토 비교.직원.숫자. 02001 낮음.상세. 이동'D' 토 상세 에러코드, 파일 상세 인 02002 오류.파일. 02003 바둑 토 얻다.상세. 02004 끝.OF.마스터스. IF 상세 고용인노 = 높은.가치 그럼 바둑 토 02005 끝.OF.런 그렇지 않으면 세트 마스터 고용인노 = 높은.가치. 02006 끝.OF.세부 사항. IF 미스트레모페르노 = 높은.가치 그럼 바둑 토 02007 끝.OF.런 그렇지 않으면 세트 상세 고용인노 = 높은.가치, 바둑 02008 토 비교.직원.숫자. 02009 끝.OF.런. 이동 해당 그랜드.총계 토 페이 레코드, 파일 02010 페이 레코드, 가까운. 모두 파일. 02011 스톱 1234. 02012 계산.페이. IF 상세 몇시간. IS 보다 큰 TEN 40 그럼 세트 상세 02013 그로스 = (상세 몇시간. - 40) * 마스터 요금 * 1.5. 02014 세트 상세 그로스 = 상세 그로스 + 마스터 요금 * 40, DO 02015 피카.루틴, DO 보류.세금.루틴. 02016 IF 마스터 보세교 IS NOT 이퀄 토 영 그럼 DO 02017 본드.루틴. 02018 DO 검색 for 색인= 1(1)12. 02019 네트. 세트 페이 레코드 넷페이 = 상세 그로스 - 상세 피카 - 상세 02020 WHT -상세 은퇴 - 상세 보험 - 상세 02021 보세교.
참조
- ^ IBM F28-8043 상용 번역기 일반 참조 매뉴얼, 1960년 6월(pdf, 8.2M)의 87페이지의 예를 참조하십시오.
추가 읽기
- IBM의 Early Computers, Charles Bashe, Lyle Johnson, John Palmer, Emerson Pugh, 1986년 MIT Press, ISBN0-262-02225-7.
외부 링크
- 1958년 계보 프로그래머, Y2K 해결
- IBM 상용 번역기 일반 참조 설명서(pdf, 8.2M) 87페이지.