|
DataMuseum.dkPresents historical artifacts from the history of: Regnecentalen RC-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Regnecentalen RC-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2972 (0xb9c)
Types: TextFile
Notes: UNIX file
Names: »mmerge.add2«
└─⟦c93a30372⟧ Bits:30004169/disk3.imd Uniplex II+ V.6 release 1.0 (dansk)
└─⟦c93a30372⟧ UNIX Filesystem
└─⟦this⟧ »up/new/usr/UAP/ufill/ubld/mmerge.add2«
#help
TILF▶9d◀J ADRESSE
Udfyldelse af formularen:
N▶86◀r sk▶91◀rmformularens felter er udfyldt trykkes <ESC> e eller UDF▶9d◀R.
Uniplex opretter adressen i adresseregisteret og viser sk▶91◀rmformularen
igen.
Der kan derefter oprettes adresser for flere personer som beskrevet
ovenfor.
N▶86◀r alle adresser er oprettet trykkes <ESC> a eller AFBRYD.
))
:II+ COMPILED
:TITLE
T I L F ▶9d◀ J A D R E S S E
:SCREEN
screen lines : 14
10 5 1 Navn p▶86◀ adresseregister:
6 7 1 ▶1b◀[DAAAAAAAAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAF
6 8 1 ▶1b◀[B▶1b◀ ▶1b◀[B▶1b◀ ▶1b◀[B
6 9 1 ▶1b◀[B▶1b◀ Fornavn ▶1b◀[B▶1b◀ ▶1b◀[B
6 10 1 ▶1b◀[B▶1b◀ Fulde navn ▶1b◀[B▶1b◀ ▶1b◀[B
6 11 1 ▶1b◀[B▶1b◀ Stilling ▶1b◀[B▶1b◀ ▶1b◀[B
6 12 1 ▶1b◀[B▶1b◀ Firmanavn ▶1b◀[B▶1b◀ ▶1b◀[B
6 13 1 ▶1b◀[B▶1b◀ ▶1b◀[B▶1b◀ ▶1b◀[B
6 14 1 ▶1b◀[B▶1b◀ Adresse ▶1b◀[B▶1b◀ ▶1b◀[B
6 15 1 ▶1b◀[B▶1b◀ ▶1b◀[B▶1b◀ ▶1b◀[B
6 16 1 ▶1b◀[B▶1b◀ ▶1b◀[B▶1b◀ ▶1b◀[B
6 17 1 ▶1b◀[B▶1b◀ ▶1b◀[B▶1b◀ ▶1b◀[B
6 18 1 ▶1b◀[B▶1b◀ ▶1b◀[B▶1b◀ ▶1b◀[B
6 19 1 ▶1b◀[B▶1b◀ ▶1b◀[B▶1b◀ ▶1b◀[B
6 20 1 ▶1b◀[JAAAAAAAAAAAAAAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAH
:LABELS
Label lines : 9
i labx laby lpage llen itype itbnum iprompt idefval label width
CHARS: charset reply prompt wrap
DEC : dec_pl min max
DATES:No output
0 37 5 1 29 C 1 $(1) docname 0
CHAR 0 -1
1 28 9 1 20 C 0 Angiv fornavn (eks: Peter) name 0
CHAR 0 -1
2 28 10 1 40 C 0 Angiv det fulde navn og evt. titel (eks: Hr. Peter Post) formal 0
CHAR 0 -1
3 28 11 1 40 C 0 Angiv stillingsbetegnelse title 0
CHAR 0 -1
4 28 12 1 40 C 0 Angiv firmanavn company 0
CHAR 0 -1
5 28 14 1 40 C 0 Angiv adresse add1 0
CHAR 0 -1
6 28 15 1 40 C 0 Angiv adresse add2 0
CHAR 0 -1
7 28 16 1 40 C 0 Angiv adresse add3 0
CHAR 0 -1
8 28 17 1 40 C 0 Angiv adresse add4 0
CHAR 0 -1
9 28 18 1 40 C 0 Angiv adresse add5 0
CHAR 0 -1
:MAPS
Map lines : -1
i type label compar data map to
:COMMANDS
Hold pause clear reset:
1 0 0 1
Command: 15
if test -f "$(docname)" ; then
echo "$(name)" >> "$(docname)"
echo "$(formal)" >> "$(docname)"
echo "$(title)" >> "$(docname)"
echo "$(company)" >> "$(docname)"
echo "$(add1)" >> "$(docname)"
echo "$(add2)" >> "$(docname)"
echo "$(add3)" >> "$(docname)"
echo "$(add4)" >> "$(docname)"
echo "$(add5)" >> "$(docname)"
echo " " >> "$(docname)"
echo " " >> "$(docname)"
echo "." >> "$(docname)"
else
echo "Opgave findes ikke: $(docname)"
fi
:END