soft coding parameters

 
This is my CLLE program
  PGM                                                       
                                                           
 DCL        VAR(&LIB) TYPE(*CHAR) LEN(10)                  
                                                               
RTVOBJD    OBJ(AXAFILE) OBJTYPE(*FILE) RTNLIB(&LIB)      
                                                              
    ?          MQAXAMC FUNCTION('*START') ??FLIB(&LIB) +      
                 ??INBOUND('QUANTUM.MSGQ.MGR' +               
                 'ADMEM.AXAUS.LF000' 'QIUKVC1.QUANTUM') +     
                 ??OUTBOUND('QUANTUM.MSGQ.MGR' +              
                 'AXAUS.ADMEM.RF000' 'QUANTUM.QIUKVC1') +     
                 SINEX('A1' 'A2' 'A4' 'B1' 'C1' 'D1' +      
                 'F1' 'I1' 'K1' 'K2' 'K3' 'L1' 'M1' 'M3' +    
                 'P1' 'P2' 'S1' ' ' ' ' ' ') PENCE('LA' +     
                 'L1' 'LB' ' ' ' ' ' ' ' ' ' ' ' ' ' ') +     
                 ??JOB(ADMMQLDUS2) ??JOBQ(QBATCHFUT2) +       
                 PRTERRRPT('*YES') ??BATCH(30) +              
                 ??TESTTRN(ADMSTNF1) ??TESTLNK(ADMLNKF2) +    
                 ??RTGDTA('QCMDB')
ENDPGM
 
I'm using a vendor supplied command MQAXAMC which has following parameters.
Function
FLIB
INBOUND :
MQ Manager name
MQ Queue name
MQ channel name
OUTBOUND:
MQ Manager name
MQ Queue name
MQ channel name
SINEX
PENCE
JOBQ
PRTERRPT
BATCH
TESTTRN
TESTLNK
RTGDATA
Due to strict limitation on not to hard code, I'm looking for an alternate solution, may be to store these parameters in a file and use ?.  I normally plan to use the same program with different inbound and outbound queue parameters from time to time by keeping at least rest of the parameters hard coded.
  So at least I like to keep   two parameters(inbound & outbound queues) not hard-coded , if   its not possible to limit all the parameters (that arein in single quotes ) from hard-coded. Any solution or advice is appreciated.
Thanks