10.5.9.4. 사용예제 1 – 문자열 통신

원격 PC로 작업파일 전송을 요청하는 문자열 메시지를 보내고, 그 결과를 문자열 메시지로 수신 받는 작업 프로그램입니다.

_TEINPUT=0 'INPUT 종료문자

_KEINPUT=1 '종료문자 이후 수신데이터 보존

'이더넷 설정 -----------

ENET1.IP="192.168.1.172"

ENET1.LPORT=500

ENET1.RPORT=7000

ENET1.OPEN 1

CLR_RBUF ENET1

'파일전송요청

PRINT ENET1,"LDFILE ";V200%; ‘V200%는 요청할 작업 번호

'결과응답대기

INPUT ENET1,V20$,8,*NO_RESP

ENET1.OPEN 0

'결과해석

V21$=LEFT$(V20$,11)

IF V21$<>"LDFILE RES=" THEN *INV_RES

V21$=MID$(V20$,12,4)

V201%=VAL(V21$) '리턴값

IF V201%<0 THEN *ERR_RES

'sub 로봇작업 호출

CALL V200%

END

'예외 처리 -----------

*NO_RESP

PRINT #0,"LDFILE 요청에 대한 응답이 없습니다."

END

*INV_RES

PRINT #0,"유효하지 않은 LDFILE 응답입니다."

END

*ERR_RES

PRINT #0,"LDFILE 응답 에러코드=";V201%

END