{
    "header": {
        "version": 1,
        "type": "record"
    },
    "body": {
        "record1": {
            "<1>": "declare function dialog_box\r\n\r\nValsToPass = .stat_info->array\r\nValsToPass:= char(245):.thick_read->array\r\nValsToPass:= char(245):.rho_read->array\r\nValsToPass:= char(245):.unit_type->value\r\nOrigVals = ValsToPass\r\nRetVal = dialog_box( 'NCR_CALCULATOR', @window, ValsToPass:char(245):'*CENTER' )\r\nif RetVal <> 'CANCEL' and RetVal <> ValsToPass then\r\n   .stat_info->array = field( RetVal, char(245), 1 )\r\n   .thick_read->array = field( RetVal, char(245), 2 )\r\n   .rho_read->array = field( RetVal, char(245), 3 )\r\n   .unit_type->value = field( RetVal, char(245), 4 )\r\nend\r\nRETURN 0"
        }
    }
}