+ if (((recindex = rec_index("art", REC_A)) != -1) && valA[recindex] && strlen(valA[recindex])) {
+ fprintf(fbeleg, "\n\n");
+ fprintf(fbeleg, "\n Begleitzettel\n\n");
+ fprintf(fbeleg, "\n Belegloser Datentraegeraustausch\n\n");
+ if (valA[recindex][0] == 'L')
+ fprintf(fbeleg, "\n Sammeleinziehungsauftrag\n\n");
+ else if (valA[recindex][0] == 'G')
+ fprintf(fbeleg, "\n Sammelueberweisungsauftrag\n\n");
+ else
+ fprintf(fbeleg, "\n Sammelauftrag\n\n");
+ fprintf(fbeleg, "\n VOL ........................:\n");
+ fprintf(fbeleg, "\n Erstellungsdatum ...........: %s\n", get_date());
+ }