fc-magnetite: src/aci2/bmi/mmiAoc.c annotate

annotate src/aci2/bmi/mmiAoc.c @ 662:8cd8fd15a095

SIM speed enhancement re-enabled and made configurable TI's original code supported SIM speed enhancement, but Openmoko had it disabled, and OM's disabling of speed enhancement somehow caused certain SIM cards to start working which didn't work before (OM's bug #666). Because our FC community is much smaller in year 2020 than OM's community was in their day, we are not able to find one of those #666-affected SIMs, thus the real issue they had encountered remains elusive. Thus our solution is to re-enable SIM speed enhancement and simply wait for if and when someone runs into a #666-affected SIM once again. We provide a SIM_allow_speed_enhancement global variable that allows SIM speed enhancement to be enabled or disabled per session, and an /etc/SIM_spenh file in FFS that allows it to enabled or disabled on a non-volatile basis. SIM speed enhancement is now enabled by default.

author	Mychaela Falconia <falcon@freecalypso.org>
date	Sun, 24 May 2020 05:02:28 +0000
parents	3c2acfa1a72f
children

rev	line source
3 93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	3 CONDAT (UK)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	5 ********************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 This software product is the property of Condat (UK) Ltd and may not be
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	8 disclosed to any third party without the express permission of the owner.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	9
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10 ********************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	12 $Project name: Basic MMI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	13 $Project code: BMI (6349)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	14 $Module: Advice of Charge
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	15 $File: MmiVoiceMemo.c
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	16 $Revision: 1.0
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	17
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	18 $Author: Condat(UK)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	19 $Date: 09/04/01
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	20
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21 ********************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	22
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23 Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25 This provides the start code for the MMI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	27 ********************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28 $History: MmiAoc.c
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30 June 16, 2005 REF: CRR 31267 x0021334
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	31 Description: Handset ignore the initializtion of the PIN1/PIN2
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32 Fix: Cheking is done to ascertain if PIN1/PIN2 are initialised. If not, appropriate
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33 message is displayed to the user.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	34
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35 09/04/01 Original Condat(UK) BMI version.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36 May 25, 2004 REF: CRR MMI-SPR-17588 NISHIKANT KULKARNI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37 Issue description: On the SIM EF(ACMMax) is defined as 0xFFFFFF, so it should be possible to
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38 enter 16777215, but only 999999 is accepted.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	39 Solution: MAX_ENTER_LIMIT changed from 7 to 9. A check is done to verify that the entered
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	40 ACMmax value is less that 0xFFFFFF. Otherwise "Not Allowed" message is displayed.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42 $End
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51 Include files
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55 #define ENTITY_MFW
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 /* includes */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58 #include <string.h>
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59 #include <stdio.h>
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60 #include <stdlib.h>
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 #if defined (NEW_FRAME)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64 #include "typedefs.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65 #include "vsi.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66 #include "pei.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 #include "custom.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68 #include "gsm.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70 #else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72 #include "STDDEFS.H"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73 #include "custom.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74 #include "gsm.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 #include "vsi.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 #endif
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78 #include "mfw_sys.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80 #include "cus_aci.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82 #include "mfw_mfw.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 #include "mfw_win.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84 #include "mfw_kbd.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 /* SPR#1428 - SH - New Editor changes */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 #ifndef NEW_EDITOR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 #include "mfw_edt.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88 #endif
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89 #include "mfw_lng.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 #include "mfw_tim.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91 #include "mfw_icn.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 #include "mfw_mnu.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 #include "mfw_phb.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 #include "mfw_cm.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 #include "mfw_sim.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 #include "mfw_nm.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97 #include "mfw_sat.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98 #include "mfw_ss.h" /for convert/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99 #include "mfw_phb.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100 #include "ksd.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 #include "psa.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 #include "mfw_sms.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 #include "mfw_cphs.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104 #include "mfw_sat.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106 #include "dspl.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109 #include "MmiMmi.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110 #include "MmiDummy.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 #include "MmiDialogs.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112 /* SPR#1428 - SH - New Editor changes */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 #ifdef NEW_EDITOR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114 #include "ATBCommon.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115 #include "ATBDisplay.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116 #include "ATBEditor.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117 #include "AUIEditor.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 #else /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119 #include "MmiEditor.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120 #endif /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121 #include "MmiLists.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122 #include "MmiIdle.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123 #include "MmiSoftKeys.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124 #include "Mmiicons.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125 #include "MmiMenu.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126 #include "MmiMain.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127 #include "MmiStart.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 #include "MmiPins.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 #include "mmiColours.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 // June 16, 2005 REF: CRR 31267 x0021334
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 // Added this BOOL variable to keep track of PIN2 requests.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134 BOOL pin2Flag = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138 Local Data
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 #define PIN_REQUEST_FOR_RATE 700
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142 #define SERVICES_ENTER_CURRENCY 701
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143 #define SERVICES_ONE_UNIT 702
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 #define SERVICES_RATE_CHANGED 703
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145 #define SERVICES_CREDIT_REMAINING 704
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146 #define PIN_REQUEST_FOR_LIMIT_CHANGE 705
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147 #define PIN_REQUEST_FOR_LIMIT_CANCEL 706
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148 #define SERVICES_LIMIT_VIEW 707
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149 #define SERVICES_LIMIT_CHANGE 708
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150 #define SERVICES_LIMIT_CANCEL 709
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151 #define SERVICES_LIMIT_CHANGED 710
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 #define SERVICES_LAST_CHARGE 711
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153 #define SERVICES_TOTAL_CHARGE 712
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154 #define SERVICES_RESET_CHARGE 713
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155 #define SERVICES_CHARGE_CHANGED 714
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156 #define SERVICES_OUT_OF_RANGE 715
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157 #define SERVICES_AOC_NOT_SUPPORTED 716
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158 #define PIN_REQUEST_FOR_RESET_CHARGE 717
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160 /* May 25, 2004 REF: CRR MMI-SPR-17588 NISHIKANT KULKARNI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161 MAX_ENTER_LIMIT changed from 7 to 9 to accept "Limit" values till 16777215 (0xFFFFFF)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162 Previously, with MAX_ENTER_LIMIT set to 7, maximum 999999 could be entered as limit.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163 Effectively, the limit is MAX_ENTER_LIMIT - 1. The last character used for string termination.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164 Also, the maximum value that can be entered (0xFFFFFF) is # defined to MAX_ENTER_VALUE
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166 /* Max. Enter of Character */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 #define MAX_ENTER_LIMIT 9 // xnkulkar SPR-17588
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168 #define MAX_ENTER_CURRENCY 4
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169 #define MAX_ENTER_UNIT 6
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170 #define MAX_ENTER_VALUE 0xFFFFFF // xnkulkar SPR-17588
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171 /* */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	173
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	174
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175 typedef struct
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	176 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	177 T_MMI_CONTROL mmi_control;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178 T_MFW_HND service_win; /* MFW win handler */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179 T_MFW_CM_AOC_INFO aocInfo;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180 USHORT Identifier;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	181 char edt_Buf[30]; /* Editor buffer */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182 } T_SERVICES;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187 LONG acm_last_call = 0; //accumulated call meter from the last call
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188 //later the value should save and read again from PCM
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	191 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	192 Local prototypes
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	193
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	194 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195 T_MFW_HND service_Init (T_MFW_HND parent_window);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	196 void service_Exit (T_MFW_HND own_window);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197 T_MFW_HND service_create (T_MFW_HND parent_window);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 void service_destroy (T_MFW_HND own_window);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199 static int service_win_cb (T_MFW_EVENT event, T_MFW_WIN * win);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200 void service_dialog_cb (T_MFW_HND win, USHORT identifier, UBYTE reason);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201 void service (T_MFW_HND win, USHORT event, SHORT value, void * parameter);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	202 /* SPR#1428 - SH - New Editor changes */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203 #ifdef NEW_EDITOR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204 void service_loadEditDefault (T_AUI_EDITOR_DATA *editor_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	205 #else /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206 void service_loadEditDefault (T_EDITOR_DATA *editor_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 #endif /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208 void service_calc_balance (T_MFW_HND win,char* line);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209 void service_calculate (T_MFW_HND win, char* line, long value);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210 USHORT service_check_pin_for_aoc (void);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211 //ADDED BY RAVI-29-11-2005
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212 extern T_MFW_HND AUI_calc_Start(T_MFW_HND parent, T_AUI_EDITOR_DATA *editor_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213 // END RAVI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216 Functions
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	217
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	219
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	221
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222 $Function: aoc_credit_remaining
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	224 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	225
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	227
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	228 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	232 int aoc_credit_remaining (MfwMnu* m, MfwMnuItem* i)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	233 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234 T_MFW_HND win = mfw_parent(mfw_header());
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	236 TRACE_FUNCTION("aoc_credit_remaining");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	237
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	238 // create new dynamic dialog for the AOC
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	239 SEND_EVENT (service_Init (win), SERVICES_CREDIT_REMAINING, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242 return 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	245
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	248
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249 $Function: aoc_charge_rate
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251 $Description: A security code editing screen is opened and Pin 2 requested.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252 Once entered successfully, an alpha. editor is opened with the
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253 title "Enter currency".Once entered, an numeric editor is opened
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 with the title "Enter price p. unit". When the user has finished
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255 entry the information screen " Rate changed" is displayed for
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256 3 second and the phone returns to the previous sub-menu
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	257 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	258
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	261 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	264 int aoc_charge_rate (MfwMnu* m, MfwMnuItem* i)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	266 T_MFW_HND win = mfw_parent(mfw_header());
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	267
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268 TRACE_FUNCTION("aoc_charge_rate");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	269
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	270 switch (service_check_pin_for_aoc ())
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	272 case MFW_SIM_PIN2_REQ:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273 // June 16, 2005 REF: CRR 31267 x0021334
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	274 pin2Flag = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	275 // create new dynamic dialog for the AOC
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	276 SEND_EVENT (service_Init (win), PIN_REQUEST_FOR_RATE, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	277 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 case MFW_SIM_PIN_REQ:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280 case MFW_SIM_NO_PIN:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	281 //pin 1 or no pin required, open now the editor for entering the currency
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	282 SEND_EVENT (service_Init (win), SERVICES_ENTER_CURRENCY, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	284
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	285 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287 return 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	288 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	290
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	291
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	293
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	294 $Function: aoc_view_limit
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	295
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	296 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	297
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	298 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	300 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	301
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	303
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	304
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	305 int aoc_view_limit (MfwMnu* m, MfwMnuItem* i)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	307 T_MFW_HND win = mfw_parent(mfw_header());
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	308
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	309 TRACE_FUNCTION("aoc_view_limit");/SPR2500/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	310
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	311
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	312 // create new dynamic dialog for the AOC
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	313 SEND_EVENT (service_Init (win), SERVICES_LIMIT_VIEW, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	314
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	315 return 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	316 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	317
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	318
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	319 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	321 $Function: aoc_change_limit
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	322
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	323 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	324
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	325 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	326
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	327 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	328
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	330
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	331
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	332 int aoc_change_limit (MfwMnu* m, MfwMnuItem* i)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	333 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	334 T_MFW_HND win = mfw_parent(mfw_header());
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	335
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	336 TRACE_FUNCTION("aoc_change_limit");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	337
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	338 /*SPR#1904 - DS - Added call to service_check_pin_for_aoc() to check if
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339 *PIN2 entry is required.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	340 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341 switch (service_check_pin_for_aoc ())
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	342 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	343 case MFW_SIM_PIN2_REQ:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	344 // June 16, 2005 REF: CRR 31267 x0021334
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	345 pin2Flag = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	346 // create new dynamic dialog for the AOC
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	347 SEND_EVENT (service_Init (win), PIN_REQUEST_FOR_LIMIT_CHANGE, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	348 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 case MFW_SIM_PIN_REQ:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	351 case MFW_SIM_NO_PIN:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352 //pin 1 or no pin required, open now the editor for entering the currency
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	353 SEND_EVENT (service_Init (win), SERVICES_LIMIT_CHANGE, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	354 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	357
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358 return 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	359 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	360
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	362 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	363
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364 $Function: aoc_cancel_limit
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	365
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	366 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	370 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	371
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375 int aoc_cancel_limit (MfwMnu* m, MfwMnuItem* i)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377 T_MFW_HND win = mfw_parent(mfw_header());
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	379 TRACE_FUNCTION("aoc_charge_rate");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	380
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381 /*SPR#1904 - DS - Added call to service_check_pin_for_aoc() to check if
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382 *PIN2 entry is required.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	383 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 switch (service_check_pin_for_aoc ())
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386 case MFW_SIM_PIN2_REQ:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387 // June 16, 2005 REF: CRR 31267 x0021334
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388 pin2Flag = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389 // create new dynamic dialog for the AOC
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	390 SEND_EVENT (service_Init (win), PIN_REQUEST_FOR_LIMIT_CANCEL, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	391 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	392
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	393 case MFW_SIM_PIN_REQ:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	394 case MFW_SIM_NO_PIN:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395 //pin 1 or no pin required, open now the editor for entering the currency
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396 SEND_EVENT (service_Init (win), SERVICES_LIMIT_CANCEL, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	398
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	399 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401 return 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	403
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	404 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	405
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406 $Function: aoc_last_charge
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	407
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	408 $Description: Dispays the charge for the last call in the currency or in units
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409 if no currency information has been entered
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	413 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	414
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	415 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	416
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	417
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418 int aoc_last_charge (MfwMnu* m, MfwMnuItem* i)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	419 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	420 T_MFW_HND win = mfw_parent(mfw_header());
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422 TRACE_FUNCTION("aoc_last_charge"); /SPR2500/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	423
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	424 // create new dynamic dialog for the AOC
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	425 SEND_EVENT (service_Init (win), SERVICES_LAST_CHARGE, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	426
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	427
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	428 return 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	429 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	431 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	432
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	433 $Function: aoc_total_charge
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435 $Description: Displays the charge for all calls since the chage counter was last reset
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	436
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	437 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	440
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	441 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	442
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	444 int aoc_total_charge (MfwMnu* m, MfwMnuItem* i)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	445 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	446 T_MFW_HND win = mfw_parent(mfw_header());
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	447
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	448 TRACE_FUNCTION("aoc_total_charge");/SPR2500/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	449
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	450
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	451 // create new dynamic dialog for the AOC
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	452 SEND_EVENT (service_Init (win), SERVICES_TOTAL_CHARGE, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	453
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	454
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	455 return 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	456 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	457 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	458
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459 $Function: aoc_reset_charge
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461 $Description: Resets the charge counter for all calls
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	464
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	465 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	470 int aoc_reset_charge (MfwMnu* m, MfwMnuItem* i)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472 T_MFW_HND win = mfw_parent(mfw_header());
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	474 TRACE_FUNCTION("aoc_reset_charge");/SPR2500/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	476
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 switch (service_check_pin_for_aoc ())
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 case MFW_SIM_PIN2_REQ:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480 // June 16, 2005 REF: CRR 31267 x0021334
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 pin2Flag = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	482 // create new dynamic dialog for the AOC
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	483 SEND_EVENT (service_Init (win), PIN_REQUEST_FOR_RESET_CHARGE, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	484 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	485
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	486 case MFW_SIM_PIN_REQ:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	487 case MFW_SIM_NO_PIN:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	488 //pin 1 or no pin required, open now the editor for entering the currency
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	489 SEND_EVENT (service_Init (win), SERVICES_RESET_CHARGE, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	492 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494 return 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	495 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	496
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	498
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	501
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	502 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	503
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	504 $Function: service_Init
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	505
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	506 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	507
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	508 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	509
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	510 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	511
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	512 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	513 T_MFW_HND service_Init (T_MFW_HND parent_window)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	514 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	515 return (service_create (parent_window));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	516 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	517
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	518
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	519 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	520
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	521 $Function: service_Exit
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	522
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	523 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	524
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	525 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	526
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	527 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	528
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	529 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	530 void service_Exit (T_MFW_HND own_window)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	531 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	532
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	533 T_MFW_WIN * win_data = ((T_MFW_HDR *)own_window)->data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	534 T_SERVICES * data = (T_SERVICES *)win_data->user;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	535
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	536 TRACE_FUNCTION("service_Exit");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	537 /SPR 2500, check valid window pointer before destruction/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	538 if ((own_window) &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	539 (win_data) &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	540 (data) &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	541 (data->service_win))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	542 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	543 service_destroy (data->service_win);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	544 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	545 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	546 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	547 TRACE_ERROR("service_Exit : Invalid Pointer passed");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	548 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	549
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	550 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	551
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	552 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	553
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	554 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	555
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	556 $Function: service_create
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	557
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	558 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	559
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	560 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	561
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	562 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	563
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	564 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	565 T_MFW_HND service_create (T_MFW_HND parent_window)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	566 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	567 T_SERVICES * data = (T_SERVICES *)ALLOC_MEMORY (sizeof (T_SERVICES));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	568 T_MFW_WIN * win;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	569
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	570
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	571 TRACE_FUNCTION ("service_create()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	572
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	573 data->service_win = win_create (parent_window, 0, 0, (T_MFW_CB)service_win_cb);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	574
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	575 if (data->service_win EQ 0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	576 return 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	577
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	578 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	579 * Create window handler
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	580 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	581 data->mmi_control.dialog = (T_DIALOG_FUNC)service;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	582 data->mmi_control.data = data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	583 win = ((T_MFW_HDR *)data->service_win)->data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	584 win->user = (void *) data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	585
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	586
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	587 winShow(data->service_win);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	588 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	589 * return window handle
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	590 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	591 return data->service_win;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	592 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	593
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	594 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	595
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	596 $Function: service_destroy
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	597
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	598 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	599
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	600 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	601
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	602 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	603
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	604 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	605 void service_destroy (T_MFW_HND own_window)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	606 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	607 T_MFW_WIN * win;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	608 T_SERVICES * data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	609
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	610 TRACE_FUNCTION ("service_destroy()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	611
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	612 if (own_window)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	613 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	614 win = ((T_MFW_HDR *)own_window)->data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	615 data = (T_SERVICES *)win->user;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	616
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	617 if (data)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	618 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	619
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	620 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	621 * Delete WIN handler
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	622 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	623 win_delete (data->service_win);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	624 data->service_win = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	625
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	626 FREE_MEMORY ((void *)data, sizeof (T_SERVICES));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	627
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	628 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	629 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	630 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	631 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	632
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	633 $Function: service_win_cb
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	634
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	635 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	636
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	637 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	638
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	639 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	640
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	641 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	642 static int service_win_cb (T_MFW_EVENT event, T_MFW_WIN * win)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	643 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	644 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	645 * Top Window has no output
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	646 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	647 return 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	648 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	649
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	650 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	651
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	652 $Function: service_dialog_cb
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	653
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	654 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	655
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	656 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	657
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	658 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	659
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	660 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	661 void service_dialog_cb(T_MFW_HND win, USHORT identifier, UBYTE reason)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	662 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	663 TRACE_FUNCTION ("service_dialog_cb()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	664
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	665 switch (reason)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	666 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	667 case INFO_KCD_LEFT:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	668 /* no break; */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	669 case INFO_TIMEOUT:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	670 /* no break; */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	671 case INFO_KCD_HUP:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	672 /* no break; */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	673 case INFO_KCD_RIGHT:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	674 /* no break; */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	675 case INFO_KCD_CLEAR:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	676
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	677 TRACE_EVENT_P1("identifier: %d", identifier);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	678
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	679 if (identifier EQ SERVICES_OUT_OF_RANGE)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	680 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	681 TRACE_EVENT ("SERVICES_OUT_OF_RANGE");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	682 SEND_EVENT (win, SERVICES_ONE_UNIT, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	683 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	684 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	685 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	686 TRACE_EVENT (" destroy ");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	687 service_Exit(win);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	688 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	689 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	690 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	691 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	692
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	693 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	694
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	695 $Function: service_editor_cb
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	696
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	697 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	698
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	699 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	700
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	701 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	702
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	703 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	704
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	705 static void service_editor_cb (T_MFW_HND win, USHORT Identifier, SHORT reason)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	706 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	707 T_MFW_WIN * win_data = ((T_MFW_HDR *) win)->data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	708 T_SERVICES * data = (T_SERVICES *)win_data->user;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	709
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	710
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	711 UBYTE PWD[16], i;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	712 int result;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	713
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	714 TRACE_FUNCTION ("service_editor_cb()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	715 /SPR 2500, check pointers valid/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	716 if ((!win) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	717 (!win_data) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	718 (!data))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	719 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	720 TRACE_ERROR("service_editor_cb : Invalid Pointer passed");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	721 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	722 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	723
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	724 if ((!win) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	725 (!win_data) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	726 (!data))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	727 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	728 TRACE_ERROR("service_editor_cb : Invalid Pointer passed");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	729 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	730 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	731
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	732 memset(PWD, 0x00, 16);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	733
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	734 switch (reason)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	735 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	736 case INFO_KCD_LEFT:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	737 switch (Identifier)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	738 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	739 case SERVICES_ENTER_CURRENCY:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	740 TRACE_EVENT ("SERVICES_ENTER_CURRENCY");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	741 TRACE_EVENT ("pressed left");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	742
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	743
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	744 // clear old current currency before overwrite it
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	745 memset(data->aocInfo.cur, 0x80, sizeof(data->aocInfo.cur));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	746
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	747 if(strlen(data->edt_Buf) NEQ 0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	748 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	749 memcpy(data->aocInfo.cur, data->edt_Buf, MAX_ENTER_CURRENCY);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	750 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	751
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	752 //termination from ASCII to GSM default
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	753 for (i=0; i< MAX_ENTER_CURRENCY-1; i++)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	754 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	755 if (data->aocInfo.cur[i] EQ '\0')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	756 data->aocInfo.cur[i] = 0x80;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	757 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	758
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	759
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	760 // open the next editor for entering the price per unit
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	761 SEND_EVENT (win, SERVICES_ONE_UNIT, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	762 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	763
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	764 case SERVICES_ONE_UNIT:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	765 TRACE_EVENT ("SERVICES_ONE_UNIT");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	766 TRACE_EVENT ("pressed left");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	767
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	768 // clear old current ppu before overwrite it
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	769 memset(data->aocInfo.ppu, '\0', sizeof(data->aocInfo.ppu));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	770
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	771 if(strlen(data->edt_Buf) NEQ 0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	772 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	773 memcpy(data->aocInfo.ppu, data->edt_Buf, strlen(data->edt_Buf));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	774 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	775
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	776
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	777 // Password not necessary, Pin2 scenario done
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	778 memset(PWD, 0x00, 16);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	779
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	780 // write cur and ppu in AOC
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	781 result = cm_set_aoc_value(CM_AOC_PUCT, &data->aocInfo, PWD);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	782
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	783
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	784 TRACE_EVENT_P1("PPU : %s", data->aocInfo.ppu);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	785 TRACE_EVENT_P1("CUR : %s", data->aocInfo.cur);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	786 TRACE_EVENT_P1("result : %d", result);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	787
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	788 if(result EQ CM_OK)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	789 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	790 SEND_EVENT (win, SERVICES_RATE_CHANGED, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	791 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	792 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	793 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	794 SEND_EVENT (win, SERVICES_OUT_OF_RANGE, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	795 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	796
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	797 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	798
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	799 case SERVICES_LIMIT_CHANGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	800
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	801 // string => long
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	802 data->aocInfo.acm_max = atol(data->edt_Buf);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	803
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	804 // Password not necessary, Pin2 scenario done
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	805 memset(PWD, 0x00, 16);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	806
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	807 // May 25, 2004 REF: CRR MMI-SPR-17588 NISHIKANT KULKARNI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	808
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	809 // If the ACMmax value entered by the user is more than 16777215 (0xFFFFFF),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	810 // display a "Not Allowed" message.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	811 if(data->aocInfo.acm_max > MAX_ENTER_VALUE)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	812 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	813 // Send event to display a "Not Allowed" message.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	814 SEND_EVENT (win, SERVICES_AOC_NOT_SUPPORTED, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	815 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	816
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	817 // Else set the ACMmax value in AoC.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	818 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	819 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	820 result = cm_set_aoc_value(CM_AOC_ACMMAX, &data->aocInfo, PWD); /* save ACMmax in AOC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	821
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	822 TRACE_EVENT_P1("%ld", data->aocInfo.acm_max);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	823 TRACE_EVENT_P1("result of set aoc %d", result);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	824
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	825 // Send event to display a "Limit Changed" message.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	826 SEND_EVENT (win, SERVICES_LIMIT_CHANGED, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	827 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	828
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	829 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	830 case SERVICES_RESET_CHARGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	831 /* MC 12/04/02: Changed ACMMAX to ACM (should fix "broken" SIM problem)*/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	832
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	833 result = cm_set_aoc_value(CM_AOC_ACM, &data->aocInfo, PWD); /* save ACMmax in AOC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	834
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	835 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	836 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	837
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	838 case INFO_KCD_RIGHT:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	839 case INFO_KCD_CLEAR:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	840
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	841 TRACE_EVENT ("INFO_KCD_RIGHT pressed");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	842
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	843 switch (Identifier)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	844 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	845
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	846 case SERVICES_LIMIT_CHANGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	847 case SERVICES_ENTER_CURRENCY:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	848
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	849 //go back to the previous screen
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	850 service_Exit (win);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	851 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	852 case SERVICES_ONE_UNIT:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	853
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	854 //go back to the previous screen
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	855 SEND_EVENT (win, SERVICES_ENTER_CURRENCY, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	856 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	857
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	858
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	859 default:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	860 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	861 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	862 default:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	863 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	864 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	865 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	866
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	867
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	868 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	869
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	870 $Function: createAOCDialog
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	871
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	872 $Description: Creates a dialog from 4 input parameters
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	873
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	874 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	875
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	876 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	877
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	878 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	879 static void createAOCDialog( T_MFW_HND win, USHORT txtId1, USHORT txtId2, char *str2, USHORT event )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	880 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	881 T_DISPLAY_DATA display_info;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	882
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	883 dlg_initDisplayData_TextId( &display_info, TxtNull, TxtNull, txtId1, txtId2, COLOUR_AOC);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	884 dlg_initDisplayData_events( &display_info, (T_VOID_FUNC)service_dialog_cb, THREE_SECS, KEY_CLEAR \| KEY_RIGHT \| KEY_LEFT );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	885 display_info.Identifier = event;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	886 display_info.TextString2 = str2;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	887 info_dialog (win, &display_info);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	888 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	889 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	890
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	891 $Function: service
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	892
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	893 $Description:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	894
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	895 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	896
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	897 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	898
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	899 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	900 void service (T_MFW_HND win, USHORT event, SHORT value, void * parameter)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	901 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	902 T_MFW_WIN * win_data = ((T_MFW_HDR *) win)->data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	903 T_SERVICES * data = (T_SERVICES *)win_data->user;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	904
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	905 /* CQ13428 - NDH - Use dynamically allocated memory to prevent MMI Stack Overflow */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	906 #ifdef NEW_EDITOR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	907 /* SPR#1428 - SH - New Editor data */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	908 T_AUI_EDITOR_DATA editor_data = (T_AUI_EDITOR_DATA )ALLOC_MEMORY (sizeof (T_AUI_EDITOR_DATA));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	909 #else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	910 T_EDITOR_DATA editor_data = (T_EDITOR_DATA )ALLOC_MEMORY (sizeof (T_EDITOR_DATA));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	911 #endif
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	912 // T_MFW_SIM_PIN_STATUS status; // RAVI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	913
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	914 UBYTE i, result;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	915 UBYTE PWD[16];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	916 static char line[MAX_LINE];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	917
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	918 TRACE_FUNCTION("service()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	919
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	920 if (!editor_data)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	921 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	922 TRACE_ERROR("service : Failed to allocate memory for the Editor Data");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	923 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	924 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	925 if ((!win) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	926 (!win_data) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	927 (!data))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	928 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	929 TRACE_ERROR("service : Invalid Pointer passed");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	930 /* CQ13428 - NDH - Use dynamically allocated memory to prevent MMI Stack Overflow */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	931 #ifdef NEW_EDITOR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	932 FREE_MEMORY((void *)editor_data, sizeof (T_AUI_EDITOR_DATA));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	933 #else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	934 FREE_MEMORY((void *)editor_data, sizeof (T_EDITOR_DATA));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	935 #endif
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	936 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	937 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	938
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	939 memset(PWD, 0x00, 16);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	940 switch (event)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	941 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	942
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	943 case SERVICES_CREDIT_REMAINING:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	944
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	945 memset(line,'\0',sizeof(line));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	946
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	947 //Get the ACM MAX
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	948 cm_get_aoc_value(CM_AOC_ACMMAX,&data->aocInfo);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	949
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	950 //Get ACM
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	951 cm_get_aoc_value(CM_AOC_ACM,&data->aocInfo);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	952
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	953 //Get currency and price per unit
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	954 cm_get_aoc_value(CM_AOC_PUCT,&data->aocInfo);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	955
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	956
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	957 TRACE_EVENT_P1("ACMMAX: %ld", data->aocInfo.acm_max);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	958 TRACE_EVENT_P1("ACM: %ld", data->aocInfo.acm);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	959 TRACE_EVENT_P1("PPU:%s", data->aocInfo.ppu);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	960 TRACE_EVENT_P1("CUR:%s", data->aocInfo.cur);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	961
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	962
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	963 if ((data->aocInfo.acm_max NEQ '\0') && (data->aocInfo.acm NEQ '\0'))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	964 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	965 /* special case: It is not possible to have ACM > ACMMAX */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	966 /* this case the mobile has to disconnect */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	967 if(data->aocInfo.acm > data->aocInfo.acm_max)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	968 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	969 strcpy(line, "????");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	970 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	971 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	972 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	973 /* calculate the credit with ACMAX and PPU */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	974 TRACE_EVENT ("CREDIT :ACMMAX !=0 and PPU !=0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	975 service_calc_balance (win,(char*)line);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	976
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	977 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	978 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	979 if ((data->aocInfo.acm_max EQ '\0') && (data->aocInfo.acm NEQ '\0'))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	980 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	981 /* calculate the cost with ACM and PPU */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	982 TRACE_EVENT ("CREDIT :ACMMAX ==0 and PPU !=0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	983 service_calculate (win, (char*)line, data->aocInfo.acm);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	984
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	985 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	986 if ((data->aocInfo.acm_max EQ '\0') && (data->aocInfo.acm NEQ '\0') )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	987 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	988 /* show only ACM */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	989 TRACE_EVENT ("CREDIT :ACMMAX ==0 and PPU ==0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	990 sprintf(line, "%ld", data->aocInfo.acm); /* */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	991 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	992 if ((data->aocInfo.acm_max NEQ '\0') && (data->aocInfo.acm NEQ '\0'))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	993 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	994 /* show only ACMAX */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	995 TRACE_EVENT ("CREDIT :ACMMAX !=0 and PPU ==0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	996 sprintf(line, "%ld", data->aocInfo.acm_max - data->aocInfo.acm); /* */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	997 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	998
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	999 if (data->aocInfo.acm EQ '\0')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1000 strcpy ((char *)line, "0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1001
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1002 //from ASCII to GSM default
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1003 for (i=0; i< MAX_LINE; i++)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1004 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1005 if (line[i] EQ 0x80 OR line[i] EQ 0xFF )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1006 line[i] = '\0';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1007 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1008
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1009
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1010 if (data->aocInfo.acm_max EQ 0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1011 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1012 createAOCDialog( win, TxtCost, TxtNull, line, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1013 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1014 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1015 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1016 createAOCDialog( win, TxtBalance, TxtNull, line, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1017 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1018 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1019
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1020
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1021
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1022
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1023 case PIN_REQUEST_FOR_RATE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1024 //save the status
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1025 data->Identifier = SERVICES_ENTER_CURRENCY;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1026
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1027 //PIN2 is requested to change the Rate
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1028 pin2_check (data->service_win);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1029
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1030 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1031
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1032 case PIN_REQUEST_FOR_LIMIT_CHANGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1033
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1034 //PIN2 is requested to change the Rate
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1035 pin2_check (data->service_win);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1036
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1037 //save the status
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1038 data->Identifier = SERVICES_LIMIT_CHANGE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1039 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1040
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1041 case PIN_REQUEST_FOR_LIMIT_CANCEL:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1042
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1043 //PIN2 is requested to change the Rate
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1044 pin2_check (data->service_win);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1045
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1046 //save the status
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1047 data->Identifier = SERVICES_LIMIT_CANCEL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1048 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1049
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1050 case PIN_REQUEST_FOR_RESET_CHARGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1051 //save the status
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1052 data->Identifier = SERVICES_RESET_CHARGE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1053
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1054 //PIN2 is requested to change the Rate
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1055 pin2_check (data->service_win);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1056
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1057 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1058
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1059
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1060 //it calls from MMI PINS
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1061 case PIN2_OK:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1062 TRACE_EVENT("PIN2_OK");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1063
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1064 switch (data->Identifier)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1065 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1066 case SERVICES_ENTER_CURRENCY:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1067
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1068 //pin was ok, open now the editor for entering the currency
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1069 SEND_EVENT (win, data->Identifier, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1070 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1071 case SERVICES_LIMIT_CHANGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1072
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1073 //pin was ok, open now the editor for entering the currency
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1074 SEND_EVENT (win, data->Identifier, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1075 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1076 case SERVICES_LIMIT_CANCEL:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1077
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1078 //pin was ok, open now the editor for entering the currency
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1079 SEND_EVENT (win, data->Identifier, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1080 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1081 case SERVICES_RESET_CHARGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1082
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1083 //pin was ok, open now the editor for entering the currency
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1084 SEND_EVENT (win, data->Identifier, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1085 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1086
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1087
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1088
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1089 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1090 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1091
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1092 case PIN2_ABORT:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1093 createAOCDialog( win, TxtFailed, TxtNull, line, event );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1094 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1095
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1096 case SERVICES_ENTER_CURRENCY:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1097
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1098
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1099 //save the status
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1100 data->Identifier = SERVICES_ENTER_CURRENCY;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1101
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1102
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1103 //PUCT (currency and price per unit) is requested
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1104 result = cm_get_aoc_value(CM_AOC_PUCT, &data->aocInfo);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1105
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1106 TRACE_EVENT_P1("result %d", result);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1107
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1108 //fill up editor-sttribut with default
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1109 service_loadEditDefault (editor_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1110
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1111 //clear the editor-buffer
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1112 memset(data->edt_Buf,'\0',sizeof(data->edt_Buf));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1113
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1114 // let to show the current currency, before the user change it */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1115 memcpy(data->edt_Buf, data->aocInfo.cur, MAX_ENTER_CURRENCY);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1116
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1117
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1118 for (i=0; i< MAX_ENTER_CURRENCY-1; i++)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1119 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1120 if (data->edt_Buf[i] EQ 0x80 OR data->edt_Buf[i] EQ 0xFF )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1121 data->edt_Buf[i] = '\0';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1122 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1123
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1124 /* SPR#1428 - SH - New Editor changes */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1125
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1126 #ifdef NEW_EDITOR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1127 AUI_edit_SetBuffer(editor_data, ATB_DCS_ASCII, (UBYTE *)data->edt_Buf, MAX_ENTER_CURRENCY);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1128 AUI_edit_SetTextStr(editor_data, TxtSoftOK, TxtDelete, TxtEnterCurrency, NULL);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1129 AUI_edit_SetEvents(editor_data, data->Identifier, TRUE, FOREVER, (T_AUI_EDIT_CB)service_editor_cb);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1130 AUI_edit_SetMode(editor_data, ED_MODE_ALPHA, ED_CURSOR_BAR);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1131
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1132 AUI_edit_Start(data->service_win, editor_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1133 #else /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1134 editor_data->editor_attr.text = data->edt_Buf; /* buffer to be edited */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1135 editor_data->editor_attr.size = MAX_ENTER_CURRENCY;/* limit to 3 letters */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1136 editor_data->LeftSoftKey = TxtSoftOK;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1137 editor_data->RightSoftKey = TxtDelete;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1138 editor_data->TextId = TxtEnterCurrency;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1139 editor_data->Identifier = data->Identifier;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1140 editor_data->mode = ALPHA_MODE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1141 editor_data->AlternateLeftSoftKey = TxtNull;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1142 editor_data->min_enter = 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1143
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1144 /* create the dialog handler */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1145 editor_start(data->service_win, editor_data); /* start the editor */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1146 #endif /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1147 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1148
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1149
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1150
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1151 case SERVICES_ONE_UNIT:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1152
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1153 //save the status
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1154 data->Identifier = SERVICES_ONE_UNIT;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1155
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1156 //fill up editor-sttribut with default
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1157 service_loadEditDefault (editor_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1158
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1159 //clear the editor-buffer
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1160 memset(data->edt_Buf,'\0',sizeof(data->edt_Buf));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1161
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1162 /* let to show the current price per unit, before the user change it */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1163 memcpy(data->edt_Buf, data->aocInfo.ppu, sizeof(data->aocInfo.ppu));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1164
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1165 for (i=0; i< MAX_ENTER_UNIT-1; i++)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1166 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1167 if (data->edt_Buf[i] EQ 0x80 OR data->edt_Buf[i] EQ 0xFF )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1168 data->edt_Buf[i] = '\0';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1169 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1170
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1171 /* SPR#1428 - SH - New Editor changes */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1172 #ifdef NEW_EDITOR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1173 AUI_edit_SetBuffer(editor_data, ATB_DCS_ASCII, (UBYTE *)data->edt_Buf, MAX_ENTER_UNIT);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1174 AUI_edit_SetTextStr(editor_data, TxtSoftOK, TxtDelete, Txt1Unit, NULL);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1175 AUI_edit_SetEvents(editor_data, data->Identifier, TRUE, FOREVER, (T_AUI_EDIT_CB)service_editor_cb);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1176 AUI_edit_SetMode(editor_data, 0, ED_CURSOR_BAR);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1177
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1178 AUI_calc_Start(data->service_win, editor_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1179 #else /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1180 editor_data->editor_attr.text = data->edt_Buf; /* buffer to be edited */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1181 editor_data->editor_attr.size = MAX_ENTER_UNIT;/* limit to 5 numerics */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1182 editor_data->LeftSoftKey = TxtSoftOK;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1183 editor_data->RightSoftKey = TxtDelete;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1184 editor_data->TextId = Txt1Unit;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1185 editor_data->Identifier = data->Identifier;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1186 editor_data->mode = CALC_MODE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1187 editor_data->AlternateLeftSoftKey = TxtNull;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1188 editor_data->min_enter = 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1189
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1190 /* create the dialog handler */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1191 editor_start(data->service_win, editor_data); /* start the editor */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1192 #endif /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1193 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1194
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1195
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1196 case SERVICES_RATE_CHANGED:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1197 createAOCDialog( win, TxtRate, TxtChanged, NULL, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1198 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1199
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1200 case SERVICES_LIMIT_VIEW:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1201
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1202 memset(line,'\0',sizeof(line));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1203
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1204 cm_get_aoc_value(CM_AOC_ACMMAX,&data->aocInfo); /* Get the ACM MAX */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1205 cm_get_aoc_value(CM_AOC_PUCT,&data->aocInfo); /* Get currency and price per unit */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1206
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1207 TRACE_EVENT_P1("ACMMAX: %ld", data->aocInfo.acm_max);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1208 TRACE_EVENT_P1("ACM: %ld", data->aocInfo.acm);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1209 TRACE_EVENT_P1("PPU:%s", data->aocInfo.ppu);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1210 TRACE_EVENT_P1("CUR:%s", data->aocInfo.cur);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1211
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1212 if((strlen((char*)data->aocInfo.ppu) EQ 0) && data->aocInfo.acm_max NEQ '\0')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1213 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1214 sprintf(line, "%ld", data->aocInfo.acm_max); /* Show only ACMmax */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1215 TRACE_EVENT ("get only :ACMMAX ; PPU ==0 and ACMMAX!=0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1216 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1217 if((strlen((char*)data->aocInfo.ppu) NEQ 0) && data->aocInfo.acm_max NEQ '\0')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1218 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1219 service_calculate (win, (char*)line, data->aocInfo.acm_max);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1220
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1221 TRACE_EVENT ("calculate ACMMAX * PPU; PPU !=0 and ACMMAX!=0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1222 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1223
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1224 for (i=0; i< MAX_LINE; i++)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1225 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1226 if (line[i] EQ 0x80 OR line[i] EQ 0xFF )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1227 line[i] = '\0';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1228 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1229
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1230 if(data->aocInfo.acm_max NEQ '\0')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1231 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1232 createAOCDialog( win, TxtLimitEq, TxtNull, line, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1233 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1234 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1235 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1236 createAOCDialog( win, TxtNo, TxtLimit, NULL, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1237 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1238
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1239 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1240 * Call Info Screen
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1241 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1242
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1243 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1244
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1245 case SERVICES_LIMIT_CHANGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1246
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1247 //fill up editor-sttribut with default
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1248 service_loadEditDefault (editor_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1249
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1250 //clear the editor-buffer
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1251 memset(data->edt_Buf,'\0',sizeof(data->edt_Buf));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1252
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1253 data->Identifier = SERVICES_LIMIT_CHANGE; /SPR 2500/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1254
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1255
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1256 data->Identifier = SERVICES_LIMIT_CHANGE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1257
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1258 /* SPR#1428 - SH - New Editor changes */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1259 #ifdef NEW_EDITOR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1260
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1261 AUI_edit_SetBuffer(editor_data, ATB_DCS_ASCII, (UBYTE *)data->edt_Buf, MAX_ENTER_LIMIT);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1262 AUI_edit_SetTextStr(editor_data, TxtSoftOK, TxtDelete, TxtEnterLimit, NULL);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1263 AUI_edit_SetEvents(editor_data, data->Identifier, TRUE, FOREVER, (T_AUI_EDIT_CB)service_editor_cb);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1264 AUI_edit_SetMode(editor_data, 0, ED_CURSOR_BAR);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1265
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1266 AUI_calc_Start(data->service_win, editor_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1267 #else /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1268 editor_data->editor_attr.text = data->edt_Buf; /* buffer to be edited */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1269 editor_data->editor_attr.size = MAX_ENTER_LIMIT; /* limit to 6 terms of units */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1270 editor_data->LeftSoftKey = TxtSoftOK;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1271 editor_data->RightSoftKey = TxtDelete;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1272 editor_data->TextId = TxtEnterLimit;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1273 editor_data->Identifier = data->Identifier;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1274 editor_data->mode = CALC_MODE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1275 editor_data->AlternateLeftSoftKey = TxtNull;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1276 editor_data->min_enter = 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1277
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1278 /* create the dialog handler */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1279 editor_start(data->service_win, editor_data); /* start the editor */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1280 #endif /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1281
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1282 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1283 case SERVICES_LIMIT_CANCEL:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1284
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1285 // clear the limit
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1286 data->aocInfo.acm_max = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1287
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1288 // Password not necessary, Pin2 scenario done
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1289 memset(PWD, 0x00, 16);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1290
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1291 cm_set_aoc_value(CM_AOC_ACMMAX, &data->aocInfo, PWD); /* save ACMmax in AOC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1292
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1293 TRACE_EVENT_P1("%ld", data->aocInfo.acm_max);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1294
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1295 SEND_EVENT (win, SERVICES_LIMIT_CHANGED, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1296
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1297 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1298
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1299 case SERVICES_LIMIT_CHANGED:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1300 createAOCDialog( win, TxtLimit, TxtChanged, NULL, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1301
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1302 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1303
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1304 case SERVICES_LAST_CHARGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1305
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1306 cm_get_aoc_value(CM_AOC_PUCT,&data->aocInfo); /* Get currency and price per unit */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1307 cm_get_aoc_value(CM_AOC_PUCT,&data->aocInfo); /* Get currency and price per unit */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1308
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1309 if ( strlen((char*)data->aocInfo.ppu) EQ 0 )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1310 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1311 TRACE_EVENT ("get only :ACM ; PPU ==0 and ACM!=0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1312
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1313 //show only the units ACM from last call
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1314 sprintf(line, "%ld", acm_last_call);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1315
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1316
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1317 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1318 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1319 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1320 TRACE_EVENT ("get only :ACM ; PPU !=0 and ACM!=0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1321
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1322 // add currency
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1323 sprintf(line, "%ld %s", acm_last_call, data->aocInfo.cur);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1324
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1325 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1326
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1327
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1328
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1329 if (acm_last_call EQ '\0')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1330 strcpy ((char *)line, "0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1331
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1332 createAOCDialog( win, TxtLastCharge, TxtNull, line, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1333 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1334
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1335 case SERVICES_TOTAL_CHARGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1336
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1337 memset(line,'\0',sizeof(line));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1338
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1339 cm_get_aoc_value(CM_AOC_ACM,&data->aocInfo); /* Get the ACM */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1340 cm_get_aoc_value(CM_AOC_PUCT,&data->aocInfo); /* Get currency and price per unit */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1341
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1342
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1343 /* nm test only set the default */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1344
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1345 TRACE_EVENT_P1("ACM: %ld", data->aocInfo.acm);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1346 TRACE_EVENT_P1("PPU:%s", data->aocInfo.ppu);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1347 TRACE_EVENT_P1("CUR:%s", data->aocInfo.cur);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1348
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1349
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1350 if((strlen((char*)data->aocInfo.ppu) EQ 0) && data->aocInfo.acm NEQ '\0')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1351 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1352 //show only the units ACM
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1353 sprintf(line, "%ld", data->aocInfo.acm);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1354 TRACE_EVENT ("get only :ACM ; PPU ==0 and ACM!=0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1355
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1356 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1357 if((strlen((char*)data->aocInfo.ppu) NEQ 0) && data->aocInfo.acm NEQ '\0')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1358 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1359
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1360 service_calculate (win, (char*)line, data->aocInfo.acm);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1361
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1362 TRACE_EVENT ("calculate ACM * PPU; PPU !=0 and ACM!=0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1363 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1364
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1365 if (data->aocInfo.acm EQ '\0')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1366 strcpy ((char *)line, "0");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1367
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1368 createAOCDialog( win, TxtTotalCharge, TxtNull, line, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1369
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1370 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1371
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1372 case SERVICES_RESET_CHARGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1373
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1374 // clear the charge counter for all calls
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1375 data->aocInfo.acm = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1376 acm_last_call = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1377
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1378 (void)cm_set_aoc_value(CM_AOC_ACM, &data->aocInfo, PWD); /* save ACM in AOC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1379
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1380 TRACE_EVENT_P1("%ld", data->aocInfo.acm);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1381
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1382 SEND_EVENT (win, SERVICES_CHARGE_CHANGED, 0, 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1383
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1384 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1385
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1386 case SERVICES_CHARGE_CHANGED:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1387 createAOCDialog( win, TxtResetCharge, TxtNull, NULL, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1388 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1389 case SERVICES_OUT_OF_RANGE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1390
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1391 TRACE_EVENT("SERVICES_OUT_OF_RANGE");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1392 createAOCDialog( win, TxtOutofRange, TxtNull, NULL, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1393 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1394
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1395 case SERVICES_AOC_NOT_SUPPORTED:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1396 TRACE_EVENT("SERVICES_NOT_ALLOWED");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1397 createAOCDialog( win, TxtNotAllowed, TxtNull, NULL, event);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1398 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1399
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1400
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1401 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1402
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1403 /* CQ13428 - NDH - Use dynamically allocated memory to prevent MMI Stack Overflow */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1404 #ifdef NEW_EDITOR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1405 FREE_MEMORY((void *)editor_data, sizeof (T_AUI_EDITOR_DATA));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1406 #else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1407 FREE_MEMORY((void *)editor_data, sizeof (T_EDITOR_DATA));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1408 #endif
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1409 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1410 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1411
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1412
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1413 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1414
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1415 $Function: service_loadEditDefault
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1416
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1417 $Description: fill up editor-sttribut with default
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1418
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1419 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1420
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1421 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1422
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1423 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1424 #ifdef NEW_EDITOR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1425 /* SPR#1428 - SH - New Editor changes */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1426 void service_loadEditDefault (T_AUI_EDITOR_DATA *editor_data)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1427 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1428 TRACE_FUNCTION ("service_loadEditDefault()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1429
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1430 AUI_edit_SetDefault(editor_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1431 AUI_edit_SetDisplay(editor_data, ZONE_FULL_SK_TITLE, COLOUR_EDITOR, EDITOR_FONT);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1432 AUI_edit_SetEvents(editor_data, 0, TRUE, FOREVER, (T_AUI_EDIT_CB)service_editor_cb);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1433 AUI_edit_SetTextStr(editor_data, TxtSoftSelect, TxtSoftBack, TxtNull, NULL);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1434 AUI_edit_SetMode(editor_data, 0, ED_CURSOR_UNDERLINE);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1435 AUI_edit_SetAltTextStr(editor_data, 1, TxtNull, FALSE, TxtNull);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1436 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1437 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1438 #else /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1439 void service_loadEditDefault (T_EDITOR_DATA *editor_data)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1440 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1441 TRACE_FUNCTION ("service_loadEditDefault()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1442
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1443 editor_attr_init(&editor_data->editor_attr, ZONE_SMALL_EDITOR, edtCurBar1, NULL, NULL, 0, COLOUR_EDITOR);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1444 editor_data->editor_attr.font = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1445
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1446 editor_data_init( editor_data, (T_EDIT_CB)service_editor_cb, TxtSoftSelect, TxtSoftBack, TxtNull, 1, DIGITS_MODE, FOREVER);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1447 editor_data->hide = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1448 editor_data->destroyEditor = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1449 editor_data->AlternateLeftSoftKey = TxtNull;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1450 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1451 #endif /* NEW_EDITOR */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1452
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1453 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1454
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1455 $Function: service_calc_balance
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1456
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1457 $Description: Calculate the Credit remaining
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1458
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1459 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1460
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1461 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1462
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1463 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1464 void service_calc_balance (T_MFW_HND win,char* line)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1465 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1466 T_MFW_WIN * win_data = ((T_MFW_HDR *) win)->data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1467 T_SERVICES * data = (T_SERVICES *)win_data->user;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1468
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1469
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1470 char line2[MAX_LINE];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1471 char pdest,src,dst,POINT;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1472 LONG result;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1473 int ch = '.';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1474 UBYTE counter=0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1475 if ((!win) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1476 (!win_data) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1477 (!data))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1478 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1479 TRACE_ERROR("service_calc_balance : Invalid Pointer passed");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1480 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1481 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1482
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1483 /SPR 2500, chack validity of pointers before continuing/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1484 if ((!win) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1485 (!win_data) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1486 (!data))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1487 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1488 TRACE_ERROR("service_calc_balance : Invalid Pointer passed");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1489 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1490 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1491
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1492 memset(line2,'\0',sizeof(line2));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1493
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1494 cm_get_aoc_value(CM_AOC_ACMMAX,&data->aocInfo); /* Get the ACM MAX */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1495 cm_get_aoc_value(CM_AOC_ACM,&data->aocInfo); /* Get ACM */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1496 cm_get_aoc_value(CM_AOC_PUCT,&data->aocInfo); /* Get currency and price per unit */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1497
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1498
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1499
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1500 /* Search for '.' */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1501 pdest =(char ) strchr((char) data->aocInfo.ppu, ch );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1502
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1503 if( pdest EQ NULL ) /* '.' not founded */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1504 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1505 result = atol((char)data->aocInfo.ppu ); / STRING => LONG */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1506 result= result (data->aocInfo.acm_max - data->aocInfo.acm); / (ACMmax-ACM) * PPU */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1507 sprintf(line, "%ld %s", result,data->aocInfo.cur); /* LONG => STRING */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1508 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1509 else /* '.' found */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1510 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1511 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1512 * '.' found, *pdest EQ '.'
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1513 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1514 counter = strlen(pdest + 1); /* store the decimal place */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1515
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1516 src = (char*)data->aocInfo.ppu;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1517 dst = line;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1518 do /* remove the '.' */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1519 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1520 if (*src NEQ '.')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1521 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1522 dst++ = src;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1523 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1524 } while (*src++ NEQ '\0');
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1525 /* STRING => LONG */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1526 result= (atol(line))(data->aocInfo.acm_max - data->aocInfo.acm); / (ACMmax - ACM) * PPU */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1527 sprintf(line, "%ld", result); /* LONG => STRING */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1528
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1529 if(strlen(line) < counter)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1530 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1531 src = line;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1532 dst = line2;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1533 *dst++ = '0';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1534 *dst++ = '.';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1535 counter = counter - strlen(line);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1536 do /* fill up with '0' */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1537 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1538 *dst++ = '0';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1539 } while (--counter NEQ 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1540
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1541 memcpy (dst,src,sizeof(src));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1542 sprintf(line, "%s %s", line2,data->aocInfo.cur); /* add the currency */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1543 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1544 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1545 src = line;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1546 dst = line2;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1547 POINT= src + strlen(src) - counter;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1548 do /* set the '.' */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1549 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1550 if (src EQ POINT)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1551 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1552 *dst++ = '.';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1553 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1554 dst++ = src++;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1555
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1556 } while (*src NEQ '\0');
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1557
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1558 if (line2[0] EQ '.')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1559 sprintf(line, "0%s %s", line2,data->aocInfo.cur); /* add the currency */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1560
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1561 if (line2[0] NEQ '.')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1562 sprintf(line, "%s %s", line2,data->aocInfo.cur); /* add the currency */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1563
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1564 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1565 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1566 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1567
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1568
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1569 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1570
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1571 $Function: service_calculate
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1572
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1573 $Description: Calculate the value with price per unit and currency.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1574
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1575 "value * PPU" @ currency
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1576
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1577 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1578
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1579 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1580
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1581 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1582
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1583
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1584 void service_calculate (T_MFW_HND win, char* line, long value)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1585 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1586 T_MFW_WIN * win_data = ((T_MFW_HDR *) win)->data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1587 T_SERVICES * data = (T_SERVICES *)win_data->user;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1588
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1589 char line2[MAX_LINE];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1590 char pdest,src,dst,POINT;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1591 LONG result;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1592 int ch = '.';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1593 UBYTE counter=0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1594
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1595 /SPR2500, check validity of pinters before continuing/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1596 if ((!win) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1597 (!win_data) \|\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1598 (!data))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1599 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1600 TRACE_ERROR("service_calculate : Invalid Pointer passed");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1601 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1602 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1603
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1604 memset(line2,'\0',sizeof(line2));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1605
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1606 cm_get_aoc_value(CM_AOC_ACM,&data->aocInfo); /* Get ACM */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1607 cm_get_aoc_value(CM_AOC_PUCT,&data->aocInfo); /* Get currency and price per unit */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1608
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1609
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1610
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1611
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1612 /* Search for '.' */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1613 pdest =(char ) strchr((char) data->aocInfo.ppu, ch );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1614 if( pdest EQ NULL ) /* '.' not founded */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1615 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1616 result = atol((char)data->aocInfo.ppu ); / STRING => LONG */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1617 result= result * value; /* value * PPU */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1618 sprintf(line, "%ld %s", result,data->aocInfo.cur); /* LONG => STRING */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1619 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1620 else /* '.' found */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1621 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1622 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1623 * '.' found, *pdest EQ '.'
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1624 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1625 counter = strlen(pdest + 1); /* store the decimal place */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1626
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1627 src = (char*)data->aocInfo.ppu;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1628 dst = line;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1629 do /* remove the '.' */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1630 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1631 if (*src NEQ '.')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1632 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1633 dst++ = src;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1634 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1635 } while (*src++ NEQ '\0');
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1636
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1637 /* STRING => LONG */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1638 result= atol(line) * value; /* value * PPU */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1639 sprintf(line, "%ld", result); /* LONG => STRING */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1640
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1641 if(strlen(line) < counter)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1642 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1643 src = line;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1644 dst = line2;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1645 *dst++ = '0';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1646 *dst++ = '.';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1647 counter = counter - strlen(line);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1648 do /* fill up with '0' */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1649 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1650 *dst++ = '0';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1651 } while (--counter NEQ 0);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1652
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1653 memcpy (dst,src,sizeof(src));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1654 sprintf(line, "%s %s", line2,data->aocInfo.cur); /* add the currency */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1655 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1656 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1657 src = line;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1658 dst = line2;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1659 POINT= src + strlen(src) - counter;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1660 do /* set the '.' */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1661 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1662 if (src EQ POINT)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1663 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1664 *dst++ = '.';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1665 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1666 dst++ = src++;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1667
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1668 } while (*src NEQ '\0');
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1669
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1670 if (line2[0] EQ '.')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1671 sprintf(line, "0%s %s", line2,data->aocInfo.cur); /* add the currency */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1672
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1673 if (line2[0] NEQ '.')
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1674 sprintf(line, "%s %s", line2,data->aocInfo.cur); /* add the currency */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1675 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1676 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1677 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1678
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1679 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1680
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1681 $Function: service_check_pin_for_aoc
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1682
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1683 $Description: this function check the PIN 2 requirement & availability of AOC
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1684
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1685 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1686
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1687 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1688
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1689 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1690 USHORT service_check_pin_for_aoc (void)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1691 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1692 T_MFW_AOC_ACCESS access;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1693
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1694 /* check PIN 2 requirement & availability of AOC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1695 sim_configuration (NULL, NULL, NULL, NULL, NULL, &access);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1696
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1697 TRACE_EVENT_P3("acm:%d acmmax:%d,puct:%d", access.access_acm,access.access_acmmax,access.access_puct);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1698
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1699
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1700 if (access.access_acm EQ MFW_SIM_PIN2 &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1701 access.access_acmmax EQ MFW_SIM_PIN2 &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1702 access.access_puct EQ MFW_SIM_PIN2)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1703 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1704 TRACE_EVENT("PIN 2 required");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1705 return MFW_SIM_PIN2_REQ;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1706
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1707 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1708 else if (access.access_acm EQ MFW_SIM_PIN1 &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1709 access.access_acmmax EQ MFW_SIM_PIN1 &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1710 access.access_puct EQ MFW_SIM_PIN1)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1711 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1712 TRACE_EVENT("PIN 1 required");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1713 return MFW_SIM_PIN_REQ;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1714
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1715 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1716 else if (access.access_acm EQ MFW_SIM_NO_PIN &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1717 access.access_acmmax EQ MFW_SIM_NO_PIN &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1718 access.access_puct EQ MFW_SIM_NO_PIN)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1719 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1720 TRACE_EVENT("no any PIN required");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1721 return MFW_SIM_NO_PIN;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1722
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1723 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1724 else if (access.access_acm EQ MFW_SIM_UNKNOWN &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1725 access.access_acmmax EQ MFW_SIM_UNKNOWN &&
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1726 access.access_puct EQ MFW_SIM_UNKNOWN)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1727 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1728 TRACE_EVENT("AOC not supported");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1729 return MFW_SIM_FAILURE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1730 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1731
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1732
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1733 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1734
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1735 /*******************************************************************************
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1736
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1737 $Function: service_check_aoc
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1738
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1739 $Description: If there is no support for AOC on SIM card
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1740 the item "Charge Timers" will not Appear on the menulist
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1741
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1742 $Returns:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1743
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1744 $Arguments:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1745
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1746 *******************************************************************************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1747 USHORT service_check_aoc (struct MfwMnuTag m, struct MfwMnuAttrTag ma, struct MfwMnuItemTag *mi)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1748 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1749 TRACE_FUNCTION("service_check_aoc");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1750
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1751 switch (service_check_pin_for_aoc ())
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1752 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1753 case MFW_SIM_PIN2_REQ:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1754 case MFW_SIM_PIN_REQ:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1755 case MFW_SIM_NO_PIN:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1756 TRACE_EVENT("AOC item visible");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1757 return 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1758 //break; // RAVI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1759
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1760 case MFW_SIM_FAILURE:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1761 TRACE_EVENT("AOC item not visible");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1762 return 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1763 //break; // RAVI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1764 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1765
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1766
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1767 }

FreeCalypso > hg > fc-magnetite

annotate src/aci2/bmi/mmiAoc.c @ 662:8cd8fd15a095