home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0040 - 0049 / ibm0040-0049 / ibm0040.tar / ibm0040 / WINBASE2.ZIP / EXAMPLES.EXE / DEMO / ORDERS.TXT < prev    next >
Encoding:
Text File  |  1991-08-07  |  6.1 KB  |  363 lines

  1. FORM ORDERS   
  2.  
  3. COLOR 7 
  4. EXECUTE_MODE CONCURRENT 
  5. DDE_SERVER 
  6. AUTO_COMMMIT USE_DEFAULT 
  7.  
  8. QUERY REFERENCE JNKMAIN SELECT DUMMYCOL
  9. FROM DEMO.DUMMY
  10.  
  11.  
  12.  
  13.   
  14. END_QUERY 
  15.  
  16. QUERY INPUT ORDERS SELECT *
  17. FROM DEMO.TRANSACT
  18. WHERE CNO = :CNO AND TRANSTYPE='ORDER'
  19.  
  20.  
  21.  
  22.   
  23. END_QUERY 
  24.  
  25. QUERY INPUT LINE SELECT *
  26. FROM DEMO.LINE
  27. WHERE ONO=:ONO 
  28.  
  29.  
  30.  
  31.   
  32. END_QUERY 
  33.  
  34. BITMAP 98 3 608 413 
  35. FILE C:\WINBASE\DEMO\LOGO.PCX 
  36.  
  37. BOX 20 332 1544 637 
  38. TITLE CUSTOMER INFORMATION 
  39.  
  40. BOX 1576 332 2051 637 
  41. TITLE Form Control 
  42.  
  43. BOX 16 683 1963 1398 
  44. TITLE ORDERS 
  45.  
  46. LINE 117 965 1836 965 
  47.  
  48. LINE 1466 1300 1827 1300 
  49.  
  50. REPEATED 117 965 1833 1300 
  51. QUERY_NAME LINE 
  52.  
  53. ENTRY 380 26 2054 159 
  54. DATA_TYPE CHARACTER 
  55. QUERY_NAME JNKMAIN 
  56. TYPE EXPRESSION 
  57. EXPRESSION 'CUSTOMER ORDER FORM' 
  58. JUSTIFICATION CENTER 
  59. COLOR 1 
  60. STYLE 7 
  61. FONT 32 Tms Rmn 
  62.  
  63. ENTRY 436 192 1216 270 
  64. DATA_TYPE CHARACTER 
  65. QUERY_NAME JNKMAIN 
  66. TYPE EXPRESSION 
  67. EXPRESSION 'Enter Customer Number:' 
  68. JUSTIFICATION RIGHT 
  69. COLOR 4 
  70. STYLE 1 
  71. FONT 17 Helv 
  72.  
  73. ENTRY 1245 202 1456 270 
  74. DATA_TYPE SMALL_INTEGER 
  75. QUERY_NAME JNKMAIN 
  76. TYPE INPUT 
  77. EXPRESSION 10 
  78. CELL_NAME CNO 
  79. ENTRY_NUM 1 
  80. ENTERABLE TRUE 
  81. SEARCHABLE DEMO.CUST CUSTNO 
  82. ZOOM_FORM CUST 
  83. VALIDATION MUST_MATCH DEMO.CUST CUSTNO 
  84. INVALID Customer does not exist 
  85. JUSTIFICATION LEFT 
  86. GROUPING 
  87. EXPO_START 13 
  88.  
  89. ENTRY 120 361 1459 445 
  90. DATA_TYPE CHARACTER 
  91. QUERY_NAME JNKMAIN 
  92. TYPE EXPRESSION 
  93. EXPRESSION MATCHROW(':CNO','NAME','') 
  94. JUSTIFICATION LEFT 
  95. COLOR 1 
  96. STYLE 1 
  97. FONT 17 Tms Rmn 
  98.  
  99. ENTRY 120 445 1459 533 
  100. DATA_TYPE CHARACTER 
  101. QUERY_NAME JNKMAIN 
  102. TYPE EXPRESSION 
  103. EXPRESSION MATCHROW(':CNO','ADDRESS','') 
  104. JUSTIFICATION LEFT 
  105. COLOR 1 
  106. STYLE 1 
  107. FONT 17 Tms Rmn 
  108.  
  109. ENTRY 120 533 1459 618 
  110. DATA_TYPE CHARACTER 
  111. QUERY_NAME JNKMAIN 
  112. TYPE EXPRESSION 
  113. EXPRESSION CONCAT(MATCHROW(':CNO','CITY',''),', ',MATCHROW(':CNO','STATE',''),'. ',MATCHROW(':CNO','ZIP','')) 
  114. JUSTIFICATION LEFT 
  115. COLOR 1 
  116. STYLE 1 
  117. FONT 17 Tms Rmn 
  118.  
  119. ENTRY 663 722 1060 787 
  120. DATA_TYPE CHARACTER 
  121. QUERY_NAME ORDERS 
  122. TYPE EXPRESSION 
  123. EXPRESSION 'ORDER NO' 
  124. JUSTIFICATION CENTER 
  125. STYLE 4 
  126.  
  127. ENTRY 1092 722 1489 787 
  128. DATA_TYPE CHARACTER 
  129. QUERY_NAME ORDERS 
  130. TYPE EXPRESSION 
  131. EXPRESSION 'ORDER DATE' 
  132. JUSTIFICATION CENTER 
  133. STYLE 4 
  134.  
  135. ENTRY 1511 722 1908 787 
  136. DATA_TYPE CHARACTER 
  137. QUERY_NAME ORDERS 
  138. TYPE EXPRESSION 
  139. EXPRESSION 'SHIP DATE' 
  140. JUSTIFICATION CENTER 
  141. STYLE 4 
  142.  
  143. ENTRY 29 796 618 868 
  144. DATA_TYPE CHARACTER 
  145. QUERY_NAME ORDERS 
  146. TYPE EXPRESSION 
  147. EXPRESSION CONCAT('#',CHAR(RECORDNUM,0),' OF ',CHAR(NUMRECS,0),' ORDER(S)') 
  148. JUSTIFICATION CENTER 
  149. COLOR 1 
  150. STYLE 1 
  151. FONT 14 Helv 
  152.  
  153. ENTRY 637 796 1086 871 
  154. DATA_TYPE CHARACTER 
  155. QUERY_NAME ORDERS 
  156. TYPE EXPRESSION 
  157. EXPRESSION TRANSNO 
  158. CELL_NAME ONO 
  159. JUSTIFICATION LEFT 
  160. COLOR 1 
  161. STYLE 1 
  162. FONT 14 Helv 
  163.  
  164. ENTRY 1121 796 1443 871 
  165. DATA_TYPE CHARACTER 
  166. QUERY_NAME ORDERS 
  167. TYPE EXPRESSION 
  168. EXPRESSION TRANSDATE 
  169. JUSTIFICATION LEFT 
  170. COLOR 1 
  171. STYLE 1 
  172. FONT 14 Helv 
  173.  
  174. ENTRY 1550 796 1872 855 
  175. DATA_TYPE DATE 
  176. QUERY_NAME ORDERS 
  177. DATABASE SHIPDATE 
  178. TYPE INPUT 
  179. EXPRESSION nulld 
  180. ENTRY_NUM 2 
  181. ENTERABLE TRUE 
  182. JUSTIFICATION CENTER 
  183. COLOR 1 
  184. STYLE 1 
  185. FONT 14 Helv 
  186. FORMAT MM/DD/YY 
  187.  
  188. ENTRY 127 887 380 952 
  189. DATA_TYPE CHARACTER 
  190. QUERY_NAME JNKMAIN 
  191. TYPE EXPRESSION 
  192. EXPRESSION 'PROD#' 
  193. JUSTIFICATION RIGHT 
  194.  
  195. ENTRY 403 887 933 952 
  196. DATA_TYPE CHARACTER 
  197. QUERY_NAME JNKMAIN 
  198. TYPE EXPRESSION 
  199. EXPRESSION 'DESCRIPTION' 
  200. JUSTIFICATION CENTER 
  201.  
  202. ENTRY 956 887 1157 952 
  203. DATA_TYPE CHARACTER 
  204. QUERY_NAME JNKMAIN 
  205. TYPE EXPRESSION 
  206. EXPRESSION 'QTY' 
  207. JUSTIFICATION RIGHT 
  208.  
  209. ENTRY 1180 887 1443 952 
  210. DATA_TYPE CHARACTER 
  211. QUERY_NAME JNKMAIN 
  212. TYPE EXPRESSION 
  213. EXPRESSION 'PRICE' 
  214. JUSTIFICATION RIGHT 
  215.  
  216. ENTRY 1456 887 1784 952 
  217. DATA_TYPE CHARACTER 
  218. QUERY_NAME JNKMAIN 
  219. TYPE EXPRESSION 
  220. EXPRESSION 'AMOUNT' 
  221. JUSTIFICATION RIGHT 
  222.  
  223. ENTRY 140 982 358 1047 
  224. DATA_TYPE SMALL_INTEGER 
  225. QUERY_NAME LINE 
  226. DATABASE PNO 
  227. TYPE INPUT 
  228. EXPRESSION PNO 
  229. CELL_NAME PNO 
  230. ENTRY_NUM 3 
  231. ENTERABLE TRUE 
  232. SEARCHABLE DEMO.PROD PRODNO 
  233. ZOOM_FORM PROD 
  234. VALIDATION MUST_MATCH DEMO.PROD PRODNO 
  235. INVALID Product must exist! 
  236. JUSTIFICATION RIGHT 
  237. STYLE 1 
  238. FONT 14 Helv 
  239. GROUPING 
  240. EXPO_START 13 
  241.  
  242. ENTRY 403 982 933 1047 
  243. DATA_TYPE CHARACTER 
  244. QUERY_NAME LINE 
  245. TYPE EXPRESSION 
  246. EXPRESSION MATCHROW(':PNO','DESCRIP','-none-') 
  247. JUSTIFICATION LEFT 
  248. COLOR 1 
  249. STYLE 1 
  250. FONT 14 Helv 
  251.  
  252. ENTRY 956 982 1157 1047 
  253. DATA_TYPE SMALL_INTEGER 
  254. QUERY_NAME LINE 
  255. DATABASE QTY 
  256. TYPE INPUT 
  257. EXPRESSION QTY 
  258. CELL_NAME QTY 
  259. ENTRY_NUM 4 
  260. ENTERABLE TRUE 
  261. JUSTIFICATION RIGHT 
  262. STYLE 1 
  263. FONT 14 Helv 
  264. GROUPING 
  265. EXPO_START 13 
  266.  
  267. ENTRY 1180 982 1443 1047 
  268. DATA_TYPE FLOAT 
  269. QUERY_NAME LINE 
  270. DATABASE PRICE 
  271. TYPE EXPRESSION 
  272. EXPRESSION MATCHROW(':PNO','LISTPRICE',0.0) 
  273. CELL_NAME PRICE 
  274. JUSTIFICATION RIGHT 
  275. COLOR 1 
  276. STYLE 1 
  277. FONT 14 Helv 
  278. SCALE 2 
  279. EXPO_START 13 
  280.  
  281. ENTRY 1466 982 1794 1047 
  282. DATA_TYPE DECIMAL 
  283. QUERY_NAME LINE 
  284. DATABASE AMT 
  285. TYPE EXPRESSION 
  286. EXPRESSION DEC(:PRICE * :QTY) 
  287. CELL_NAME AMT 
  288. JUSTIFICATION RIGHT 
  289. COLOR 1 
  290. STYLE 1 
  291. FONT 14 Helv 
  292. SCALE 2 
  293. GROUPING 
  294. EXPO_START 13 
  295.  
  296. ENTRY 29 1001 94 1076 
  297. DATA_TYPE CHARACTER 
  298. QUERY_NAME LINE 
  299. DATABASE ONO 
  300. TYPE EXPRESSION 
  301. EXPRESSION :ONO 
  302. JUSTIFICATION LEFT 
  303. COLOR 7 
  304. STYLE 1 
  305. FONT 14 Helv 
  306.  
  307. ENTRY 1053 1307 1450 1381 
  308. DATA_TYPE CHARACTER 
  309. QUERY_NAME ORDERS 
  310. TYPE EXPRESSION 
  311. EXPRESSION 'ORDER AMT:' 
  312. JUSTIFICATION RIGHT 
  313.  
  314. ENTRY 1456 1307 1788 1378 
  315. DATA_TYPE DECIMAL 
  316. QUERY_NAME ORDERS 
  317. DATABASE TRANSAMT 
  318. TYPE EXPRESSION 
  319. EXPRESSION SUM(:AMT) 
  320. CELL_NAME SUMORD 
  321. JUSTIFICATION RIGHT 
  322. COLOR 1 
  323. STYLE 1 
  324. FONT 14 Helv 
  325. SCALE 2 
  326. GROUPING 
  327. CURRENCY 
  328. EXPO_START 13 
  329.  
  330. BUTTON 1502 195 1755 280 
  331. TYPE SEARCH 
  332. TITLE &Search 
  333.  
  334. BUTTON 1619 377 1999 471 
  335. TYPE SAVE 
  336. TITLE SAVE CHANGES 
  337.  
  338. BUTTON 1619 501 1999 598 
  339. TYPE UNDO 
  340. TITLE CANCEL CHGS 
  341.  
  342. BUTTON 111 705 536 783 
  343. QUERY_NAME ORDERS 
  344. TYPE DELETE 
  345. TITLE Delete Order 
  346.  
  347. BUTTON 153 1303 553 1378 
  348. QUERY_NAME LINE 
  349. TYPE NEW 
  350. TITLE New Item 
  351.  
  352. BUTTON 579 1303 975 1378 
  353. QUERY_NAME LINE 
  354. TYPE DELETE 
  355. TITLE Delete Item 
  356.  
  357. SCROLL_BAR 1973 683 2048 1401 
  358. QUERY_NAME ORDERS 
  359.  
  360. SCROLL_BAR 1856 965 1937 1264 
  361. QUERY_NAME LINE 
  362.  
  363.