×
INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Contact US

Log In

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

reference values in a hold file

reference values in a hold file

reference values in a hold file

(OP)
Here's a code snippet of what I have so far:
JOIN
 BPDCLB AND BPDMBR IN BPDNEW TO CRCLB AND CRMBR IN CRFILL20 AS J4
END

DEFINE FILE BPDNEW
 ACCTS/I5CS  =1;
 CHKDATE/YMD =BPDSTD;
 MYDATE/YMD =DATECVT(CRDTE,'I6MDY','YMD');
END

TABLE FILE BPDNEW
SUM ACCTS
    BPDCBA
WHERE CHKDATE GE &RDATE AND CHKDATE LE &TODATE;
WHERE BPDDTE EQ &CHKBILL;
WHERE BPDCLB EQ &CLUBID;
WHERE BPDCOL EQ 'Y';
WHERE BPDPCH EQ ' ';
WHERE BPDSTC EQ 'RFC';
WHERE MYDATE GE CHKDATE AND DATEDIF(MYDATE,CHKDATE,'D') LE 12;
ON TABLE HOLD AS RFC_COL_TOT;
END
-RUN
DEFINE FILE RFC_COL_TOT
 RFC_COL/P6CS=ACCTS;
 RFC_AMT/P11.2MSB=BPDCBA;
END


JOIN BLANK WITH CLUB_ID IN BILLHOLD TO BLANK IN COUNTERS AS J1
DEFINE FILE BILLHOLD


What I'm trying to do is use the values from RFC_COL and RFC_AMT within the content of BILLHOLD to display in a report. Any suggestions on how I might do that?

RE: reference values in a hold file

(OP)
Found a way to make it work.

TABLE FILE BPDNEW
PRINT TOT.ACCTS
      TOT.BPDLDA
WHERE CHKDATE GE &RDATE AND CHKDATE LE &TODATE;
WHERE BPDDTE EQ &CHKBILL;
WHERE BPDCLB EQ &CLUBID;
WHERE BPDCOL EQ 'Y';
WHERE BPDPCH EQ ' ';
WHERE BPDSTC EQ 'RFC';
WHERE MYDATE GE CHKDATE AND DATEDIF(MYDATE,CHKDATE,'D') LE 12;
ON TABLE HOLD FORMAT ALPHA;
END
-RUN

-READ HOLD &RFC_COL.A5. &RFC_AMT.A14.

I was then able to use &RFC_COL AND &RFC_AMT in the report.

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Tek-Tips Forums free from inappropriate posts.
The Tek-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members! Already a Member? Login

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close