Un decimale compresso è una stringa di dati , noto anche come dati imballate o di un campo numerico confezionato , che viene utilizzato nel mainframe IBM ed è supportato da Micro Focus COBOL , che gira su Windows o Unix . Un decimale compresso memorizza due cifre decimali in un byte . Anche se il mainframe in grado di eseguire le funzioni aritmetiche sui campi packed - decimali , a volte i campi packed - decimali devono essere convertiti a campi a zone - decimali se si sta utilizzando un ambiente non - COBOL - oriented. Istruzioni 
 1 
 Entra nella mainframe inserendo la tua username e password negli appositi campi di testo 
 2 
 ingresso le seguenti stringhe di codice nel codice : . PACK- 01 DECIMAL - S3V2 - TEXT.05 PACK - DECIMAL - S3V2 pic S9 ( 3) V99 valore COMP - 3 0 . 
 
 01 SLS - S3V2 - TEXT.05 SLS - S3V2 - NUMB pic S9 ( 3) valore di V99 0SIGN LEADING SEPARATO . 
 
 aggiungere PACK - DECIMAL - S3V2 a ZERO dando SLS - S3V2 - NUMB 
 3 
 salvare le modifiche.