2
그래서 사용자가 자신의 데이터를 입력하고 .txt 파일로 저장하는 것과 같은 양식 화면을 만들려고합니다. OpenCobolIDE를 사용하고 있으며 현재 화면 정리 과정에서 의 문제를 겪고 있습니다. 나는 콘솔 화면에서 사용자가 자신의 데이터를 입력 할 때 변수의 새 값을 새로 고치는 것과 같은 종류의 형식을 가지고 있지만 화면을 지우면 커서 위치가 다시 설정되기 때문에 커서 위치가 엉망입니다. 콘솔 화면의 시작, 그리고 내가이 과정 후에 표시하고있는 텍스트의 끝으로 가고 싶다. 내 설명은 혼란 보일 수 있지만, 난 당신이 코드 내 포인트를 얻을 희망 :화면을 지우고 cobol의 화면 끝까지 커서 위치를 설정하는 방법
IDENTIFICATION DIVISION.
PROGRAM-ID.PGM001.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-DATA
02 WS-ID PIC X(03) VALUE SPACES.
02 WS-NAME PIC A(15) VALUE SPACES.
02 WS-PHONE PIC X(09) VALUE SPACES.
SCREEN SECTION.
01 CLEAR-SCREEN.
02 BLANK SCREEN.
PROCEDURE DIVISION.
MENU.
DISPLAY "ID........:" WS-ID.
DISPLAY "NAME......:" WS-NAME.
DISPLAY "PHONE.....:" WS-PHONE.
DISPLAY "-----------".
DISPLAY "ID:".
ACCEPT WS-ID FROM CONSOLE.
DISPLAY CLEAR-SCREEN.
DISPLAY "ID........:" WS-ID.
DISPLAY "NAME......:" WS-NAME.
DISPLAY "PHONE.....:" WS-PHONE.
DISPLAY "-----------".
DISPLAY "NAME:".
ACCEPT WS-NAME FROM CONSOLE.
DISPLAY CLEAR-SCREEN.
DISPLAY "ID........:" WS-ID.
DISPLAY "NAME......:" WS-NAME.
DISPLAY "PHONE.....:" WS-PHONE.
DISPLAY "-----------".
DISPLAY "PHONE:".
ACCEPT WS-PHONE FROM CONSOLE.
DISPLAY CLEAR-SCREEN.
DISPLAY "ID........:" WS-ID.
DISPLAY "NAME......:" WS-NAME.
DISPLAY "PHONE.....:" WS-PHONE.
DISPLAY "-----------".
STOP RUN.
END-PROGRAM PGM001.
그래서 당신은 내가 화면을 지우고 양식을 displayin 유지하는 것을 알 수 있습니다하지만 난 그것을처럼 커서가의 시작 부분으로 이동 화면과 나는 데이터를 계속 입력 할 수 없다. 누군가 나를 기쁘게 도와 줄 수 있습니까? 커서를 움직이는 명령이 코볼에 있습니까?
Windows 용 OCIDE의 최신 버전을 사용하고 있다면 이미 GnuCOBOL 1.1을 사용하고있을 것입니다 (기본 설정과 about 대화 상자에서 확인할 수 있습니다). 그렇지 않다면 적어도 GnuCOBOL 1.1 (또는 최근 개발 스냅 샷)으로 업그레이드하는 것이 좋습니다. –