튜토리얼

.NET 개발환경에서 팝빌 SDK를 추가하여 기업정보조회 (BizInfoCheck) 함수를 구현하는 예시입니다.

1. POPBiLL SDK 추가

① 팝빌 연동자료실에서 VB.NET SDK 예제코드 다운로드 후 압축을 해제합니다.

② 다운받은 SDK 예제코드의 Linkhub/, Popbill/ 폴더를 SDK를 적용할 프로젝트 경로에 복사하고. Linkhub.csproj, Popbill.csproj를 각각 기존 프로젝트로 추가합니다.

③ Popbill 프로젝트를 적용할 프로젝트의 참조로 추가합니다.

2. POPBiLL SDK 설정

연동환경 설정값, 기업정보조회 서비스 클래스를 선언하고 Form1_Load() 함수에 서비스 클래스 초기화 코드를 추가합니다.

Public Class Form1
  '링크아이디
  Private Const LinkID As String = "TESTER"

  '비밀키
  Private SecretKey As String = "SwWxqU+0TErBXy/9TVjIPEnI0VTUMMSQZtJf3Ed8q3I="

  '기업정보조회 서비스 객체 선언
  Private bizInfoCheckService As BizInfoCheckService

  Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    '기업정보조회 서비스 객체 초기화
    bizInfoCheckService = New BizInfoCheckService(LinkID, SecretKey)

    '연동환경 설정, true-테스트, false-운영(Production), (기본값:false)
    bizInfoCheckService.IsTest = True

    '인증토큰 IP 검증 설정, true-사용, false-미사용, (기본값:true)
    bizInfoCheckService.IPRestrictOnOff = True

    '통신 IP 고정, true-사용, false-미사용, (기본값:false)
    bizInfoCheckService.UseStaticIP = false;

    '로컬시스템 시간 사용여부, true-사용, false-미사용, (기본값:false)
    bizInfoCheckService.UseLocalTimeYN = False

  End Sub
End Class

3. BizInfoCheck 기능 구현

Windows Form에 버튼을 생성하고 버튼의 Click Event 코드에 기업정보조회 (CheckBizInfo) 함수 호출 코드를 추가합니다.

Public Class Form1

    Private Sub btnCheckBizInfo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCheckBizInfo.Click

        Try
            Dim result As BizCheckInfo = bizInfoCheckService.checkBizInfo(txtCorpNum.Text, txtTargetCorpNum.Text)

            Dim tmp As String = ""

            tmp += "corpNum (사업자번호) : " + result.corpNum + vbCrLf
            tmp += "companyRegNum (법인번호): " + result.companyRegNum + vbCrLf
            tmp += "checkDT (확인일시) : " + result.checkDT + vbCrLf
            tmp += "corpName (상호): " + result.corpName + vbCrLf
            tmp += "corpCode (기업형태코드): " + nullToString(result.corpCode) + vbCrLf
            tmp += "corpScaleCode (기업규모코드): " + nullToString(result.corpScaleCode) + vbCrLf
            tmp += "personCorpCode (개인법인코드): " + nullToString(result.personCorpCode) + vbCrLf
            tmp += "headOfficeCode (본점지점코드) : " + nullToString(result.headOfficeCode) + vbCrLf
            tmp += "industryCode (산업코드) : " + result.industryCode + vbCrLf
            tmp += "establishCode (설립구분코드) : " + nullToString(result.establishCode) + vbCrLf
            tmp += "establishDate (설립일자) : " + result.establishDate + vbCrLf
            tmp += "CEOName (대표자명) : " + result.ceoname + vbCrLf
            tmp += "workPlaceCode (사업장구분코드): " + nullToString(result.workPlaceCode) + vbCrLf
            tmp += "addrCode (주소구분코드) : " + nullToString(result.addrCode) + vbCrLf
            tmp += "zipCode (우편번호) : " + result.zipCode + vbCrLf
            tmp += "addr (주소) : " + result.addr + vbCrLf
            tmp += "addrDetail (상세주소) : " + result.addrDetail + vbCrLf
            tmp += "enAddr (영문주소) : " + result.enAddr + vbCrLf
            tmp += "bizClass (업종) : " + result.bizClass + vbCrLf
            tmp += "bizType (업태) : " + result.bizType + vbCrLf
            tmp += "result (결과코드) : " + nullToString(result.result) + vbCrLf
            tmp += "resultMessage (결과메시지) : " + result.resultMessage + vbCrLf
            tmp += "closeDownTaxType (사업자과세유형) : " + nullToString(result.closeDownTaxType) + vbCrLf
            tmp += "closeDownTaxTypeDate (과세유형전환일자):" + result.closeDownTaxTypeDate + vbCrLf
            tmp += "closeDownState (휴폐업상태) : " + nullToString(result.closeDownState) + vbCrLf
            tmp += "closeDownStateDate (휴폐업일자) : " + result.closeDownStateDate

            MsgBox(tmp)

        Catch ex As PopbillException
            MsgBox("code(응답코드) : " + ex.code.ToString + vbCrLf + "message(응답메시지) : " + ex.Message)
        End Try
    End Sub
End Class

4. 결과 확인

함수 호출 반환 결과는 아래와 같습니다.
- 성공 : result(상태코드) 숫자 100 반환
- 실패 : PopbillException 음의 정수 8자리 숫자값 오류코드와 오류메시지 반환 [오류코드]