*: $Id: u-stamm.cpt 22162 2008-10-31 09:20:52Z ThB $
*: # u-stamm - Unterprogramme fuer d-wrtf und d-htmpop:
*:! u-stamm.apt generiert aus u-stamm.cpt (30.06.2011 22:35)
*: #(o : Anzeige von Unterfeldern in #4nd/e
*: #(r : Anzeige #3nr -> Ausgelagert nach u-3nr bzw. u-3nrflp
*: #(z : Anzeige #3nz/#4nz/#6nz
*: --------------------------------------------------------------------
*: Analyse der Spruenge, Unterprogramme und Includes:
*: Unterprogramme: #(o, #(q, #(z
*: Aufrufe: #>q
*: Sprungmarken: #-¦
*: Spruenge zu: #+¦
*: rel. Spruenge: +#ucc
*: Anwendervar.: #ucc, #ucd, #uce, #ucf
*: Zwischenteile 51, 52
*: --------------------------------------------------------------------
$Id: u-stamm.cpt 22162 2008-10-31 09:20:52Z ThB $
# u-stamm - Unterprogramme fuer d-wrtf und d-htmpop:
#(o : Anzeige von Unterfeldern in #4nd/e
#(r : Anzeige #3nr -> Ausgelagert nach u-3nr bzw. u-3nrflp
#(z : Anzeige #3nz/#4nz/#6nz
: $HeadURL: https://svn.extra.gymel.com/repos/allegro/acxt/enhancements/trunk/u-stamm.cpt $
: s/repos/viewvc/ for browseable view in the URL above
% Die Zwischenteile entsprechen denen fuer Definition Lists in HTML
% guenstige Setzungen etwa
% HTML RTF mit d-rtff
% 50=C '
' 50=C t61 50=C "\li850\fi-850 "
% 51='' C '- ' 51=t111 51="\cf0 "
% 52=C '
- ' 52=C t79 52=C "\cf6 "
% 53='' C '
- ' 53="" 53=""
% 54='
' C '
' C 54="" 54=""
%%%%%
% Individualisierungsinformation #4nd/#4ne aufbereiten
% (sofern 1:1-Importe von MAB 814/815)
#(o % Typische Nutzung
%
% #4nd +#J00 C >o
% #4ne C >o
% #J00
#nr dcc p" Info|" P>q Acc
#nr dcc p"aLebensdaten|" P>q Acc
#nr dcc p"bWirkungsdaten|" P>q Acc
#nr dcc p"nDaten ungef„hr|" P>q Acc
#nr dcc p"iBerufsbezeichnung|" P>q Acc
#nr dcc p"oBeruf/Funktion|" P>q Acc
#nr dcc p"jTitel|" P>q Acc
#nr dcc p"kDienstgrad|" P>q Acc
#nr dcc p"lTitel|" P>q Acc
#nr dcc p"cGeburtsort|" P>q Acc
#nr dcc p"dSterbeort|" P>q Acc
#nr dcc p"eWirkungsort|" P>q Acc
#nr dcc p"fGeschlecht|" P>q Acc
#nr dcc p"gNationalit„t|" P>q Acc
#nr dcc p"hSprache|" P>q Acc
#nr dcc p"mBeziehungen|" P>q Acc
#nr dcc p"uSonstige Daten|" P>q Acc
#ucc dcc Z
#)o
%%%%%
#(q % Iternes Unterprogramm zu #(o
#ucc dcd dce dcf y0 e1 p"" =cd
#4nd p" " Ace
#4ne p" " Ace
#-¦
#uce y0 b"#ucd" e"" f32 F32 b0 p"" Acf
#uce b"#ucd" b"" p"" ,"_v_;_" e"" f"; " F32 b0 p" (" P")"
#uce +¦ dce b"#ucd" b"" p"" Ace
#ucf +#ucc y0 dcf ,"_ __" ,"_ __" ,"___" f"" F"" b0 acf
#)q
% Also Ausgabe
#ucc dcc b1 e"|" r14 P": " p52 P51
#ucf dcf ,"__; _"
#)q
%%%%%
% Anzeige #3nz/#4nz/6nz
#(z % Typische Nutzung
%
% #6nz C >z
#cc p{t52 " Anmerkungen: " t51} e"" b0
#cc a p{t52 " Quelle: " t51}
#cc b p{t52 " Definition: " t51}
#cc c p{t52 " Bem./Ben.-Hinw.: " t51}
#cc d p{t52 " Red. Anmerkungen: " t51}
#cc e p{t52 " Erg.-los einges.: " t51}
#cc r p{t52 " Regelw. d. Ans.: " t51}
#cc S p{t52 " DB-Sachgrp.: " t51}
#cc P "(Erfassung: " P")" P>R =cc
#)z
## Ende von u-stamm ##
*:
*: --- Ende von u-stamm.apt ---
*:
*: INDEX
*: =====
*:
*: Unterprogramme
*: #(o 39(!)
*: #(q 45, 46, 47, 48, 50, 51, 52, 53, 54, 56, 57, 58, 60, 61, 62,
*: 64, 66, 72(!)
*: #(z 92(!)
*:
*: Sprungmarken
*: #-¦ <166> 76(!), 79
*:
*: Anwendervariable
*: #ucc 45(d), 45(A), 46(d), 46(A), 47(d), 47(A), 48(d), 48(A),
*: 50(d), 50(A), 51(d), 51(A), 52(d), 52(A), 53(d), 53(A), 54(d),
*: 54(A), 56(d), 56(A), 57(d), 57(A), 58(d), 58(A), 60(d), 60(A),
*: 61(d), 61(A), 62(d), 62(A), 64(d), 64(A), 66(d), 66(A), 67, 67(d),
*: 73, 81(+), 85, 85(d)
*: #ucd 73(d), 73(=), 77(b), 78(b), 79(b)
*: #uce 73(d), 74(A), 75(A), 77, 78, 79, 79(d), 79(A)
*: #ucf 73(d), 77(A), 81, 81(d), 81(a), 86, 86(d)
*:
*: lokale Spruenge
*: +#ucc 81
*:
*: Kategorien
*: #4nd 74
*: #4ne 75
*:
*: Zwischenteile
*: 51 85, 95, 96, 97, 98, 99, 100, 101, 102
*: 52 85, 95, 96, 97, 98, 99, 100, 101, 102