*********************************************************************************
* 		 MAJ PARAM DE PAIE RUBCHARGE / HEURES SUPP						*
*********************************************************************************
*

OPEN "","RUBCHARGE" TO F.RUBCHARGE ELSE PRINT "RUBCHARGE"


EXECUTE "SET-THOUS ."
EXECUTE "SET-DEC ,"
EXECUTE "DATE.FORMAT"

READ ENR_RUBCHARGE FROM F.RUBCHARGE,'904' ELSE STOP

ENR_RUBCHARGE<1>='REDUC SALARIALE HRES SUPP.'
WRITE ENR_RUBCHARGE ON F.RUBCHARGE,"908"

ENR_RUBCHARGE<1>='DEDUC PATRONALE HRES SUPP.'
WRITE ENR_RUBCHARGE ON F.RUBCHARGE,"909"


