g$t~@_owgGG[c] H'.00* PLATFORMCUNIQUEIDC TIMESTAMPN OBJTYPENOBJCODENNAMEM"EXPRM&VPOSN* HPOSN3 HEIGHTN< WIDTHNE STYLEMNPICTUREMRORDERMVUNIQUELZCOMMENTM[ENVIRONL_BOXCHARC`FILLCHARCaTAGMbTAG2MfPENREDNjPENGREENNoPENBLUENtFILLREDNyFILLGREENN~FILLBLUENPENSIZENPENPATNFILLPATNFONTFACEMFONTSTYLENFONTSIZENMODENRULERNRULERLINESNGRIDLGRIDVNGRIDHNFLOATLSTRETCHLSTRETCHTOPLTOPLBOTTOMLSUPTYPENSUPRESTNNOREPEATLRESETRPTNPAGEBREAKLCOLBREAKLRESETPAGELGENERALNSPACINGNDOUBLELSWAPHEADERLSWAPFOOTERLEJECTBEFORLEJECTAFTERLPLAINLSUMMARYLADDALIASLOFFSETNTOPMARGINNBOTMARGINNTOTALTYPENRESETTOTALNRESOIDNCURPOSLSUPALWAYSLSUPOVFLOWLSUPRPCOLNSUPGROUPNSUPVALCHNGLSUPEXPRMUSERM WINDOWS _QNT0JSXJ8 610765928 1 53" 1.000 0.000 21.00060000.000 F   1 9 11F1212 TF T T WINDOWS _QNT0JSXJE 9 1 313.000 0.000 T FFF F WINDOWS _QNT0JSXJH 9 4 35000.000 0.000 T FFF F WINDOWS _QNT0JSXJJ 9 7 0.000 0.000 T FFF T WINDOWS _RSX0ROI6T 677585453 8 0)22604.16716875.000 1770.833 1458.333- * D 0 0 0 255 255 255 + 1 9 1 T F 0 0 0 1 TF0 0F, WINDOWS _RSX0S34QP 677585494 8 0.22604.16729062.500 1770.833 4583.3332 / C 0 0 0 255 255 255 0 1 9 1 T F 0 0 0 1 TF0 0F1 WINDOWS _RSX0S5U72 677585499 8 0322604.16733645.833 1770.833 4270.833 4 C 0 0 0 255 255 255 5 1 9 1 T F 0 2 0 1 TF0 0F6 WINDOWS _RSX0S9ZB0 677585512 8 0722604.16741354.167 1770.833 3437.500 8 C 0 0 0 255 255 255 9 1 9 1 T F 0 2 0 1 TF0 0F: WINDOWS _RSX0SDMNO 677585506 8 0;22604.16738437.500 1770.833 2604.167 < C 0 0 0 255 255 255 = 1 9 1 T F 0 2 0 1 TF0 0F> WINDOWS _RSX0SQIV1 610822925 6 27291.66740000.000 208.333 5520.833 255 255 255 255 255 255 2 8 0 T F 1 TF3 0F WINDOWS _RSX0THEHA 677592521 8 0?22187.50045520.833 2187.50010208.333 A C 255 0 0 255 255 255 B 1 12 1 T F 2 0 0 1 TF0 0FC WINDOWS _RSX0TIW4E 677592330 8 0D22187.50045520.833 2187.500 5000.000 F C 0 255 0 255 255 255 G 1 12 1 T F 2 0 0 1 TF0 0FH WINDOWS _RSX0TT1AK 610824251 8 0I31770.833 5104.167 3229.16725520.833L J C 0 0 0 255 255 255 K 1 9 1 T F 0 0 0 1 TF3 0F WINDOWS _RSX0TXDV2 610824245 8 0M30000.000 5104.167 1770.83337395.833Q O C 0 0 0 255 255 255 P 1 9 1 T F 0 0 0 1 TF3 0F WINDOWS _01R0FY383 677591916 8 0R30000.00045833.333 1770.833 8750.000 W C -1 -1 -1 -1 -1 -1 X 1 9 1 T F 0 0 0 1 TF0 0FY WINDOWS _01R080DMB 677585460 8 0Z22604.16720104.167 1770.833 2604.167 [ C -1 -1 -1 -1 -1 -1 \ 1 9 1 T F 0 2 0 1 TF0 0F] WINDOWS _01R084AHQ 677585486 8 0^22604.16726458.333 1770.833 1666.667c ` C -1 -1 -1 -1 -1 -1 a 1 9 1 T F 0 0 0 1 TF0 0Fb WINDOWS _01R08FAOZ 677590689 8 0d24583.33316875.000 1770.833 1458.333h e D 0 0 0 255 255 255 f 1 9 1 T F 0 0 0 1 TF0 0Fg WINDOWS _01R08GV22 677585572 8 0i24583.33320104.167 1770.833 2604.167 j C -1 -1 -1 -1 -1 -1 k 1 9 1 T F 0 2 0 1 TF0 0Fl WINDOWS _01R08ICZT 677585578 8 0m24583.33326458.333 1770.833 1666.667r o C -1 -1 -1 -1 -1 -1 p 1 9 1 T F 0 0 0 1 TF0 0Fq WINDOWS _01R08LI4H 677585617 8 0s24583.33329062.500 1770.833 4583.333w t C 0 0 0 255 255 255 u 1 9 1 T F 0 0 0 1 TF0 0Fv WINDOWS _01R08NLX0 677585270 8 0x24583.33333645.833 1770.833 4270.833 y C 0 0 0 255 255 255 z 1 9 1 T F 0 2 0 1 TF0 0F{ WINDOWS _01R08P68I 677585313 8 0|24583.33338437.500 1770.833 2604.167 } C 0 0 0 255 255 255 ~ 1 9 1 T F 0 2 0 1 TF0 0F WINDOWS _01R08QHOE 677585349 8 024583.33341354.167 1770.833 3437.500 C 0 0 0 255 255 255 1 9 1 T F 0 2 0 1 TF0 0F WINDOWS _01R08SF4V 677585111 8 026458.33316875.000 1770.833 1458.333 D 0 0 0 255 255 255 1 9 1 T F 0 0 0 1 TF0 0F WINDOWS _01R08TKCG 677585818 8 026458.33320104.167 1770.833 2604.167 C -1 -1 -1 -1 -1 -1 1 9 1 T F 0 2 0 1 TF0 0F WINDOWS _01R08V08G 677585173 8 026458.33326458.333 1770.833 1666.667 C -1 -1 -1 -1 -1 -1 1 9 1 T F 0 0 0 1 TF0 0F WINDOWS _01R08WW7R 677585224 8 026458.33329062.500 1770.833 4583.333 C 0 0 0 255 255 255 1 9 1 T F 0 0 0 1 TF0 0F WINDOWS _01R08Y44I 677585255 8 026458.33333645.833 1770.833 4270.833 C 0 0 0 255 255 255 1 9 1 T F 0 2 0 1 TF0 0F WINDOWS _01R0900Y6 677585301 8 026458.33338437.500 1770.833 2604.167 C 0 0 0 255 255 255 1 9 1 T F 0 2 0 1 TF0 0F WINDOWS _01R091UJO 677585339 8 026458.33341354.167 1770.833 3437.500 C 0 0 0 255 255 255 1 9 1 T F 0 2 0 1 TF0 0F WINDOWS _01R0E5Y79 677590674 8 022604.167 5000.000 1770.83310000.000 C -1 -1 -1 -1 -1 -1 1 9 1 T F 0 0 0 1 TF0 0F WINDOWS _01R0G84O5 677592530 8 024166.66745520.833 2187.50010208.333 C 255 0 0 255 255 255 1 12 1 T F 2 0 0 1 TF0 0F WINDOWS _01R0G9H7D 677592539 8 026041.66745520.833 2187.50010208.333 C 255 0 0 255 255 255 1 12 1 T F 2 0 0 1 TF0 0F WINDOWS _01R0GK67U 677592471 8 024166.66745520.833 2187.500 5000.000 C 0 255 0 255 255 255 1 12 1 T F 2 0 0 1 TF0 0F WINDOWS _01R0GLY0D 677592508 8 026041.66745520.833 2187.500 5000.000 C 0 255 0 255 255 255 1 12 1 T F 2 0 0 1 TF0 0F WINDOWS _06G0XZEYX 689155862 8 026041.667 5000.000 1770.83310208.333 C -1 -1 -1 -1 -1 -1 1 9 1 T F 0 0 0 1 TF3 0F WINDOWS _06G0XYLQH 68914338010 0 9.000 3.000 WINDOWS _06G12DI5B 68915650610 0 1.000 31.000 WINDOWS 23 15.000 6.000 12.000 13.000 3 0 1 9 WINDOWS 23 20.000 8.000 15.000 17.000 4 1 1 12 WINDOWS 25 F jj'5tߟ[ynr*e!Arial@'WINSPOOLHP DeskJet 660C v11.0LPT1:HP DeskJet 660C v11.0: d,,HP DeskJet 660C v11.0LPT1 ,,DRIVER=WINSPOOL DEVICE=HP DeskJet 660C v11.0 OUTPUT=LPT1: ORIENTATION=1 PAPERSIZE=266 COPIES=1 DEFAULTSOURCE=1 PRINTQUALITY=300 COLOR=2 DUPLEX=1 YRESOLUTION=300 TTOPTION=1 COLLATE=0  (qso_date) Arial !empty(call)"##"left(time_on,4) Arial !empty(call) "@R ##:##Z"FREQ Arial !empty(call)MODE Arial !empty(call)RST_SENT Arial !empty(call)iif(qsl_rcvd="R","PSE","") Arial !empty(call)iif(qsl_rcvd="F","Tnx","") Arial !empty(call)all_msg Arial"@l"tag_val("QSLMSG:",userfields) Arial"@l"iif(qsl_rcvd3="R" OR qsl_rcvd2="R" OR qsl_rcvd="R","Pse QSL", iif(qsl_rcvd3="F" OR qsl_rcvd2="F" OR qsl_rcvd="F","Tnx QSL","" )) Arial !empty(call)left(cmonth(qso_date),3) Arial !empty(call)%right(trans(year(qso_date),"####"),2) Arial !empty(call)"##" (qso_date2) Arial !empty(call2)"##"left(cmonth(qso_date2),3) Arial !empty(call2)&right(trans(year(qso_date2),"####"),2) Arial !empty(call2)"##"left(time_on2,4) Arial !empty(call2) "@R ##:##Z"FREQ2 Arial !empty(call2) RST_SENT2 Arial !empty(call2)MODE2 Arial !empty(call2) (qso_date3) Arial !empty(call3)"##"left(cmonth(qso_date3),3) Arial !empty(call3)&right(trans(year(qso_date3),"####"),2) Arial !empty(call3)"##"left(time_on3,4) Arial !empty(call3) "@R ##:##Z"FREQ3 Arial !empty(call3) RST_SENT3 Arial !empty(call3)MODE3 Arial !empty(call3)CHRTRAN(call,"0","") Arial !empty(call)iif(qsl_rcvd2="R","PSE","") Arial !empty(call2)iif(qsl_rcvd3="R","PSE","") Arial !empty(call3)iif(qsl_rcvd2="F","Tnx","") Arial !empty(call2)iif(qsl_rcvd3="F","Tnx","") Arial !empty(call3)*iif(!!empty(via),"","(Via "+trim(via)+")") ArialArialArialdataenvironmentName = "Dataenvironment" ) \&QSLCARD Layout 1 (3 Qso Per Card) This report prints postcards on 5.5" or 6" wide by 3.5" laser postcard stock, index cards Set for 1/4" top and bottom margins. If this is not proper for your stock, you may adjust it.MR_REPVARAR_REPVARCALL_MSGR_REPVARC''R_REPVARC7QSL_MSG R_REPVARC.t.MR_INDEXESAR_INDEXESCCALLR_INDEXESCR_INDEXESCCHRONR_INDEXESCR_INDEXESC CNTRY/CALLR_INDEXESC CALL+DXCCR_INDEXESC DISTRICTR_INDEXESCAiif(substr(call,2,1)<"A",substr(call,2,1),substr(call,3,1))+call&define window qsl from 5,5 to 10,70 color scheme 1 shadow float double activate window qsl * get last message from .INI file ALL_MSG = GET_INI("REPORT\REPORTS.INI", "QSL Cards/Labels", "AllMsg", "", .t.) all_msg = PADR(ALL_MSG,58) on key label tab keyboard "{ctrl+W}" @ 1,1 say "Enter an optional message to appear on all labels:" @ 2,1 get all_msg read modal on key label tab * save message in .INI file for next time. =put_ini("REPORT\REPORTS.INI", "QSL Cards/Labels", "AllMsg", all_msg) release window qsl  lblmult(global.report_ref.selectexp, 3) && function supports 2, 3, or 4 QSOs per label * The following DELETE statement will cause this to print ONLY labels with more than 1 QSO. The problem is knowing which QSOs to mark as printed. *delete for empty(call2) * DH 10/11/96 release window temp global.report_ref.selectexp = "(" + global.report_ref.selectexp + ") or empty(call)" && so blank records will be included select log * RANGE is added to the select criteria when you print something. * MODE doesn't get set until you actually print something, so we don't need to * worry about RANGE not being considered. if global.report_ref.mode="MULT" && printed multiple records if IDYES=MessageBox("Do you want to mark QSLs as printed (QSL SENT = F) and record date printed?", MB_YESNO + MB_ICONQUESTION, "QSL Printing") selexp = global.report_ref.selectexp wait window "Updating. Please wait..." nowait if empty(selexp) selexp=".t." endif set talk window set talk on replace qsl_sent with "F", userfields with tag_edit(userfields, "MAILED:", date()) for &selexp set talk off wait clear endif endif k'a b