THANK you

PTT = GETPRINTER ()
SET PRINTER TO NAME (PTT)
= MESSAGEBOX (PTT) && FIRST MESSAGE
APRINTERS(PT1 , 1)
= MESSAGEBOX ( PT1 [1])
= MESSAGEBOX ( PT1 [2])
= MESSAGEBOX ( PT1 [3])

The first message is OK
The problem seems not to be with getprinter,
but something wrong with aprinters ()
because aprinters() do not show
the PTT information, but always the same
printer regardless of the printer I select with getprinter()