alias vclient { dialog -m vclient vclient } dialog vclient { title "View Client" size -1 -1 624 428 tab "Client", 501, 7 3 609 361 tab "Account", 502 tab "CO-Signer", 503 tab "Collector Notes", 504 tab "Collateral", 505 tab "Legal", 506 tab "Credit History", 507 button "<< Back to Database", 2, 431 365 116 24 button "Close", 3, 551 365 66 24 box "Account Information", 10, 11 26 602 40, tab 501 text "Account Number:", 11, 19 45 86 16, tab 501 icon 12, -5 391 643 37, $shortfn($mircdirsystem\bmp.bmp) edit "ID13", 13, 104 42 164 20, multi return tab 501 text "Record Type:", 14, 279 45 68 16, tab 501 edit "ID13", 15, 346 42 70 20, multi return tab 501 text "Customer Type:", 16, 425 45 76 16, tab 501 edit "ID13", 17, 502 42 102 20, multi return tab 501 box "Personal Information", 18, 11 70 602 136, tab 501 text "Full Name:", 19, 19 89 76 16, right tab 501 edit "ID13", 20, 96 86 260 20, return tab 501 text "Address:", 21, 19 109 74 16, right tab 501 edit "ID13", 22, 96 106 260 20, return tab 501 edit "ID13", 23, 96 126 260 20, return tab 501 edit "ID13", 24, 96 146 40 20, return tab 501 edit "ID13", 25, 136 146 130 20, return tab 501 edit "ID13", 26, 266 146 24 20, return tab 501 box "Tools", 27, 369 78 238 122, tab 501 button "Copy Entire Address to Clipboard", 28, 411 95 168 24, tab 501 edit "ID13", 29, 290 146 66 20, return tab 501 text "Home Phone:", 30, 19 181 74 16, right tab 501 edit "00000000012345", 31, 96 178 80 20, return tab 501 button "Verify Home Phone Number", 34, 411 169 168 24, tab 501 text "D.O.B:", 35, 173 181 40 16, right tab 501 box "Employer Information", 38, 11 206 602 80, tab 501 text "Company:", 39, 19 223 74 16, right tab 501 edit "ID13", 40, 96 222 260 20, return tab 501 text "Work Phone:", 41, 19 265 74 16, right tab 501 text "Address:", 42, 19 245 74 16, right tab 501 edit "ID13", 43, 96 242 260 20, return tab 501 box "Income Information", 9, 11 286 602 70, tab 501 edit "00000000012345", 32, 216 178 80 20, return tab 501 text "00 yrs.", 33, 299 181 34 16, tab 501 edit "00000000012345", 36, 96 262 80 20, return tab 501 text "Monthly:", 44, 19 305 74 16, right tab 501 edit "00000000012345", 45, 96 302 80 20, return tab 501 text "Other Income:", 46, 19 321 74 16, right tab 501 edit "00000000012345", 48, 96 322 80 20, return tab 501 text "Other Obligations:", 47, 181 305 92 16, right tab 501 edit "00000000012345", 49, 274 302 80 20, return tab 501 text "Own/Rent Code:", 50, 181 325 92 16, right tab 501 edit "00000000012345", 51, 274 322 80 20, return tab 501 box "Tools", 52, 369 214 238 64, tab 501 button "Browse Yellowpages", 53, 411 237 168 24, tab 501 box "Tools", 54, 369 294 238 56, tab 501 button "Calculator", 55, 411 313 168 24, tab 501 box "Account Codes", 1, 11 26 602 64, tab 502 text "Loan Type Code:", 4, 19 45 86 16, right tab 502 edit "ID13", 5, 106 42 44 20, multi return tab 502 text "Lending Officer Code:", 6, 159 45 112 16, right tab 502 edit "ID13", 7, 272 42 44 20, multi return tab 502 text "Dealer Code:", 8, 323 45 78 16, right tab 502 edit "ID13", 37, 404 42 196 20, multi return tab 502 text "Account Status Code:", 56, 19 65 108 16, right tab 502 edit "ID13", 57, 128 62 44 20, multi return tab 502 text "Charge-off Reason Code:", 58, 177 65 130 16, right tab 502 edit "ID13", 59, 308 62 44 20, multi return tab 502 text "DPS ID/Recoverer Code:", 60, 357 65 128 16, right tab 502 edit "ID13", 61, 486 62 114 20, multi return tab 502 box "Dates", 62, 11 92 602 66, tab 502 text "Receipt Date:", 63, 19 109 86 16, right tab 502 edit "CCYYMMDD", 64, 106 106 76 20, multi return tab 502 text "Last Payment Date:", 66, 201 109 104 16, right tab 502 edit "CCYYMMDD", 67, 308 106 74 20, multi return tab 502 text "Charge-off Date:", 68, 405 109 102 16, right tab 502 edit "CCYYMMDD", 69, 508 106 80 20, multi return tab 502 box "Loan Information", 65, 11 160 602 194, tab 502 text "Contract Date:", 70, 19 131 86 16, right tab 502 edit "CCYYMMDD", 71, 106 128 76 20, multi return tab 502 text "Interest Rate:", 72, 19 177 86 16, right tab 502 edit "CCYYMMDD", 73, 106 174 76 20, multi return tab 502 text "Accrued Interest:", 74, 185 177 96 16, right tab 502 edit "CCYYMMDD", 75, 282 174 76 20, multi return tab 502 text "Current Balance:", 78, 19 197 86 16, right tab 502 edit "CCYYMMDD", 79, 106 194 76 20, multi return tab 502 text "Associated Costs:", 80, 19 217 86 16, right tab 502 edit "CCYYMMDD", 81, 106 214 76 20, multi return tab 502 text "Next Payment Date:", 84, 203 131 104 16, right tab 502 edit "CCYYMMDD", 85, 308 128 74 20, multi return tab 502 text "Monthly Payment:", 86, 15 237 90 16, right tab 502 edit "CCYYMMDD", 87, 106 234 76 20, multi return tab 502 box "Comments", 76, 187 192 420 128, tab 502 list 77, 190 206 414 108, extsel hsbar vsbar size tab 502 text "Last Comment Date:", 82, 427 329 104 16, right tab 502 edit "CCYYMMDD", 83, 532 326 76 20, multi return tab 502 text "Charge-off Amt:", 88, 15 257 90 16, right tab 502 edit "CCYYMMDD", 89, 106 254 76 20, multi return tab 502 text "Last Contact Date:", 90, 405 131 102 16, right tab 502 edit "CCYYMMDD", 91, 508 128 80 20, multi return tab 502 text "Commision Rate:", 92, 363 177 96 16, right tab 502 edit "CCYYMMDD", 93, 460 174 76 20, multi return tab 502 text "Recovery Score:", 94, 13 283 92 16, right tab 502 edit "CCYYMMDD", 95, 106 280 76 20, multi return tab 502 text "Customer ID:", 96, 13 303 92 16, right tab 502 edit "CCYYMMDD", 97, 106 300 76 20, multi return tab 502 box "Notes:", 98, 11 26 602 300, tab 504 list 99, 14 40 594 282, vsbar size tab 504 button "&Hide", 100, 0 0 0 0, hide Ok } on *:dialog:vclient:init:0:{ did -c vclient 502 }