//
//  SAP-USER13.VDM                 C.Z. 13.11.2001
//

while(! AT_EoF){
  #14=Cur_Col
  BB(CLEAR)
  BE(CLEAR)
  Block_Mode(COLUMN)
  BB(CP)
  Line(11)
  Goto_Col(#14)
  S("||")
  Char(-1)
  BE(CP)
  Clip_Copy_Block(BB,BE,COLUMN)

  Line(1, NOERR+ERRBREAK)
  Goto_Col(#14)

  Update
  
  #12=Dialog_Input_1(11,"`Action required`, 
  `12 users copied to clipboard`,
  `Please switch to SAP and insert clipboard. Then come back ...`,
  `[&Next]`,`[&Cancel]`",SET+APP+CENTER,0,0)

  if(#12 != 1) { break }

  
}