Can someone verify if I'm understanding this properly?

I have been frustrated with trying to back up my iPad to iCloud for the past couple of days because, although all of the apps are set to "on" in the "manage storage" area in iCloud, many of my apps are listed with "no data" in the backup. I was concerned at first because I thought this meant those apps showing "no data" weren't getting backed up, but I think what is happening is that those apps just don't have any data associated with them to back up (the apps aren't gone or going to disappear). 
The apps are all in iTunes and until I delete them from iTunes, they will continue to remain on my device (through the sync process) regardless of whether or not they have any data in the icloud backup. I think I was confusing the data associated with the app, which i'm assuming to be favorites, settings, scores, etc, with the actual app itself.
Am I understanding this correctly? So I should not be concerned when I see "no data" listed for an app?
Or if I'm wrong, can someone explain the "no data" thing? (my cloud is nowhere near capacity)
Thanks for your help!

You seem to have a pretty good understanding from what I know about this - or at least you understand it the same way that I do!
You may have no data backed up - either because there is no data (or files) yet to be backed up - or the apps do not work with iCloud yet. For instance - the Apple iWorks apps - Pages, Numbers and Keynote all work with iCloud. You can backup the data and files in those apps and you can access the files in your icloud.com account on a computer via a browser. If you have all of the apps turned on to backup to iCloud - you should have nothing to worry about. You can never lose purchased apps - even if you have to download them again.
You are also correct about the apps - if you delete from the device - but still have them in iTunes - they will sync back when you sync with iTunes again. But if you delete the apps from the device - you will lose all of the data and settings from those apps.

Similar Messages

  • Hi, my Ipod Schuffle (4 gen) dissapears from windows vista right after I execute Itunes, I've change the drive letter, erase temps in App data file, verified USB drivers, etc... Can someone guide on how to solve this?

    Hi, my Ipod Schuffle (4 gen) dissapears from windows vista right after I execute Itunes, I've change the drive letter, erase temps in App data file, verified USB drivers, etc... Can someone guide on how to solve this?

    If you want the shuffle to be always visible in Windows (outside of iTunes), you need to Enable disk use.
    Select the shuffle in the iTunes sidebar, under DEVICES.  Over to the right, select the Summary tab.  You should see a checkbox that says Enable disk use.  Check it and click Apply.
    NOTE:  If disk use is enabled, you have to Eject the shuffle in iTunes, BEFORE you physically disconnect it.  If disk use is NOT enabled, you can disconnect the shuffle at any time, as long as iTunes is not doing something with it at that moment (such as syncing); the shuffle's light will then be blinking (to indicate DO NOT DISCONNECT).
    So, unless you want to use the shuffle like a USB flash drive (carry random files on it), you may want to NOT Enable disk use.

  • Can someone verify the following regarding Find My Phone:  I assume the lost device (iPhone) and the device (ipad) one is using to find the lost item must have the identical Apple ID, Apple PW, and iCloud PW and username? Otherwise it won't work?

    Can someone verify the following regarding Find My Phone:
      I assume the lost device (iPhone) and the device (ipad) one uses to find the lost item must have identical Apple IDs , PWs as well as identical iCloud identification?

    Back now.  Are you saying that you entered you iCloud ID and password in the Find My iPhone app (see photo below), and it said you don't have an iCloud account?  Are you sure this is the ID for your iCloud account (check Settings>iCloud next to Account at the top on the device you are trying to track)?
    Also, did you try using this ID and password on icloud.com on your computer to try to track it, as explained here: http://help.apple.com/icloud/#mmfc0f2442?  Did that work?

  • I have two apple ids and want to merge them.  can someone tell me how to do this

    I have two apple ids and want to merge them.  Can someone tell me how to do this.  What I am trying to do is sync my apps from my computer to my ipad, but can't seem to be able to access one of my apple ids.
    Thank You

    App Store: Downloading Older Versions of Apps
    http://tinyurl.com/meqxplg
    App Store: Install the latest compatible version of an app
    http://support.apple.com/kb/ht5919
    Apple’s iOS App Store now offers ‘last compatible’ versions of apps for older devices
    http://appleinsider.com/articles/13/09/17/apples-ios-app-store-now-offers-last-c ompatible-versions-of-apps-for-older-devices
     Cheers, Tom

  • I'm trying to change my ICloud e-mail to match the one associated with the Apple ID? Can someone tell me how to do this? Seems like the phone won't accept the new one, the message states "you already have acct associated....."  (a given!!)  I need help !!

    I'm trying to change my ICloud e-mail to match the one associated with the Apple ID? Can someone tell me how to do this? Seems like the phone won't accept the new one, the message states "you already have acct associated....."  (a given!!)  I need help !!

    You made a purchase and exhausted the credit on your card before it processed. All purchases are final. Contact iTunes Store support. You need to settle up before you can purchase or download anything else.

  • Can someone tell me how to fix this error in 10.4.11 on a G5 Quad Core 2.5GHz Tower...A valid video device could not be found for playback. [-70017]

    Can someone tell me how to fix this error in 10.4.11 on a G5 Quad Core 2.5GHz Tower...A valid video device could not be found for playback. [-70017]

    That's an error reported from DVD Player I believe...
    kDVDErrorMissingGraphicsDevice = -70017, // A valid graphics device is not available.
    There's some conjecture it has to do with HDCP, or Video Card problems, but the only 2 cures/fixes I found were Software related, one was cured by updating the OS, another by replacing the Video kexts.
    I think this error also shows up if trying to use DVD player in Safe Mode, (too much research isn't good! ).
    At the Apple Icon at top left>About this Mac.
    Then click on More Info>Hardware>Graphics/Displays and report like this...
    NVIDIA GeForce 7800GT:
      Chipset Model:          GeForce 7800GT
      Type:          Display
      Bus:          PCI
      Slot:          SLOT-1
      VRAM (Total):          256 MB
      Vendor:          nVIDIA (0x10de)
      Device ID:          0x0092
      Revision ID:          0x00a1
      ROM Revision:          2152.2
      Displays:
    VGA Display:
      Resolution:          1920 x 1080 @ 60 Hz
      Depth:          32-bit Color
      Core Image:          Supported
      Main Display:          Yes
      Mirror:          Off
      Online:          Yes
      Quartz Extreme:          Supported
    Display:
      Status:          No display connected
    Can't think of much to try at the moment, but perhaps reapplying the big 10.4.11 combo, Repair Permissions, & reboot would help, not sure.
    The combo update for PowerPC-based Macs...
    http://www.apple.com/support/downloads/macosx10411comboupdateppc.html

  • My new iPhone4S could not start after the Apple mark disappear, the running screen stand still over 30mn. Can someone tell me how to solve this problem.

    My new iPhone4S could not start after the Apple mark disappear, the running screen stand still over 30mn. Can someone tell me how to solve this problem.
    I tried to connect to iTune hoped to restore the system but iTunes did not reconige it.

    here is link to the apple product feedback website:
    http://www.apple.com/feedback/

  • Can music from the ipod classis be uploaded to icloud? If so, can someone tell me how to accomplish this task?

    Can music from the ipod classis be uploaded to icloud? If so, can someone tell me how to accomplish this task?

    Hi Crystal,
    So I cancelled the first & only order I will ever make thru this company & want my account deleted.
    I can't get thru to anyone by phone or chat. Is there no other way to accomplish this?
    Sorry for this hassle. No, you need to contact them. What is the problem you are facing in contacting them?
    What happens if I sign out & just never sign back in?
    You might still get charged. Let me know if you still can't get through.
    Thanks,
    Kevin

  • Can someone please suggest me in tuning this query?

    Can someone please suggest me in tuning this query?
    select pemail.email_oid,
    pemail.parent_oid,
    md.message_data_oid,
    ea.email_account_oid,
    ef.email_folder_oid,
    md.channel,
    ea.email_account_name,
    md.from_address,
    md.to_address,
    eref.ref_id ticket_number,
    ( select count(email_oid) from esg.email where email_oid = pemail.email_oid and email.attachment_flag = 'Y' ) attachment_flag_a,
    ( select count(email_oid) from esg.email cemail
    where cemail.parent_oid = pemail.email_oid and
    ( cemail.email_type is null or cemail.email_type != 'S') and
    cemail.vec_status not in ('G', 'D', 'P') and
    cemail.vec_status in ('N', 'O') and
    cemail.attachment_flag = 'Y' ) attachment_flag_b,
    md.received_date,
    pemail.vec_status,
    pemail.email_type,
    md.subject,
    md.content,
    pemail.tracking_id,
    pemail.assignee_oid,
    ( select count(email_oid) from email cemail
    where cemail.parent_oid = pemail.email_oid and
    (cemail.email_type is null or cemail.email_type != 'S' ) and
    cemail.vec_status not in ('G','D', 'P') and
    cemail.vec_status in ('N', 'O' ) ) child_email_cnt,
    ( select count(0) from email
    where vec_status = 'N' and
    email_type = 'O' and
    email_oid = pemail.email_oid and
    vec_status in ('N', 'O' )) parent_newemail_cnt,
    ( select count(0) from email
    where vec_status = 'N' and
    email_type = 'O' and
    parent_oid = pemail.email_oid and
    vec_status in ('N', 'O' )) child_newemail_cnt
    From esg.email pemail,
    esg.message_data md,
    esg.email_account ea,
    esg.email_folder ef,
    (select email_oid, ref_id from email_ref
    where email_ref_oid in (select min(email_ref_oid) from email_ref where ref_tid = -9000 and ref_sid = 'ESG' and confirmed_flag = 'Y' group by email_oid )) eref
    where
    md.message_data_oid = pemail.message_data_oid and
    pemail.email_folder_oid = ef.email_folder_oid(+) and
    ef.email_account_oid = ea.email_account_oid(+) and
    pemail.vec_status not in ('G','D','P') and
    pemail.vec_status in ('N', 'O') and
    pemail.email_oid = eref.email_oid(+) and
    lower(md.channel) in ('[email protected]', '[email protected]') and
    pemail.email_oid in
    ( select parent.email_oid from message_data md,
    email parent
    where md.message_data_oid = parent.message_data_oid and
    parent.parent_oid is null and
    pemail.email_type = 'O' and
    lower(md.to_address) in
    ( select lower(contact_info) from esg.user_profile up,
    esg.person p,
    esg.person_contact pc
    where up.user_oid = 802239 and
    up.person_oid = p.person_oid and
    p.person_oid = pc.person_oid and
    pc.contact_type_oid = 6 )
    union all
    select child.parent_oid from message_data md,
    email child
    where md.message_data_oid = child.message_data_oid and
    parent_oid is not null and
    child.vec_status not in ('G','D','P') and
    child.vec_status in ('N', 'O') and
    child.email_type = 'O' and
    lower(md.to_address) in
    ( select lower(contact_info) from esg.user_profile up,
    esg.person p,
    esg.person_contact pc
    where up.user_oid = 802239 and
    up.person_oid = p.person_oid and
    p.person_oid = pc.person_oid and
    pc.contact_type_oid = 6 )
    ORDER BY RECEIVED_DATE DESC;
    1st run
    Elapsed: 00:00:03.39
    2nd run
    Elapsed: 00:00:01.80
    SQL> Select TABLE_NAME,LAST_ANALYZED, num_rows from user_tables where table_name in ('EMAIL','MESSAGE_DATA', 'EMAIL_ACCOUNT','EMAIL_FOLDER','EMAIL_REF','USER_PROFILE','PERSON','PERSON_CONTACT');
    TABLE_NAME LAST_ANAL NUM_ROWS
    USER_PROFILE 11-JUN-11 385808
    PERSON_CONTACT 11-JUN-11 698624
    PERSON 11-JUN-11 405364
    MESSAGE_DATA 11-JUN-11 1069
    EMAIL_REF 11-JUN-11 559
    EMAIL_FOLDER 11-JUN-11 563
    EMAIL_ACCOUNT 11-JUN-11 563
    EMAIL 11-JUN-11 101652
    8 rows selected.
    row count from all tables
    email - 102063
    message_data - 1069
    email_account - 563
    email_folder - 563
    email_ref - 559
    user_profile - 386055
    person - 404057
    person_contact - 698696
    Thanks,
    Suman M.

    ======================================
    Execution Plan
    Plan hash value: 110416976
    | Id | Operation | Name | Rows | Bytes | Cost |
    | 0 | SELECT STATEMENT | | 1 | 1361 | 17 |
    | 1 | SORT AGGREGATE | | 1 | 8 | |
    |* 2 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 8 | 1 |
    |* 3 | INDEX UNIQUE SCAN | PK_EMAIL | 1 | | 1 |
    | 4 | SORT AGGREGATE | | 1 | 8 | |
    |* 5 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 8 | 1 |
    |* 6 | INDEX RANGE SCAN | FK_EMAIL_PARENT | 3 | | 1 |
    | 7 | SORT AGGREGATE | | 1 | 6 | |
    |* 8 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 6 | 1 |
    |* 9 | INDEX RANGE SCAN | FK_EMAIL_PARENT | 3 | | 1 |
    | 10 | SORT AGGREGATE | | 1 | 10 | |
    |* 11 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 10 | 1 |
    |* 12 | INDEX UNIQUE SCAN | PK_EMAIL | 1 | | 1 |
    | 13 | SORT AGGREGATE | | 1 | 6 | |
    |* 14 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 6 | 1 |
    |* 15 | INDEX RANGE SCAN | FK_EMAIL_PARENT | 3 | | 1 |
    | 16 | SORT ORDER BY | | 1 | 1361 | 17 |
    |* 17 | FILTER | | | | |
    | 18 | NESTED LOOPS OUTER | | 1 | 1361 | 5 |
    | 19 | NESTED LOOPS OUTER | | 1 | 1336 | 4 |
    | 20 | NESTED LOOPS | | 1 | 1328 | 3 |
    | 21 | NESTED LOOPS OUTER | | 1 | 53 | 2 |
    | 22 | INLIST ITERATOR | | | | |
    | 23 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 35 | 1 |
    |* 24 | INDEX RANGE SCAN | IE_EMAIL | 55 | | 1 |
    | 25 | VIEW PUSHED PREDICATE | | 1 | 18 | 1 |
    | 26 | NESTED LOOPS | | 1 | 36 | 4 |
    | 27 | VIEW | VW_NSO_1 | 11 | 143 | 3 |
    | 28 | SORT GROUP BY | | 11 | 231 | 3 |
    |* 29 | TABLE ACCESS BY INDEX ROWID| EMAIL_REF | 11 | 231 | 3 |
    |* 30 | INDEX FULL SCAN | AK1_EMAIL_REF | 21 | | 3 |
    |* 31 | TABLE ACCESS BY INDEX ROWID | EMAIL_REF | 1 | 23 | 1 |
    |* 32 | INDEX UNIQUE SCAN | PK_EMAIL_REF | 1 | | 1 |
    |* 33 | TABLE ACCESS BY INDEX ROWID | MESSAGE_DATA | 1 | 1275 | 1 |
    |* 34 | INDEX UNIQUE SCAN | PK_MESSAGE_DATA | 1 | | 1 |
    | 35 | TABLE ACCESS BY INDEX ROWID | EMAIL_FOLDER | 1 | 8 | 1 |
    |* 36 | INDEX UNIQUE SCAN | PK_EMAIL_FOLDER | 1 | | 1 |
    | 37 | TABLE ACCESS BY INDEX ROWID | EMAIL_ACCOUNT | 1 | 25 | 1 |
    |* 38 | INDEX UNIQUE SCAN | PK_EMAIL_ACCOUNT | 1 | | 1 |
    | 39 | UNION-ALL | | | | |
    | 40 | NESTED LOOPS SEMI | | 1 | 116 | 5 |
    | 41 | NESTED LOOPS | | 1 | 50 | 2 |
    |* 42 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 14 | 1 |
    |* 43 | INDEX UNIQUE SCAN | PK_EMAIL | 1 | | 1 |
    | 44 | TABLE ACCESS BY INDEX ROWID | MESSAGE_DATA | 1069 | 38484 | 1 |
    |* 45 | INDEX UNIQUE SCAN | PK_MESSAGE_DATA | 1 | | 1 |
    |* 46 | VIEW | VW_NSO_3 | 1 | 66 | 3 |
    |* 47 | FILTER | | | | |
    | 48 | NESTED LOOPS | | 1 | 45 | 3 |
    | 49 | NESTED LOOPS | | 1 | 15 | 2 |
    | 50 | TABLE ACCESS BY INDEX ROWID | USER_PROFILE | 1 | 10 | 1 |
    |* 51 | INDEX UNIQUE SCAN | PK_USER | 1 | | 1 |
    |* 52 | INDEX UNIQUE SCAN | PK_PERSON | 405K| 1979K| 1 |
    |* 53 | TABLE ACCESS BY INDEX ROWID | PERSON_CONTACT | 1 | 30 | 1 |
    |* 54 | INDEX RANGE SCAN | FK_PERSON_CONTACT_PERSON | 2 | | 1 |
    | 55 | NESTED LOOPS | | 1 | 114 | 5 |
    | 56 | MERGE JOIN CARTESIAN | | 1 | 78 | 4 |
    |* 57 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 12 | 1 |
    |* 58 | INDEX RANGE SCAN | FK_EMAIL_PARENT | 1 | | 1 |
    | 59 | BUFFER SORT | | 1 | 66 | 3 |
    | 60 | VIEW | VW_NSO_2 | 1 | 66 | 3 |
    | 61 | SORT UNIQUE | | 1 | 45 | |
    | 62 | NESTED LOOPS | | 1 | 45 | 3 |
    | 63 | NESTED LOOPS | | 1 | 15 | 2 |
    | 64 | TABLE ACCESS BY INDEX ROWID| USER_PROFILE | 1 | 10 | 1 |
    |* 65 | INDEX UNIQUE SCAN | PK_USER | 1 | | 1 |
    |* 66 | INDEX UNIQUE SCAN | PK_PERSON | 405K| 1979K| 1 |
    |* 67 | TABLE ACCESS BY INDEX ROWID | PERSON_CONTACT | 1 | 30 | 1 |
    |* 68 | INDEX RANGE SCAN | FK_PERSON_CONTACT_PERSON | 2 | | 1 |
    |* 69 | TABLE ACCESS BY INDEX ROWID | MESSAGE_DATA | 1 | 36 | 1 |
    |* 70 | INDEX UNIQUE SCAN | PK_MESSAGE_DATA | 1 | | 1 |
    Predicate Information (identified by operation id):
    2 - filter("EMAIL"."ATTACHMENT_FLAG"='Y')
    3 - access("EMAIL_OID"=:B1)
    5 - filter("CEMAIL"."EMAIL_TYPE"<>'S' AND "CEMAIL"."VEC_STATUS"<>'G' AND
    "CEMAIL"."VEC_STATUS"<>'D' AND "CEMAIL"."VEC_STATUS"<>'P' AND ("CEMAIL"."VEC_STATUS"='N'
    OR "CEMAIL"."VEC_STATUS"='O') AND "CEMAIL"."ATTACHMENT_FLAG"='Y')
    6 - access("CEMAIL"."PARENT_OID"=:B1)
    8 - filter("CEMAIL"."EMAIL_TYPE"<>'S' AND "CEMAIL"."VEC_STATUS"<>'G' AND
    "CEMAIL"."VEC_STATUS"<>'D' AND "CEMAIL"."VEC_STATUS"<>'P' AND ("CEMAIL"."VEC_STATUS"='N'
    OR "CEMAIL"."VEC_STATUS"='O'))
    9 - access("CEMAIL"."PARENT_OID"=:B1)
    11 - filter("VEC_STATUS"='N' AND "EMAIL_TYPE"='O')
    12 - access("EMAIL_OID"=:B1)
    14 - filter("VEC_STATUS"='N' AND "EMAIL_TYPE"='O')
    15 - access("PARENT_OID"=:B1)
    17 - filter( EXISTS ( (SELECT "PARENT"."EMAIL_OID" FROM "EMAIL" "PARENT","MESSAGE_DATA"
    "MD", (SELECT LOWER("CONTACT_INFO") "$nso_col_1" FROM "ESG"."PERSON_CONTACT"
    "PC","ESG"."PERSON" "P","ESG"."USER_PROFILE" "UP" WHERE :B1='O' AND
    "UP"."USER_OID"=802239 AND "UP"."PERSON_OID"="P"."PERSON_OID" AND
    "P"."PERSON_OID"="PC"."PERSON_OID" AND "PC"."CONTACT_TYPE_OID"=6)
    "VW_NSO_3" WHERE
    "$nso_col_1"=LOWER("MD"."TO_ADDRESS") AND "MD"."MESSAGE_DATA_OID"="PARENT"."MESSAGE_DATA_O
    ID" AND "PARENT"."EMAIL_OID"=:B2 AND "PARENT"."PARENT_OID" IS NULL
    ) UNION ALL (SELECT
    "CHILD"."PARENT_OID" FROM "EMAIL" "CHILD","MESSAGE_DATA" "MD", (SELECT DISTINCT
    LOWER("CONTACT_INFO") "$nso_col_1" FROM "ESG"."PERSON_CONTACT" "PC","ESG"."PERSON"
    "P","ESG"."USER_PROFILE" "UP" WHERE "UP"."USER_OID"=802239 AND
    "UP"."PERSON_OID"="P"."PERSON_OID" AND "P"."PERSON_OID"="PC"."PERSON_OID" AND
    "PC"."CONTACT_TYPE_OID"=6) "VW_NSO_2" WHERE "MD"."MESSAGE_DATA_OID
    "="CHILD"."MESSAGE_DATA_
    OID" AND "$nso_col_1"=LOWER("MD"."TO_ADDRESS") AND "CHILD"."PARENT
    _OID"=:B3 AND
    "CHILD"."VEC_STATUS"<>'G' AND "CHILD"."VEC_STATUS"<>'D' AND "CHILD
    "."VEC_STATUS"<>'P' AND
    ("CHILD"."VEC_STATUS"='N' OR "CHILD"."VEC_STATUS"='O') AND "CHILD"
    ."EMAIL_TYPE"='O' AND
    "PARENT_OID" IS NOT NULL)))
    24 - access("PEMAIL"."VEC_STATUS"='N' OR "PEMAIL"."VEC_STATUS"='O')
    filter("PEMAIL"."VEC_STATUS"<>'G' AND "PEMAIL"."VEC_STATUS"<>'D' AND
    "PEMAIL"."VEC_STATUS"<>'P')
    29 - filter("CONFIRMED_FLAG"='Y')
    30 - access("REF_SID"='ESG' AND "REF_TID"=(-9000))
    filter("REF_TID"=(-9000) AND "REF_SID"='ESG')
    31 - filter("EMAIL_OID"="PEMAIL"."EMAIL_OID")
    32 - access("EMAIL_REF_OID"="$nso_col_1")
    33 - filter(LOWER("MD"."CHANNEL")='[email protected]' OR
    LOWER("MD"."CHANNEL")='[email protected]')
    34 - access("MD"."MESSAGE_DATA_OID"="PEMAIL"."MESSAGE_DATA_OID")
    36 - access("PEMAIL"."EMAIL_FOLDER_OID"="EF"."EMAIL_FOLDER_OID"(+))
    38 - access("EF"."EMAIL_ACCOUNT_OID"="EA"."EMAIL_ACCOUNT_OID"(+))
    42 - filter("PARENT"."PARENT_OID" IS NULL)
    43 - access("PARENT"."EMAIL_OID"=:B1)
    45 - access("MD"."MESSAGE_DATA_OID"="PARENT"."MESSAGE_DATA_OID")
    46 - filter("$nso_col_1"=LOWER("MD"."TO_ADDRESS"))
    47 - filter(:B1='O')
    51 - access("UP"."USER_OID"=802239)
    52 - access("UP"."PERSON_OID"="P"."PERSON_OID")
    53 - filter("PC"."CONTACT_TYPE_OID"=6)
    54 - access("P"."PERSON_OID"="PC"."PERSON_OID")
    57 - filter("CHILD"."VEC_STATUS"<>'G' AND "CHILD"."VEC_STATUS"<>'D' AND
    "CHILD"."VEC_STATUS"<>'P' AND ("CHILD"."VEC_STATUS"='N' OR "CHILD"
    ."VEC_STATUS"='O') AND
    "CHILD"."EMAIL_TYPE"='O')
    58 - access("CHILD"."PARENT_OID"=:B1)
    filter("PARENT_OID" IS NOT NULL)
    65 - access("UP"."USER_OID"=802239)
    66 - access("UP"."PERSON_OID"="P"."PERSON_OID")
    67 - filter("PC"."CONTACT_TYPE_OID"=6)
    68 - access("P"."PERSON_OID"="PC"."PERSON_OID")
    69 - filter("$nso_col_1"=LOWER("MD"."TO_ADDRESS"))
    70 - access("MD"."MESSAGE_DATA_OID"="CHILD"."MESSAGE_DATA_OID")
    Note
    - cpu costing is off (consider enabling it)
    Statistics
    3103 recursive calls
    0 db block gets
    599654 consistent gets
    2915 physical reads
    0 redo size
    1955 bytes sent via SQL*Net to client
    3895 bytes received via SQL*Net from client
    2 SQL*Net roundtrips to/from client
    331 sorts (memory)
    0 sorts (disk)
    0 rows processed
    =====================================

  • Contact from my phone book just disappeared.dont know how ..and it happen second time in 1 month time. Apple customer service in India is crap... Sorry to say but 700 contacts got disappeared.can someone tell me how to get this contacts back on my phone.p

    contact from my phone book just disappeared.dont know how ..and it happen second time in 1 month time. Apple customer service in India is crap... Sorry to say but 700 contacts got disappeared.can someone tell me how to get this contacts back on my phone.plz

    the same problem happened to me also, i felt that while playing hay day, if some calls came in between and if i answered the call, the setting of all the icloud items turns off. (i have backup of all the items on icloud), after deleting the account and making settings of mail, contact, calander etc on on mode and after rebooting the phone, it again download from icloud server. but it is just a headache. do not know how to handle this.

  • I bought a ipod touch 3 i need help on this is there a youtube app that has a cach download to play youtube video's offline within the app if there is one can someone fill me some info on this matter

    i bought a ipod touch 3 i need help on this is there a youtube app that has a cach download to play youtube video's offline within the app if there is one can someone fill me some info on this matter

    You can only use apps that are compatible with your dvice and ios version.
    The secons gen ipod touch can only go to 4.2.1.
    If you are running 4.2.1 then you can only use apps that require 4.2.1 or lower.

  • Can someone verify video output from dock connector after 4.x update?

    Someone told me that they can no longer play videos on your TV (with a video cable) after iOS4.x updates. I recently paid $50+ for an Apple video cable to all me to play videos from my iPhone on my TV. I am still on 3.1.2. I want to make sure the upgrade doesn't break that.
    Thanks.

    Can someone with a 3G iPhone, running iOS4.1 verify this for me, please?
    Thanks

  • My MAC did a software update tonight and now my mail wont load, it is teeling me I need to update my mail software, can someone tell me how to do this please?e

    My mac updated softwar tonight and now I have no mal, can someone tell me how to udate my mail sofware please ?

    I assume you're talking about Security Update 2012-004 for Snow Leopard? Have you by any changed moved your Mail application out of the Applications folder? This will cause updates to fail to work - Apple's included applications should always be left where Apple installed them.
    If this is the case, move it back, then downlad the update from Security Update 2012-004 (Snow Leopard) and run it again.

  • Just bought an ipad air and I have an ipad 2.  I would like to use both with the same computer.  Can someone tell me how to do this.  Do I have to set up a separate user.

    I just ordered an ipad air and I have an ipad 2. Can someone help me so I can use both ipads from the same computer.  The new one is for my husband and I am going to take the ipad 2.  Do I have to do something different since they will be using the same computer.  Any help you can give me would be appreciated.  Thanks in advance for your help.

    It's no problem. I hope this explanation simplifies the information in the Link Demo gave you. It's how I think most people do it...
    To avoid having to pay again for apps you have already purchased, use the same Apple ID (likely the current one) on both devices. You can adjust this in:
    Settings > iTunes & App Store.
    So that you can communicate with each other, use separate Apple IDs for iCloud, Messages, and FaceTime. Adjust those in:
    Settings > iCloud
    Settings > Messages
    Settings > FaceTime

  • CAn Someone Please Help me? Turn this program in a algorithm

    DECLARE SUB RentCar ()
    DECLARE SUB PayBill ()
    DECLARE SUB Main ()
    DECLARE SUB ReadCarData ()
    DECLARE SUB FindCar ()
    TYPE Car ' User made Type To hold Car Data
    CarNumber AS INTEGER
    License AS STRING * 8
    Year AS INTEGER
    CarMaker AS STRING * 16
    CarName AS STRING * 16
    Description AS STRING * 20
    ColorOfCar AS STRING * 10
    NumberOfDoors AS INTEGER
    Price AS DOUBLE
    Rented AS INTEGER
    Customer AS INTEGER
    END TYPE
    TYPE Customer ' User made Type to hold Customer data
    CustomerNumber AS INTEGER
    CustName AS STRING * 50
    Bill AS DOUBLE
    END TYPE
    DIM SHARED Cars(1 TO 26) AS Car ' Global Variables
    DIM SHARED p(4) AS Customer
    DIM CustName AS STRING * 50
    p(0).CustName = "Kevin" ' Assign Customers who need to pay bills
    p(0).Bill = 0
    p(1).CustName = "Eljah"
    p(1).Bill = 100
    p(2).CustName = "Jared"
    p(2).Bill = 55
    p(3).CustName = "Claudwin"
    p(3).Bill = 60
    p(4).CustName = "Isaac"
    p(4).Bill = 1500
    CALL ReadCarData ' This reads the data statements into the Cars() array.
    WIDTH 80, 50 ' Formats screen and call the main part of the program
    CALL Main
    ' CAR DATA STATEMENTS
    ' LICENSE YEAR MAKER MODEL DESCRIPTION COLOR DOORS PRICE
    DATA "X-5687", 2007, "DODGE", "CALIBER", "FAMILY CAR", "DARK RED", 4, 89.99
    DATA "X-9681", 2006, "DODGE", "CHARGER", "SPORT", "GREY", 4, 47.99
    DATA "X-9684", 2006, "DODGE", "RAM 2500", "PICKUP", "BLACK", 4, 101.99
    DATA "X-9437", 2004, "FORD", "MUSTANG", "SPORT", "RED", 2, 45.99
    DATA "X-2562", 2002, "FORD", "TAURUS", "SEDAN", "LIGHT GREY", 4, 67.99
    DATA "X-3856", 2003, "FORD", "CONTOUR", "SMALL", "LIGHT BLUE", 2, 45.99
    DATA "X-2724", 2001, "FORD", "BRONCO", "JEEP", "BLACK", 4, 63.99
    DATA "X-2724", 2001, "FORD", "BRONCO", "JEEP", "DARK GREEN", 4, 63.99
    DATA "X-8568", 1998, "FORD", "ESCORT", "COMPACT", "BROWN", 2, 35.99
    DATA "X-4724", 2004, "FORD", "PROBE", "SPORT", "BLACK", 2, 58.99
    DATA "X-4724", 2004, "FORD", "PROBE", "SPORT", "RED", 2, 58.99
    DATA "X-4724", 2004, "FORD", "PROBE", "SPORT", "YELLOW", 2, 58.99
    DATA "X-4724", 2003, "FORD", "AEROSTAR", "S.U.V.", "DARK GREEN", 4, 87.99
    DATA "X-2727", 1999, "PONTIAC", "GRAND AM", "SPORT CAR", "BLACK", 2, 45.99
    DATA "X-2327", 1999, "PONTIAC", "GRAND AM", "SPORT CAR", "RED", 2, 45.99
    DATA "X-2767", 1999, "PONTIAC", "GRAND AM", "SPORT CAR", "GREY", 2, 45.99
    DATA "X-2723", 1999, "PONTIAC", "GRAND AM", "SPORT CAR", "PURPLE", 2, 45.99
    DATA "X-8486", 2005, "PONTIAC", "TRANSPORT", "S.U.V.", "WHITE", 2, 96.99
    DATA "X-3261", 2005, "PONTIAC", "AZTEC", "S.U.V.", "YELLOW", 4, 93.99
    DATA "X-1864", 2006, "PONTIAC", "TORRENT", "S.U.V.", "RED", 4, 98.99
    DATA "X-8521", 2006, "MERCURY", "COUGAR", "SPORT", "BLACK", 2, 69.99
    DATA "X-8471", 2006, "LINCOLN", "TOWN CAR", "LUXURY", "BLACK", 4, 149.99
    DATA "X-8635", 2001, "LINCOLN", "CONTINENTAL", "LUXURY", "GOLD", 4, 139.99
    DATA "X-2643", 2006, "CHEVROLET", "F-150", "PICKUP", "GREY", 2, 95.99
    DATA "X-7143", 2006, "CHEVROLET", "CORVETTE", "SPORT", "YELLOW", 2, 131.99
    DATA "X-7378", 2006, "CHEVROLET", "MALIBU", "SEDAN", "BLACK", 4, 81.99
    SUB FindCar ' This sub goes through the data to search for a car
    DIM Counter AS INTEGER 'variables need for sub
    DIM TempMaker AS STRING
    DIM TempModel AS STRING
    DIM TempColor AS STRING
    DIM TempCarType AS STRING
    DIM TempRangeFrom AS DOUBLE
    DIM TempRangeTo AS DOUBLE
    DIM TempMax AS DOUBLE
    DIM TempMin AS DOUBLE
    DIM LeaveFindCar AS INTEGER
    DIM MoreCar AS STRING
    DIM CanDisplay AS INTEGER
    DO WHILE LeaveFindCar = 0 ' Main loop to find type of car
         ' Initialize the variables
    Counter = 0
    TempMaker = ""
    TempModel = ""
    TempColor = ""
    TempRangeFrom = 0
    TempRangeTo = 0
    CLS ' Draw the screen with the search fields"
    COLOR 15
    PRINT "FIND IDEAL CAR: (Enter one or more of these items)"
         PRINT STRING$(80, CHR$(196))
         COLOR 11
         PRINT "Car Builder:"
         PRINT "Car Model:"
         PRINT "Car Color:"
         PRINT "Price Range: From: To:"
         COLOR 10 ' GetsUser can enter any search fields he wants
         LOCATE 3, 19
         INPUT TempMaker
         LOCATE 4, 19
         INPUT TempModel
         LOCATE 5, 19
         INPUT TempColor
         LOCATE 6, 19
         INPUT TempRangeFrom
         LOCATE 6, 36
         INPUT TempRangeTo
         COLOR 15
         PRINT STRING$(80, CHR$(196))
         CanDisplay = 0
         FOR Counter = 1 TO 26 '' This loop does the actual search of the matching cars
         'We compare all string type variables as an
         'uppercase (UCASE$) and Right Trimmed (RTRIM$)
         'to avoid having to compare upper and lower case
         'Values, this makes the condtions here twice
         'as short to perform.
         IF RTRIM$(TempMaker) <> "" THEN
         IF UCASE$(RTRIM$(Cars(Counter).CarMaker)) = UCASE$(RTRIM$(TempMaker)) THEN
         IF RTRIM$(TempModel) <> "" THEN
         IF UCASE$(RTRIM$(Cars(Counter).CarName)) = UCASE$(RTRIM$(TempModel)) THEN
         IF RTRIM$(TempColor) <> "" THEN
         IF UCASE$(RTRIM$(Cars(Counter).ColorOfCar)) = UCASE$(RTRIM$(TempColor)) THEN
    IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
    IF TempRangeFrom > TempRangeTo THEN
    TempMin = TempRangeTo
    TempMax = TempRangeFrom
    ELSE
    TempMin = TempRangeFrom
    TempMax = TempRangeTo
    END IF
    ' If Price of car is in between Mininum and Maximum Price
    'Allows to display the record.
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    END IF
    ELSE
    CanDisplay = 0
    END IF
    ELSE
    ' The IF is to set Min to the smallest of
    ' the range vales and TempMax to the biggest.
    IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
    IF TempRangeFrom > TempRangeTo THEN
    TempMin = TempRangeTo
    TempMax = TempRangeFrom
    ELSE
    TempMin = TempRangeFrom
    TempMax = TempRangeTo
    END IF
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    END IF
    END IF
    ELSE
    CanDisplay = 0
    END IF
    ELSE
    IF RTRIM$(TempColor) <> "" THEN
    IF UCASE$(RTRIM$(Cars(Counter).ColorOfCar)) = UCASE$(RTRIM$(TempColor)) THEN
    ' This IF is to set Min to the smallest of
    ' the range values and Max to the biggest.
    IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
    IF TempRangeFrom > TempRangeTo THEN
    TempMin = TempRangeTo
    TempMax = TempRangeFrom
    ELSE
    TempMin = TempRangeFrom
    TempMax = TempRangeTo
    END IF
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    END IF
    ELSE
    CanDisplay = 0
    END IF
    ELSE
    ' The IF is to set Min to the smallest of
    ' the range vales and Max to the biggest.
    IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
    IF TempRangeFrom > TempRangeTo THEN
    TempMin = TempRangeTo
    TempMax = TempRangeFrom
    ELSE
    TempMin = TempRangeFrom
    TempMax = TempRangeTo
    END IF
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    ELSEIF TempRangeFrom = 0 AND TempRangeTo > 0 THEN ' The IF one of the range to be 0
    TempMin = TempRangeFrom
    TempMax = TempRangeTo
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    ELSEIF TempRangeFrom > 0 AND TempRangeTo = 0 THEN ' This IF one of the range to be 0
    TempMin = TempRangeTo
    TempMax = TempRangeFrom
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    ELSE
    CanDisplay = 1
    END IF
    END IF
    END IF
    END IF
    ELSE
    'Same as previously, all string variables are UCASEd and
    'RTRIMmed to shorten the comparison lenghts.
    IF RTRIM$(TempModel) <> "" THEN
    IF UCASE$(RTRIM$(Cars(Counter).CarName)) = UCASE$(RTRIM$(TempModel)) THEN
    IF RTRIM$(TempColor) <> "" THEN
    IF UCASE$(RTRIM$(Cars(Counter).ColorOfCar)) = UCASE$(RTRIM$(TempColor)) THEN
    IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
    IF TempRangeFrom > TempRangeTo THEN
    ' This IF is to setMin to the smallest of
    ' the range vales and Max to the biggest
    TempMin = TempRangeTo
    TempMax = TempRangeFrom
    ELSE
    TempMin = TempRangeFrom
    TempMax = TempRangeTo
    END IF
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    END IF
    ELSE
    CanDisplay = 0
    END IF
    ELSE
    ' This IF is to setMin to the smallest of
    ' the range vales and Max to the biggest
    IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
    IF TempRangeFrom > TempRangeTo THEN
    TempMin = TempRangeTo
    TempMax = TempRangeFrom
    ELSE
    TempMin = TempRangeFrom
    TempMax = TempRangeTo
    END IF
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    END IF
    END IF
    ELSE
    CanDisplay = 0
    END IF
    ELSE
    IF RTRIM$(TempColor) <> "" THEN
    IF UCASE$(RTRIM$(Cars(Counter).ColorOfCar)) = UCASE$(RTRIM$(TempColor)) THEN
    ' This IF is to setMin to the smallest of
    ' the range vales and Max to the biggest
    IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
    IF TempRangeFrom > TempRangeTo THEN
    TempMin = TempRangeTo
    TempMax = TempRangeFrom
    ELSE
    TempMin = TempRangeFrom
    TempMax = TempRangeTo
    END IF
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    ELSE
    CanDisplay = 1
    END IF
    ELSE
    CanDisplay = 0
    END IF
    ELSE
    ' This IF is to setMin to the smallest of
    ' the range vales and Max to the biggest
    IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
    IF TempRangeFrom > TempRangeTo THEN
    TempMin = TempRangeTo
    TempMax = TempRangeFrom
    ELSE
    TempMin = TempRangeFrom
    TempMax = TempRangeTo
    END IF
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    ELSEIF TempRangeFrom = 0 AND TempRangeTo > 0 THEN
    TempMin = TempRangeFrom
    TempMax = TempRangeTo
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    ELSEIF TempRangeFrom > 0 AND TempRangeTo = 0 THEN
    TempMin = TempRangeTo
    TempMax = TempRangeFrom
    IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
    CanDisplay = 1
    ELSE
    CanDisplay = 0
    END IF
    ELSE
    CanDisplay = 1
    END IF
    END IF
    END IF
    END IF
    IF CanDisplay = 1 THEN ' If car match fields entered it is displayed
              COLOR 11
    PRINT Cars(Counter).CarNumber;
    PRINT " " + RTRIM$(Cars(Counter).License);
    PRINT " - " + RTRIM$(Cars(Counter).CarMaker);
    PRINT " " + RTRIM$(Cars(Counter).CarName);
    PRINT " " + RTRIM$(Cars(Counter).Description);
    PRINT " " + RTRIM$(Cars(Counter).ColorOfCar);
    PRINT TAB(60); USING " $###.##"; Cars(Counter).Price
    CanDisplay = 0
    END IF
    NEXT Counter ' displays line after listing cars
    COLOR 15
    PRINT STRING$(80, CHR$(196))
    DO WHILE UCASE$(MoreCar) <> "Y" AND UCASE$(MoreCar) <> "N"
    LOCATE CSRLIN, 1 ' This loop ask useers if they want another car search
    PRINT "Find Another Car (Y/N)"
    INPUT MoreCar
    LOOP
    IF UCASE$(MoreCar) = "N" THEN ' If user entered "n" the loop is exited
    LeaveFindCar = 1
    END IF
    MoreCar = ""
    LOOP
    END SUB
    SUB Main
    ' This SUB is the main part of the program. It displays
    ' the menu and accepts the choices from the user, when the
    ' user picks a valid value, it executes the proper choice
    DO
    CLS
    COLOR 15
    'print the menu on the screen      
    LOCATE 1, 33
    PRINT "RENT CARS PLUS"
    LOCATE 2, 1
    PRINT STRING$(80, CHR$(196))
    COLOR 11
    PRINT " 1 - Pay Bill"
    PRINT " 2 - Rent Car"
    PRINT " 3 - Find Ideal Car"
    PRINT " 999 - Exit"
    COLOR 15
    PRINT STRING$(80, CHR$(196))
    INPUT "Choice: ", Choice ' The user enters his/her choice
    IF Choice = 999 THEN END
    IF Choice <> 999 AND Choice <> 1 AND Choice <> 2 AND Choice <> 3 THEN
    PRINT " Error Please Enter Correct Choice! " ' If not valid answer user is asked to enter correct choice
    END IF
    SELECT CASE Choice ' This Select Case executes the subprograms options
    CASE 1
    CALL PayBill
    CASE 2
    CALL RentCar
    CASE 3
    CALL FindCar
    CASE 5
    END SELECT
    LOOP UNTIL Choice = 999
    END SUB
    SUB PayBill' This sub does the bill paying process.
    ' it asks a few question to the user to get the right
    ' information and be able to pay the given bill.
    DIM CustName AS STRING
    DIM MoreBill AS INTEGER
    DIM Answer AS STRING
    DIM Flag AS INTEGER
    COLOR 15
    MoreBill = 0 ' To start loop variable
    DO WHILE MoreBill = 0 ' Loop to start the Bill Paying Process
    StartBill:
         ' Displays screen to user
    CLS
    COLOR 15
    PRINT "PAY A BILL"
    PRINT STRING$(80, CHR$(196))
    INPUT "Customer Name: ", CustName ' user enters customer name
    Flag = 0
    FOR Q = 0 TO 4 ' Loops to search for customer name in array
    IF UCASE$(RTRIM$(p(Q).CustName)) = UCASE$(RTRIM$(CustName)) THEN
    Flag = 1
    PRINT p(Q).CustName; p(Q).Bill
    EXIT FOR
    END IF
    NEXT Q
    '' If customer name invalid error message displayed
    IF Flag = 0 THEN
    PRINT "Invalid name. Press a key to try again."
    DO WHILE INKEY$ <> "": LOOP
    GOTO StartBill
    END IF
    MethodInput:
    DO
    LOCATE 4, 1     ' Display Payment methods and wait for user to pick one
    COLOR 11
    PRINT "We only use Visa or American Express. How do you wish to pay?"
    PRINT "1 - Visa"
    PRINT "2 - American Express"
    PRINT "3 - Check"
    PRINT "4 - Cash"
    INPUT "Select 1, 2, 3, or 4: ", howtopay$ ' User enters way to pay
    IF howtopay$ = "1" OR howtopay$ = "2" THEN ' CArd number asked for If american or visa
    INPUT "Enter account number: ", cardnum$
    ELSEIF howtopay$ <> "3" AND howtopay$ <> "4" THEN
    PRINT "You must select method of payment."
    END IF
    LOOP WHILE howtopay$ < "1" OR howtopay$ > "4"
    PaymentInput:
    '' users enters payment amount
    INPUT "Payment Amount (0 to cancel the transaction): ", PayAmount
    IF PayAmount <> 0 THEN
    IF PayAmount > p(Q).Bill THEN
    '' If payment bigger than amount owed message displayed
    PRINT "Payment is bigger than amount due. Press key to enter payment."
    DO WHILE INKEY$ = "": LOOP
    GOTO PaymentInput
    ELSE
    ' If amount valid , payment subtracted from amount owed
    p(Q).Bill = p(Q).Bill - PayAmount
    PRINT "New balance is "; USING "$#####.##"; p(Q).Bill
    END IF
    END IF
         '' Loop ask if user wishes to pay another bill
    DO WHILE UCASE$(RTRIM$(Answer)) <> "Y" AND UCASE$(RTRIM$(Answer)) <> "N"
    COLOR 15
    LOCATE 48, 1
    PRINT "Pay Another Bill (Y/N) ";
    INPUT Answer
    LOOP
    IF UCASE$(RTRIM$(Answer)) = "N" THEN ' If answer is "N" then loop exited
    MoreBill = 1
    END IF
    LOOP
    END SUB
    SUB ReadCarData
    ' This sub reads all data from the DATA statements
    ' And puts them in the Cars array
    DIM Counter AS INTEGER
    FOR Counter = 1 TO 26
    Cars(Counter).CarNumber = Counter
    READ Cars(Counter).License
    READ Cars(Counter).Year
    READ Cars(Counter).CarMaker
    READ Cars(Counter).CarName
    READ Cars(Counter).Description
    READ Cars(Counter).ColorOfCar
    READ Cars(Counter).NumberOfDoors
    READ Cars(Counter).Price
    NEXT Counter
    END SUB
    SUB RentCar
    ' This sub does the renting of a car
    ' to a customer. This ask several questions
    ' in order to get the right customer and the right
    ' car to rent then it rents it.
    DIM MoreRent AS INTEGER
    DIM TempCustomer AS INTEGER
    DIM TempBill AS DOUBLE
    DIM Answer AS STRING
    DIM TempPrice AS DOUBLE
    DIM TempInsurance AS DOUBLE
    DIM CustName AS STRING
    DIM Number AS STRING
    DIM CarNumber AS INTEGER
    DIM Days AS INTEGER
    DIM Q AS INTEGER
    MoreRent = 0 ' Loop for rental process
    DO WHILE MoreRent = 0
    InputName:
    CLS ' Display screen to user
    COLOR 15
    PRINT "RENT A CAR"
    PRINT STRING$(80, CHR$(196))
    COLOR 11
    LOCATE 3, 1
    INPUT " Full Name: ", CustName ' user enters his name
    IF RTRIM$(CustName) = "" THEN
    PRINT "You Must Enter Your Name. Press a key to retry." ' User is told he must enter a name
    DO WHILE INKEY$ = "": LOOP
    GOTO InputName
    ELSE
    FOR Q = 0 TO 4
    IF UCASE$(RTRIM$(p(Q).CustName)) = UCASE$(RTRIM$(CustName)) THEN
    Flag = 1
    PRINT p(Q).CustName; p(Q).Bill
    TempCustomer = Q
    EXIT FOR
    END IF
    NEXT Q
    END IF
    InputNumber:
    LOCATE 5, 1
    INPUT " Phone Number: ", Number ' User enters phone number
    IF RTRIM$(Number) = "" THEN
    PRINT "You Must a phone number. Press a key to retry." ' User is warned he must enter a number
    DO WHILE INKEY$ = "": LOOP
    GOTO InputNumber
    END IF
    CarInput:
    LOCATE 7, 2
    COLOR 11
    INPUT "Car Number: ", CarNumber     
    ' This awaits a car number from the user.
    IF CarNumber < 1 AND CarNumber > 26 THEN ' If the car number is out of range, we warn and start again
    PRINT "Car Number must be between 1 and 26. Press a key to retry."
    DO WHILE INKEY$ = "": LOOP
    GOTO CarInput
    ELSE
    ' No need to search, we just display the car information
    COLOR 14
    PRINT RTRIM$(Cars(CarNumber).License) + " - ";
    PRINT Cars(CarNumber).Year;
    PRINT RTRIM$(Cars(CarNumber).CarMaker) + " " + RTRIM$(Cars(CarNumber).CarName) + " ";
    PRINT RTRIM$(Cars(CarNumber).ColorOfCar)
    PRINT "PRICE: "; USING "$####.##"; Cars(CarNumber).Price
    END IF
    DaysInput:
    LOCATE 10, 1
    COLOR 11
    INPUT " Number of Days to rent: ", Days
    ' This awaits for a number of days to rent the car for.
    IF Days < 1 AND Days > 31 THEN
    PRINT "Days are 1 to 31. Press a key to retry."
    ' Can't have less than 1 day or more than a month or we warn.
    DO WHILE INKEY$ = "": LOOP
    GOTO DaysInput
    END IF
    TempPrice = Days * Cars(CarNumber).Price
    ' Calculate the Price of the rental
    InsuranceInput:
    LOCATE 13, 1
    COLOR 11
    DO WHILE UCASE$(RTRIM$(Answer)) <> "Y" AND UCASE$(RTRIM$(Answer)) <> "N"
    COLOR 11
    LOCATE 13, 1
    PRINT "Add Insurance (Y/N)";
    ' the customer has the option to purchase insurance here.
    INPUT Answer
    LOOP
    IF UCASE$(Answer) = "Y" THEN
    COLOR 11
    DO WHILE UCASE$(RTRIM$(Answer)) <> "F" AND UCASE$(RTRIM$(Answer)) <> "D"
    'we loop until the users enters y or n
    COLOR 11
    LOCATE 14, 1
    PRINT "(F)ixed Or (D)aily Amount";
    ' If the user selected yes, we ask for fixed or daily insurance amount.
    INPUT Answer
    LOOP
    ' if Fixed amount was picked we ask for that amount
    IF UCASE$(RTRIM$(Answer)) = "F" THEN
    INPUT "Fixed Insurance: ", TempInsurance
    ELSE
    TempInsurance = 15 * Days ' If Daily was picked we multiply 15 by the number of days rented
    END IF
    END IF
    DO     ' this loop asks for a payment method.
    LOCATE 17, 1
    PRINT "We only use Visa or American Express. How do you wish to pay?"
    PRINT "1 - Visa"
    PRINT "2 - American Express"
    PRINT "3 - Check"
    PRINT "4 - Cash"
    INPUT "Select 1, 2, 3, or 4: ", howtopay$
    IF howtopay$ = "1" OR howtopay$ = "2" THEN
    INPUT "Enter account number: ", cardnum$
    ELSEIF howtopay$ <> "3" AND howtopay$ <> "4" THEN
    PRINT "You must select method of payment."
    END IF
    LOOP WHILE howtopay$ < "1" OR howtopay$ > "4"
    COLOR 14
    PRINT     
    ' This part displays some totals to the user.
    PRINT "Rental Price = "; USING "$##,###.##"; TempPrice
    PRINT "Insurance Amount = "; USING "$##,###.##"; TempInsurance
    PRINT "Total Price = "; USING "$##,###.##"; TempPrice + TempInsurance
    PRINT " ----------"
    TempBill = p(TempCustomer).Bill
    TempBill = TempBill + (TempPrice + TempInsurance)
    p(TempCustomer).Bill = TempBill
    PRINT "New Balance = "; USING "$##,###.##"; TempBill
    PRINT " =========="
    Answer = ""
    ' This loop asks if the user wants to rent another car.
    DO WHILE UCASE$(RTRIM$(Answer)) <> "Y" AND UCASE$(RTRIM$(Answer)) <> "N"
    COLOR 15
    LOCATE 48, 1
    PRINT "Rent Another Car (Y/N) ";
    INPUT Answer
    LOOP
    IF UCASE$(RTRIM$(Answer)) = "N" THEN
    ' If user selected N, we assign value to exit the loop
    MoreRent = 1
    END IF
    LOOP
    END SUB
    Im really good at programming but really suck at algorithms can someone please please write in a algorithm form for me , i need it by friday i would greatly be thankful for u

    Im really good at programming but really suck at algorithms
    >If your are 'really good' at programming, you will be able to solve this problem. Because, it has nothing to do with algorithm.
    >>can someone please please write in a algorithm form for me , i need it by friday i would greatly be thankful for u
    >Wrong person, in the wrong place.

Maybe you are looking for

  • Bulk insert of text file Help PLEASE!

    Hello, I am trying to insert the following data into a sql server table. 11470012 31020141100AMFI2              TENTATIVE APPOINTMENT SET FOR 03/17/2014 AT 10:00 AM 11470012 31720141000AMFI7              INTERVIEW COMPLETED. I am using the following

  • Issue regarding RG23A Part -II

    hi Expert, i am getting problem in updation of RG23A Part -II, while doing MIGO Part - I register is getting updated but CENVAT credit document is not generating and also it is not updating Part - II. My scenerio is like that BED - 16%               

  • Firefox - the awesomebar seems to have two lists for in-line autocomplete and suggestions

    Well, basically my problem is that the list of sites that autocomplete works for seems to be significantly more exclusive than that of the suggestions. In particular, autocomplete will only offer sites in my recent history. Any bookmarks (and possibl

  • DI Access to AS400 data type error

    Running DI 11.7.3.  We are pulling data from an AS400 and are erroring out on the table read.  The field we are erroring out on is a numeric (7,0), yet the data is '?0?0?0?'.  If I remove the field in the data flow, it runs fine.  Is DI capable of pu

  • "other" category problem

    I synced my Iphone 5s today and the "other" category jumped to 15 gb for no reason, its normally just 2.5 gb. I there a solution without having to do a full restore? Itunes is up to date also so i dont know what the problem is.