Presentació
Llistat de la macro "DAUMES".
Descripció: completa data després _DART i _DATA
1 {SI SE CANCELA}{IR}Fugida~~
2
3 {;}Inicialitzem els paràmetres de DAU_TEXT.~
4 {ASIGNAR}VP-missatge~Escriviu el mes (en xifres)~
5 {ASIGNAR}VP-resposta~~
6 {ASIGNAR}VP-obliga~sí~
7
8 {ASIGNAR}vàlid~no~
9 {MIENTRAS} "{VARIABLE}númDeMes~"<"1"|"{VARIABLE}númDeMes~">"9"|
10 "{VARIABLE}vàlid~"="no"~
11 {ANIDAR}{VARIABLE}viaMacros~Dau_text~
12 {ASIGNAR}númDeMes~{VARIABLE}VP-resposta~~
13 {SI}{VARIABLE}númDeMes~<1|{VARIABLE}númDeMes~>12~
14 {ASIGNAR}vàlid~no~
15 {DE OTRO MODO}
16 {ASIGNAR}vàlid~sí~
17 {FIN SI}
18 {FIN MIENTRAS}
19
20 {IR}Mes{VARIABLE}númDeMes~~
21
22 {ROTULO}Mes1~
23 {ASIGNAR}VP-mes~de gener~
24 {IR}Acabar~
25
26 {ROTULO}Mes2~
27 {ASIGNAR}VP-mes~de febrer~
28 {IR}Acabar~
29
30 {ROTULO}Mes3~
31 {ASIGNAR}VP-mes~de març~
32 {IR}Acabar~
33
34 {ROTULO}Mes4~
35 {ASIGNAR}VP-mes~d'abril~
36 {IR}Acabar~
37
38 {ROTULO}Mes5~
39 {ASIGNAR}VP-mes~de maig~
40 {IR}Acabar~
41
42 {ROTULO}Mes6~
43 {ASIGNAR}VP-mes~de juny~
44 {IR}Acabar~
45
46 {ROTULO}Mes7~
47 {ASIGNAR}VP-mes~de juliol~
48 {IR}Acabar~
49
50 {ROTULO}Mes8~
51 {ASIGNAR}VP-mes~d'agost~
52 {IR}Acabar~
53
54 {ROTULO}Mes9~
55 {ASIGNAR}VP-mes~de setembre~
56 {IR}Acabar~
57
58 {ROTULO}Mes10~
59 {ASIGNAR}VP-mes~d'octubre~
60 {IR}Acabar~
61
62 {ROTULO}Mes11~
63 {ASIGNAR}VP-mes~de novembre~
64 {IR}Acabar~
65
66 {ROTULO}Mes12~
67 {ASIGNAR}VP-mes~de desembre~
68
69 {ROTULO}Acabar~
70 {REGRESAR}
71
72
73
74 {ROTULO}Fugida~
75 {ANIDAR}{VARIABLE}viaMacros~DauCance~
Comentaris
Macro cridada des de la macro DAU_DATA.WPM.
1. {SI SE CANCELA}{IR} redirecciona la funció de la tecla de
cancel.lació cap al rètol "Fugida", que transfereix l'execució
a la macro DAUCANCE.WPM, que cancel.la el procediment i torna a
la macro matriu d'on parteix aquesta.
4. {;} comentari que ens avisa que tot seguit inicialitzarem els
paràmetres de la macro DAU_TEXT.WPM, que controla el valor de
les variables que ens serviran per definir el mes de la reunió.
5. {ASIGNAR} assigna a la variable "VP-missatge" el valor
"Escriviu el mes (en xifres)".
6. {ASIGNAR} inicialitza la variable "VP-resposta".
7. {ASIGNAR} assigna a la variable "VP-obliga" el valor "sí".
8. {ASIGNAR} assigna a la variable "vàlid" el valor "no".
9. {MIENTRAS} mentre el valor de la variable "númDeMes" no estigui
comprès entre 1 i 9 o el valor de la variable "vàlid" sigui
"no"...
11. ... {ANIDAR} transfereix l'execució a la macro DAU_TEXT.WPM, que
retorna una resposta després de rebre una pregunta.
12. {ASIGNAR} assigna a la variable "númDeMes" el valor de la
variable "VP-resposta".
13. {SI} si el valor de la variable "númDeMes" no està comprès entre
1 i 12 (com a valor numèric)...
14. {ASIGNAR} assigna a la variable "vàlid" el valor "no".
15. {DE OTRO MODO} altrament...
16. {ASIGNAR} assigna a la variable "vàlid" el valor "sí".
20. {IR} transfereix l'execució al rètol marcat com a "mesx", on "x"
serà un número entre 1 i 12. Aquest valor d'"x" estarà contingut
a la variable "númDeMes". Segons quina opció haguem triat, la
macro ens dirigirà a un rètol diferent
22. {ROTULO} declara el rètol "Mes1".
23. {ASIGNAR} assigna a la variable "VP-mes" el valor "de gener".
24. {IR} transfereix l'execució al rètol "acabar".
26. {ROTULO} declara el rètol "Mes2".
27. {ASIGNAR} assigna a la variable "VP-mes" el valor "de febrer".
28. {IR} transfereix l'execució al rètol "acabar".
30. {ROTULO} declara el rètol "Mes3".
31. {ASIGNAR} assigna a la variable "VP-mes" el valor "de març".
32. {IR} transfereix l'execució al rètol "acabar".
34. {ROTULO} declara el rètol "Mes4".
35. {ASIGNAR} assigna a la variable "VP-mes" el valor "d'abril".
36. {IR} transfereix l'execució al rètol "acabar".
38. {ROTULO} declara el rètol "Mes5".
39. {ASIGNAR} assigna a la variable "VP-mes" el valor "de maig".
40. {IR} transfereix l'execució al rètol "acabar".
42. {ROTULO} declara el rètol "Mes6".
43. {ASIGNAR} assigna a la variable "VP-mes" el valor "de juny".
44. {IR} transfereix l'execució al rètol "acabar".
46. {ROTULO} declara el rètol "Mes7".
47. {ASIGNAR} assigna a la variable "VP-mes" el valor "de juliol".
48. {IR} transfereix l'execució al rètol "acabar".
50. {ROTULO} declara el rètol "Mes8".
51. {ASIGNAR} assigna a la variable "VP-mes" el valor "d'agost".
52. {IR} transfereix l'execució al rètol "acabar".
54. {ROTULO} declara el rètol "Mes9".
55. {ASIGNAR} assigna a la variable "VP-mes" el valor "de setembre".
56. {IR} transfereix l'execució al rètol "acabar".
58. {ROTULO} declara el rètol "Mes10".
59. {ASIGNAR} assigna a la variable "VP-mes" el valor "d'octubre".
60. {IR} transfereix l'execució al rètol "acabar".
62. {ROTULO} declara el rètol "Mes11".
63. {ASIGNAR} assigna a la variable "VP-mes" el valor "de novembre".
64. {IR} transfereix l'execució al rètol "acabar".
66. {ROTULO} declara el rètol "Mes12".
67. {ASIGNAR} assigna a la variable "VP-mes" el valor "de desembre".
69. {ROTULO} declara el rètol "acabar".
70. {REGRESAR} retorna el control a la macro des d'on havíem cridat
aquesta.
74. {ROTULO} declara el rètol "fugida", que...
75. ... transfereix l'execució a la macro DAUCANCE.WPM, que
cancel.la l'execució de la macro, neteja la pantalla i
inicialitza les variables generals.
Josep Tordera, Lluís de Yzaguirre i Víctor Pàmies
Institut de Lingüística Aplicada (
Universitat "Pompeu Fabra")
Servei de Llengua Catalana (
Universitat de Barcelona)
corr-el: lluis punt deyzaguirre arrova upf punt edu