home *** CD-ROM | disk | FTP | other *** search
/ Best of German Only 1 / romside_best_of_german_only_1.iso / anwender / zephyr / zephyr4s.2 / BEISPIEL.EXE / lha / LIBRARY.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1993-03-13  |  23KB  |  576 lines
  1. @ 0,65 SAY SPACE(15) COLOR &c_yellow.
  2. IF "" = TRIM(&key.) .OR. READKEY() < 256
  3. LOOKUP_OK
  4. SHO_LOOK
  5. INIT_FLD
  6. GET_DATA
  7. REC_IS_DUPSAV_DATA
  8. PRECORD_NUM
  9. hlen: <
  10.  oder Anfangsbuchstabe einer Option eingeben 
  11. ==  MEN
  12. AUSWAHL  ==
  13. ndern
  14. Datensatz l
  15. schen
  16. -------------------
  17. chster Datensatz
  18. Vorh. Datensatz
  19. Erster Datensatz
  20. Letzter Datensatz
  21. berspringen
  22. Suchen
  23. -------------------
  24. Tabellendarstellung
  25. Berichte
  26. Filterbedingung
  27. RECHNUNG
  28. Indexieren
  29. Hilfe
  30. Programm beenden
  31. ====== AUSGABE AUF: ======
  32.  Drucker
  33.  Textdatei
  34.  Bildschirm
  35. ck in MEN
  36. AUSWAHL
  37. ============ BERICHTE ==========
  38.  Bericht:     
  39.  Etiketten:   
  40. NICHT VERF
  41.  Anw.bericht: 
  42. NICHT VERF
  43. ck in MEN
  44. AUSWAHL
  45. DO Barpop
  46. DO Barpop_r
  47. DO Barpop_d
  48. DEFINE WINDOW alert      FROM 15, 3 TO 22,46 PANEL COLOR &c_alert.
  49. DEFINE WINDOW duplicat   FROM 15, 5 TO 21,70 PANEL COLOR &c_alert.
  50. DEFINE WINDOW lister     FROM  5, 5 TO 22,70 PANEL COLOR &c_list.
  51. DEFINE WINDOW look       FROM  6, 5 TO 16,65 PANEL COLOR &c_list.
  52. DEFINE WINDOW memo_windo FROM 17,12 TO 23,75 PANEL COLOR &c_list.
  53. MAIN_MNU
  54. DEST_MNU
  55. RPT_MNU
  56. MLIST
  57. UPCUST_RPT
  58. SET COLOR TO &c_standard.
  59. SET COLOR TO &c_popup.
  60. ADD_NEW
  61. ERASER
  62. SKIP_REC
  63. FIND_REC
  64. UPKEYNAME1
  65. PKEY2
  66. MKEYNAME2
  67. KEYNAME3
  68. LIST_REC
  69. PRE_REPT
  70. RPT_MNU
  71. SCREEN
  72. FILTER
  73. KOUNT
  74. OLD_TAG
  75. NET_CHOICEINDEXER
  76. HELPER
  77. LOAD_FLD
  78. DSTATUS
  79. SHOW_DATA
  80. SET COLOR TO &c_popup.
  81. --------- ANLEGEN EINER TEXTDATEI --------
  82.  Textdateiname eingeben: 
  83.  Dateiname kann bis zu 8 Zeichen lang sein
  84. SET ALTERNATE TO &answer.
  85. SET COLOR TO &c_standard.
  86. SET COLOR TO &c_standard.
  87. PRT_MENU
  88. PRINTOUT
  89. ANSWER
  90. ALERT
  91. PLENGTH
  92. RMARGIN
  93. UPRECORD_NUMx
  94. SET COLOR TO &c_popup.
  95. LISTING
  96. LABELS
  97. CUSTOM
  98. ----------- ANWENDERBERICHTE -----------
  99.  Name des Anw.berichtes: 
  100. Standard-Anw.bericht 
  101. bernehmen oder neuen Dateiname eingeben
  102. ltiger Dateiname, Eingabe wiederholen
  103.  ACHTUNG! Anw.berichte k
  104. nnen nur auf 
  105.  Drucker ausgegeben werden
  106. SET COLOR TO &c_popup.
  107. SET COLOR TO &c_popup.
  108. REPORTYPE
  109. DEST_MNU
  110. ALERT
  111. RPT_NAME
  112. CUST_RPT
  113. --------------- L
  114. SCHEN ------------------
  115.     L
  116. SCHEN markierter Datens
  117. tze .... 
  118.     Bitte warten ... NICHT AUSSCHALTEN
  119. ERASED
  120. NET_CHOICEALERT
  121. PREST_ENV
  122. ndern
  123. -------------DOPPELTE 
  124.  SCHL
  125. SSELEINGABE --------
  126.                Doppelte Schl
  127. ssel nicht erlaubt
  128. KUNDEN
  129. Dies ist der bereits BESTEHENDE Datensatz - Neueingabe der Kunden-Nr.
  130. HAENDLER
  131. Dies ist der bereits BESTEHENDE Datensatz - Neueingabe der H
  132. ndler-Nr.
  133. WAREN
  134. Dies ist der bereits BESTEHENDE Datensatz - Neueingabe der Artikel-Nr.
  135. RECHNUNG
  136. Dies ist der bereits BESTEHENDE Datensatz - Neueingage der Rechnungs-Nr.
  137.      Weiter mit LEERTASTE ...
  138. REC_IS_DUPRECORD_NUMDUPLICAT
  139. PWARNBELL
  140. PKUND_NR
  141. MKUNDE
  142. MHAENDL_NR
  143. HAENDL
  144. ART_NR
  145. ART_BEZ
  146. RECHN_NR
  147. RECHN_DAT
  148. @ 0,41 SAY "Filter ist EIN" COLOR &c_blink. 
  149. SET COLOR TO &c_standard.
  150. @ 0,59 SAY "Satznummer #" + STR(RECNO(),5,0) COLOR &c_yellow.
  151. FILTERS_ON
  152. ACHTUNG - Datensatz wurde gel
  153. Daten wurden ge
  154. ndert-Anzeige der revidierten Daten
  155. IF "" = TRIM(&key.) .OR. READKEY() < 256
  156. LOOKUP_OK
  157. SHO_LOOK
  158. RD_NUMRECORD_NUMREADY
  159. WARNBELL
  160. PSHOW_MSG
  161. MSHOW_DATA
  162. LOAD_FLD
  163. GET_DATA
  164. SAV_DATA
  165. ----------- DATENSATZ L
  166. SCHEN ------------
  167.  Datensatz l
  168. schen (J=Ja, N=Nein)
  169. ANSWER
  170. ALERT
  171. PFILTERS_ONERASED
  172. ------------- DATEN FILTERN --------------
  173.        Filter ist im Moment aktiv!
  174.            Filter ausschalten?     
  175.          (A=Ausschalten, N=Nein)  
  176.             Filtern von Daten          
  177. chten Sie das Definieren von Filter- 
  178.   bedingungen fortsetzen (J/N)? 
  179. ALERT
  180. FILTERS_ONCHOICE
  181. _ONBARPOP
  182. Vorwahl
  183. --------- SUCHE DER TELEFONVORWAHL -------
  184. Ort: F
  185.  wurde
  186. in der Datenbank NICHT GEFUNDEN!
  187. Die VORWAHL F
  188. ist f
  189. ACITY
  190. VORWAHL
  191. ONORT
  192. _ONACODE
  193. ALERT
  194. PVORW
  195. MWARNBELL
  196. Kunden
  197. ---------- SUCHE DER KUNDEN-NR. ----------
  198. Kunden-Nr.: F
  199. in der Datenbank NICHT GEFUNDEN!
  200. Kunde:      F
  201. Telefon:    
  202. r Nr.:    F
  203.   Weiter mit LEERTASTE ...... 
  204. CUSTID
  205. KUNDEN
  206. _ONACUST
  207. _ONALERT
  208. KUNDE
  209. PKUND_NR
  210. MWARNBELL
  211. TELEFON
  212. target1 = IIF(TYPE(key1) = "C", SPACE(LEN(&key1.)), {  .  .  })
  213. KEINE
  214. target2 = IIF(TYPE(key2) = "C", SPACE(LEN(&key2.)), {  .  .  })
  215. KEINE
  216. target3 = IIF(TYPE(key3) = "C", SPACE(LEN(&key3.)), {  .  .  })
  217. -------- EINGABE DER SUCHKRITERIEN -------
  218. Eingabe 
  219. KEINE
  220. KEINE
  221. Eingabe eines Teils oder aller Daten
  222. KEINE
  223. KEINE
  224.   .  .
  225. Gesuchter Datensatz NICHT GEFUNDEN!
  226. KEYNAME1
  227. NKEY2
  228. _ONKEYNAME2
  229. NKEY3
  230. KEYNAME3
  231. PTARGET1
  232. MTARGET2
  233. TARGET3
  234. ALERT
  235. TARGET
  236. RECORD_NUMWARNBELL
  237. SHOW_MSG
  238. Waren
  239. ---------- SUCHE 
  240. BER ARTIKELCODE --------
  241. Artikel-Nr.:  F
  242. Datensatz NICHT GEFUNDEN! 
  243. r Nr. :     
  244. Artikel :     F
  245. Lagerbestand: F
  246. Preis (DM):   
  247. 99,999.99
  248.  Weiter mit LEERTASTE ..... 
  249. PARTID
  250. WAREN
  251. _ONP_NAME
  252. NALERT
  253. ART_BEZ
  254. PART_NR
  255. MWARNBELL
  256. LAGERBEST
  257. PREIS
  258. Haendler
  259. ----------- H
  260. NDLERINFORMATION -----------
  261. ndler-Nr.: F
  262. Datensatz NICHT GEFUNDEN!
  263. NDLER:     F
  264. Telefon:     
  265. r Nr.:     
  266.    Weiter mit LEERTASTE ..... 
  267. VENDR
  268. HAENDLER
  269. _ONV_NAME
  270. NALERT
  271. HAENDL
  272. PHAENDL_NR
  273. WARNBELL
  274. TELEFON
  275.                              --  HILFEMEN
  276.    AUSWAHLMEN
  277.     Auswahl             Arbeitsschritt
  278.   Anf
  279. gen              Neuen Datensatz in die Datenbank aufnehmen
  280. ndern               Aktuellen Datensatz bearbeiten
  281.   Datensatz l
  282. schen    L
  283. schen des aktuellen Datensatzes aus der Datenbank
  284. chster Datensatz   Zum n
  285. chsten Datensatz springen
  286.   Vorh. Datensatz      Zum vorigen Datensatz zur
  287. ckspringen
  288.   Erster Datensatz     Zum ersten Datensatz springen
  289.   Letzter Datensatz    Zum letzten Datensatz springen
  290. berspringen         Um # Datens
  291. tze vorw
  292. rts oder r
  293. rts springen
  294.   Suchen               Datens
  295. ber Schl
  296. sselfelder suchen
  297.   Tabellendarstellung  Auflistung der Datens
  298. tze auf dem Bildschirm
  299.   Berichte             Berichte und Etiketten auf Drucker/Bildschirm ausgeben
  300.   Filterbedingung      Datens
  301. tze entsprechend der W
  302. nsche filtern
  303.                        f
  304. r Bildschirm-und Druckerausgaben, Korrektur, etc.
  305. hlen               Z
  306. hlt Anzahl der Datens
  307. tze in der Datenbank
  308.   Indexieren           Indexdateien erstellen oder wiederherstellen
  309.   Programm beenden     Die Anwendung FIRMA beenden
  310. ENDE DES HILFEMEN
  311. S - Weiter Taste, nicht <ESC>! ..... 
  312. ----------- ANZAHL DATENS
  313. TZE ------------
  314. Es wird gez
  315. hlt! Bitte warten! .....
  316. Anzahl der Datens
  317. tze: F
  318.  Weiter mit beliebiger Taste .....
  319. RECORD_NUMALERT
  320. NFILTERS_ONKOUNT
  321. @ 0,0 SAY "------------------ AUFLISTUNG DER DATENS
  322. TZE ----------------"  COLOR &c_red.
  323. LIST OFF NEXT 10 &list_flds.
  324.    Weiter mit LEERTASTE oder mit Z zur
  325. ck in MEN
  326. AUSWAHL
  327. RECORD_NUMLISTER
  328. NANSWER
  329.  wurde nicht gefunden in 
  330. dB-Datei: 
  331. Keine 
  332. hnlichen F
  333.  gefunden - 
  334. Mit R: R
  335. ckkehr zur Eingabe
  336. Mit LEER weiter, oder mit R zur
  337. ck zur Eingabe
  338. SIMILAR
  339. UMLOOK_NAME
  340. LOOK_DBF
  341. NANSWER
  342. LISTCOUNT
  343. --------- EINGABEFEHLER:  UNG
  344. LTIGE F
  345.  ---------
  346.    Dies ist eine Auflistung 
  347. hnlicher FF
  348. -Nummern 
  349. AUFTRAG
  350. KUND_NR
  351. ART_NR
  352. PERSNR
  353. WAREN
  354. RECHNUNG
  355. RETURN not_valid = .NOT. FOUND((look_dbf))
  356. L_TARGET
  357. MLOOK_DBF
  358. LOOK_NAME
  359. MATCHCHARSLOOK
  360. WARNBELL
  361. PANSWER
  362. SIMILAR
  363. LISTCOUNT
  364. KUND_NR
  365. RSART_NR
  366. ARSPERSNR
  367. ARSHAENDL_NR
  368. LOOK_MSG
  369. NOT_VALID
  370.  wird benutzt von: 
  371.  wird von einem anderen Anwender benutzt
  372.  Datensatz wurde gesperrt von: F
  373. Datei mu
  374.  auf EXCLUSIVE gesetzt sein
  375.  Unbekannter Fehler: FH
  376. ------------ NETZWERK FEHLER ------------
  377. Weiter mit LEERTASTE 
  378.  - oder mit Esc Netzwerk verlassen
  379. ERR_NUMBERMESSAGE
  380. ERDBF
  381. _NAME
  382. WARNBELL
  383. RALERT
  384. NET_CHOICE
  385. LISTING
  386. REPORT FORM &dbf.
  387. LABELS
  388. LABEL FORM &dbf.
  389. CUSTOM
  390. DO &rpt_name.
  391. REPORTYPE
  392. RECORD_NUM
  393. J oder N eingeben
  394. Weitere Optionen - LEERTASTE
  395. NONE    
  396. PICA     
  397. @ 0, 0 SAY "------------------------- DRUCK MEN
  398.  ---------------------------"  COLOR &c_red.
  399. Seitenformat:
  400. =============
  401. Linker Rand       
  402. Linker Rand       
  403. Rechter Rand      
  404. Einzug            
  405. Seitenl
  406. nge       
  407. Zeilenabstand     
  408. Druckeinstellung:
  409. =================
  410. Druckbeginn auf Seite   
  411. Druckende auf Seite     
  412. Anzahl der Kopien       
  413. Seitenvorschub          
  414. @M BEFORE, AFTER, BOTH, NONE
  415. Papierwechsel pro Seite 
  416. Schriftart              
  417. @M DEFAULT,PICA,ELITE,CONDENSED
  418. nschrift            
  419. Mit PgDn Standardeinstellungen f
  420. r Ausdruck 
  421. bernehmen
  422. SET COLOR TO &c_standard.
  423. MSG_LOGIC
  424. MSG_ENUM
  425. MLOFFSET
  426. LMARGIN
  427. RRMARGIN
  428. INDENT
  429. ICEPLENGTH
  430. CEPSPACING
  431. PBPAGE
  432. PCOPIES
  433. PEPAGE
  434. RSPEJECT
  435. ARSPWAIT
  436. ARSPQUALITY
  437. PPITCH
  438. LISTER
  439. SET COLOR TO &c_standard.
  440. SET SCOREBOARD &scor.
  441. SET DELIMITERS &deli.
  442. SET HELP &hellp.
  443. SET CLOCK &clock.
  444. SET ESCAPE &esca.
  445. SET DELETED &delee.
  446. SET HEADING &head.
  447. SET STATUS &stat.
  448. SET SAFE