FOR i=0, N_ELEMENTS(phone_data) - 1 DO BEGIN $
IF i EQ 0 THEN PRINT, ' DATE TIME DUR INIT' + $
' EXT COST AREA NUMBER ' &$
PRINT, Format='(I6, 1X, I6, 3X, F5.2, 3X, ' + $
'A3, 3X, I3, 2X, F5.2, 3X, I3, 3X, A10)', $
phone_data(i).DATE, phone_data(i).TIME, $
phone_data(i).DUR, phone_data(i).INIT, $
phone_data(i).EXT, phone_data(i).COST, $
phone_data(i).AREA, phone_data(i).NUMBER
DATE | TIME | DUR | INIT | EXT | COST | AREA | NUMBER |
---|---|---|---|---|---|---|---|
901002 | 93200 | 21.40 | TAC | 311 | 5.78 | 215 | 2154934242 |
901002 | 94700 | 1.05 | BWD | 358 | 0.0 | 303 | 2583869 |
901002 | 94700 | 17.44 | EBH | 320 | 4.71 | 214 | 2142319893 |
901002 | 94800 | 16.23 | TDW | 289 | 0.0 | 303 | 2955836 |
901002 | 94800 | 1.31 | RLD | 248 | 0.35 | 617 | 6174941999 |
901003 | 91500 | 2.53 | DLH | 332 | 0.68 | 614 | 6144695553 |
901003 | 91600 | 2.33 | JAT | 000 | 0.0 | 303 | 480344 |
901003 | 91600 | .35 | CCW | 418 | 0.27 | 303 | 7725190 |
901003 | 91600 | 1.53 | SRB | 379 | 0.41 | 212 | 2123056618 |
901003 | 91600 | .45 | MLK | 370 | 0.12 | 212 | 2124157956 |
901004 | 94700 | .80 | JAT | 000 | 0.0 | 303 | 480320 |
901004 | 94900 | 1.93 | SRB | 379 | 0.52 | 818 | 8185012880 |
901004 | 95000 | 3.77 | DJC | 331 | 1.02 | 512 | 5125331228 |
901004 | 95100 | .16 | GWP | 370 | 0.0 | 303 | 4441245 |
901004 | 95300 | 1.36 | JAT | 000 | 0.0 | 303 | 480320 |