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 %CICS Queue (4) 
4.1 Length
4.1.1! =
4.1.2! profile (5) 
4.1.2 integer
4.1.2 Cont (6) 
4.1 Width
4.1.1! =
4.1.2! profile (7) 
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? )

CICS Queue:

1* ,
1? 
1 QUEUEName
1.1! =
1.2! dsqap_cics_pqname (8) 
1.2 queuename1.2.1 (9) 

1 QUEUEType
1.1! =
1.2! dsqap_cics_pqtype (10) 
1.2 TS
1.2 TD1.2.1 (11) 

1 SUspend
1.1! =
1.2! No
1.2 Yes1.2.1 (12)