Read data from the bar code buffer.

The BHT stores bar code data from its scans in the bar code buffer. The user application program must first read this data from the buffer before processing it.
The INPUT$ function reads the specified number of bytes from the bar code buffer.

Set fileno to the value specified when opening the bar code device file.

We recommend using the LOC function to check the number of bytes in the bar code buffer before reading bar code data.

  private bardata$[100]           ' declare variable for bar code data
  private barlen%                 ' declare variable for bar code length
  open "bar:" as #1 code "K"
  wait 0,&h03                     ' wait for bar code or key input
  barlen% = loc(#1)
  if barlen% > 0 then             ' check buffer for data
    bardata$ = input$(barlen%, #1)' read bar code data
    print bardata$
  endif
  close #1