LIBDECK 
*NOSEQ
LIBD00
*/
*/        LIBDECK WITH NO UEM OR ESM. 
*/
*CALL COMLBAS 
*CALL COMLFLD 
*CALL COMLSCD 
*WEOR 
LIBD01
*/
*/        LIBDECK WITH ESM. 
*/
*CALL COMLESM 
*CALL COMLFLD 
*CALL COMLSCD 
*WEOR 
LIBD02
*/
*/        LIBDECK WITH UEM. 
*/
*CALL COMLUEM 
*CALL COMLFLD 
*CALL COMLSCD 
