PRINT an object from the database

1 PRInt
2! objecttype (1) 
2?
2 QUERY
2 FORM
2 PROC
2 TABLE
3 objectname
4?  (
4.1* ,
4.1? 
4.1 PRinter
4.1.1! =
4.1.2! profile (2) 
4.1.2 printername
4.1.2 blankstring (3) 
4.1 Length
4.1.1! =
4.1.2! profile (4) 
4.1.2 integer
4.1.2 Cont (5) 
4.1 Width
4.1.1! =
4.1.2! profile (6) 
4.1.2 integer
4.1 PAgeno
4.1.1! =
4.1.2! Yes
4.1.2 No
4.1 Datetime
4.1.1! =
4.1.2! Yes
4.1.2 No
4.1.3? )