!--------------------------------------------------------------------------------------
!MAP
MODULE('TAPI32.lib')
 TAPIRequestMakeCall(*CSTRING,<*CSTRING>,<*CSTRING>,<*CSTRING>),LONG,RAW,PASCAL
END


!--------------------------------------------------------------------------------------
!DATA
l:Nummer    CSTRING(81)
l:Party     CSTRING(81)
l:Comment   CSTRING(81)
l:Programm  CSTRING(81)


!--------------------------------------------------------------------------------------
!CODE
 l:Nummer  = GLO:TAPIPrefix & clip(pNummer)
 if pName    then l:Party   = clip(pName) end
 if pComment then l:Comment = clip(pComment) end
 l:Ret = tapiRequestMakeCall(l:Nummer,l:Programm,l:Party,l:Comment)