forked from urdt/ussd
19 lines
490 B
Plaintext
19 lines
490 B
Plaintext
CATCH incorrect_pin flag_incorrect_pin 1
|
|
CATCH update_yob flag_allow_update 1
|
|
LOAD get_current_profile_info 0
|
|
RELOAD get_current_profile_info
|
|
MAP get_current_profile_info
|
|
MOUT back 0
|
|
HALT
|
|
LOAD verify_yob 6
|
|
RELOAD verify_yob
|
|
CATCH incorrect_date_format flag_incorrect_date_format 1
|
|
LOAD save_yob 32
|
|
RELOAD save_yob
|
|
INCMP _ 0
|
|
CATCH pin_entry flag_yob_set 1
|
|
CATCH edit_location flag_location_set 0
|
|
CATCH edit_offerings flag_offerings_set 0
|
|
CATCH pin_entry flag_yob_set 0
|
|
INCMP edit_location *
|