The following pre-programmed joins are available for your use. Refer
to the join for the specific FOCUS commands being executed.
To initiate a pre-programmed join, execute the join name in lieu of
the standard defines before the table file command. For additional
information on joins, refer to the topic: Using
Joined Files.
JACPS
|
|
JOIN CLEAR
JOIN AC:CLASSRNG IN AC TO PS:CLASSRNG
IN PS AS JACPS
EX AC
EX PSFLDS FILENM=AC
Note: For
PS, records are retrieved at the class and range level.
|
JACPS1
|
|
JOIN CLEAR
JOIN CLASSRNG WITH AC:PSNSEQ
IN AC TO PS:CLASSRNG
IN PS AS JACPS1
DEFINE FILE AC
CLASSRNG/A5=AC:CLASS|'0';
END
EX ACFLDS FILENM=AC
EX PSFLDS FILENM=AC
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JANJC1
|
|
JOIN CLEAR
JOIN AN:JOBCAMP
WITH AN:CLASS IN AN TO JC:JOBCAMP IN JC AS JANJC1
DEFINE FILE AN
AN:JOBCAMP/A6 =
AN:JOBCAMP|AN:CAMPUSCD;
END
EX ANFLDS FILENM
= AN
Note: This join
retrieves records at the campus level. Be aware that the
Job Code file is not historical. In addition, the field
Job Code replaced Track Class effective 01/01/95, therefore using
this join with an AN file older than this date would not return
valid JC fields.
|
JANJC2
|
|
JOIN CLEAR
JOIN AN:JOBCAMP
WITH AN:CLASS IN AN TO JC:JOBCAMP IN JC AS JANJC2
DEFINE FILE AN
AN:JOBCAMP/A6 =
AN:JOBCODE|'00';
END
EX ANFLDS FILENM=AN
Note: This join
retrieves records at the systemwide level (i.e., JC:CAMPUSCD =
00). Be aware that the Job Code file is not historical. In
addition, the field Job Code replaced Track Class effective 01/01/95,
therefore using this join with an AN file older than this date
would not return valid JC fields.
|
JANPS
|
|
JOIN CLEAR
JOIN AN:CLASSRNG
IN AN TO PS:CLASSRNG IN PS AS JANPS
EX AN
EX PSFLDS FILENM=AN
Note: For
PS, records are retrieved at the class and range level.
|
JANPS1
|
|
JOIN CLEAR
JOIN CLASSRNG WITH
AN:PSNSEQ IN AN TO PS:CLASSRNG IN PS AS JANPS1
DEFINE FILE AN
CLASSRNG/A5=AN:CLASS|'0';
END
EX ACFLDS FILENM=AN
EX PSFLDS FILENM=AN
Note: Records
are retrieved at the class title level in the PS file. If
this join is used, DO NOT
retrieve data elements from the lower segment in the PS file,
otherwise you may get erroneous results.
|
JA54PSAG
|
|
JOIN CLEAR
JOIN A54:CLASS
AND A54:RANGE IN A54 TO PS:CLASSRNG IN PS AS JA54PS
JOIN A54:AGENCY
IN A54 TO AGENCY IN AGYCAMP AS JA54PSAG
EX A54
EX PSFLDS FILENM=A54
Note: For
PS, records are retrieved at the class and range level. External
files using concatenated or defined key fields (i.e., A54:CLASS
AND A54:RANGE) in a join must have all the key fields activated
in a FOCUS request. The following FOCUS statements should be used:
EX
JA54PSAG
TABLE
FILE A54
IF
A54:CLASS GT 0
IF
A54:RANGE GE 0
|
JEHJCAG
|
|
JOIN CLEAR
JOIN EH:JOBCAMP
WITH EH:CLASS IN EH TO JC:JOBCAMP IN JC AS JEHJC
JOIN EH:AGENCY
WITH EH:AGENCY IN EH TO AGENCY IN AGYCAMP AS JEHJCAG
DEFINE FILE EH
EH:JOBCAMP/A6 =
EH:JOBCODE|'00';
END
EX EHFLDS FILENM=EH
Note: For
the JC file, systemwide (campus code 00) JC titles are retrieved.
|
JEHPSAG
|
|
JOIN CLEAR
JOIN EH:CLASSRNG
WITH EH:RANGE IN EH TO PS:CLASSRNG IN PS AS JEHPS
JOIN EH:AGENCY
IN EH TO AGENCY IN AGYCAMP AS JEHPSAG
EX EH
EX PSFLDS FILENM=EH
|
JEHPSAG1 |
|
JOIN CLEAR
JOIN CLASSRNG WITH
EH:LISTCNT IN EH TO PS:CLASSRNG IN PS AS JEHPS
JOIN EH:AGENCY
IN EH TO AGENCY IN AGYCAMP AS JEHPSAG
DEFINE FILE EH
CLASSRNG/A5=EH:CLASS|
'0';
END
EX EHFLDS FILENM=EH
EX PSFLDS FILENM=EH
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JEHPSAGJ |
|
JOIN CLEAR
JOIN EH:CLASSRNG
WITH EH:RANGE IN EH TO PS:CLASSRNG IN PS AS JEHPS
JOIN EH:AGENCY
IN EH TO AGENCY IN AGYCAMP AS JEHPSAG
JOBCAMP WITH EH:CLASS
IN EH TO JC:JOBCAMP IN JC AS JEHPSAGJ
EX EH
DEFINE FILE EH
ADD
JOBCAMP/A6=EH:JOBCODE|
'00';
END
EX PSFLDS FILENM=EH
Note: For
the JC file, systemwide (campus code 00) JC titles are retrieved.
|
JLVLB
|
|
JOIN LV:CAMPSSA
IN LV TO ALL LB:CAMPSSA IN LB AS JLVLB
EX LVFLDS FILENM=LV
EX LBFLDS FILENM=LV
|
JLVLD
|
|
JOIN LV:CAMPSSA IN LV TO ALL LD:CAMPSSA
IN LD AS JLVLD
EX LVFLDS FILENM=LV
EX LDFLDS FILENM=LV
|
JLVLH
|
|
JOIN LV:CAMPSSA
IN LV TO ALL LH:CAMPSSA IN LH AS JLVLH
EX LVFLDS FILENM=LV
EX LHFLDS FILENM=LV
|
JLVLR |
|
JOIN LV:CAMPSSA IN LV TO ALL LR:CAMPSSA
IN LR AS JLVLR
EX LVFLDS FILENM=LV
EX LRFLDS FILENM=LV
|
JLVLS
|
|
JOIN LV:CAMPSSA
IN LV TO ALL LS:CAMPSSA IN LS AS JLVLS
EX LVFLDS FILENM=LV
EX LSFLDS FILENM=LV
|
JLXPS
|
|
JOIN CLEAR
JOIN CLASSRNG WITH
LX:PSNSEQ IN LX TO PS:CLASSRNG IN PS AS JLXPS
DEFINE FILE LX
CLASSRNG/A5=LX:CLASS|'0';
END
EX LXFLDS FILENM=LX
EX PSFLDS FILENM=LX
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JLBPS
|
|
JOIN CLEAR
JOIN CLASSRNG WITH
LB:CLASS IN LB TO PS:CLASSRNG IN PS AS JLBPS
DEFINE FILE LB
CLASSRNG/A5 = LB:CLASS|'0';
END
EX LBFLDS FILENM=LB
EX PSFLDS FILENM=LB
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JPHAG
|
|
JOIN CLEAR
JOIN PH:AGENCY
IN PH TO AGENCY IN AGYCAMP AS JPHAG
EX PH
Note: The
AGYCAMP file is automatically allocated when any other file (e.g.,
PH) is selected.
|
JPHPSAG |
|
JOIN CLEAR
JOIN PH:CLASSRNG
WITH PH:RANGE IN PH TO PS:CLASSRNG IN PS AS JPHPS
JOIN PH:AGENCY
IN PH TO AGENCY IN AGYCAMP AS JPHPSAG
EX PH
EX PSFLDS FILENM=PH
|
JPHPSAG1 |
|
JOIN CLEAR
JOIN CLASSRNG WITH
PH:LISTCNT IN PH TO PS:CLASSRNG IN PS AS JPHPS1
JOIN PH:AGENCY
IN PH TO AGENCY IN AGYCAMP AS JPHPSAG1
DEFINE FILE PH
CLASSRNG/A5=PH:CLASS|'0';
END
EX PHFLDS FILENM=PH
EX PSFLDS FILENM=PH
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JPHSAG
|
|
JOIN
CLEAR
JOIN
PHS:AGENCY IN PHS TO AGENCY IN AGYCAMP AS JPHSAG
EX
PHS
|
JPHSPSAG
|
|
JOIN CLEAR
JOIN PHS:CLASSRNG
WITH PHS:RANGE IN PHS TO PS:CLASSRNG IN PS AS JPHSPS
JOIN PHS:AGENCY
IN PHS TO AGENCY IN AGYCAMP AS JPHSPSAG
EX PHS
EX PSFLDS FILENM=PHS
|
JPHSPSG1 |
|
JOIN CLEAR
JOIN CLASSRNG WITH
PHS:LISTCNT IN PHS TO PS:CLASSRNG IN PS AS JPHSPS1
JOIN PHS:AGENCY
IN PHS TO AGENCY IN AGYCAMP AS JPHSPSG1
DEFINE FILE PHS
CLASSRNG/A5=PHS:CLASS|'0';
END
EX PHSFLDS FILENM=PHS
EX PSFLDS FILENM=PHS
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JPYAG
|
|
JOIN CLEAR
JOIN PY:AGENCY
IN PY TO AGENCY IN AGYCAMP AS JPYAG
EX PY
Note: The
AGYCAMP file is automatically allocated when any other file (e.g.,
PY) is selected.
|
JPYPSAG
|
|
JOIN CLEAR
JOIN PY:CLASSRNG
WITH PY:RANGE IN PY TO PS:CLASSRNG IN PS AS JPYPS
JOIN PY:AGENCY
IN PY TO AGENCY IN AGYCAMP AS JPYPSAG
EX PY
EX PSFLDS FILENM=PY
|
JPYPSAG1 |
|
JOIN CLEAR
JOIN CLASSRNG WITH
PY:LISTCNT IN PY TO PS:CLASSRNG IN PS AS JPYPS1
JOIN PY:AGENCY
IN PY TO AGENCY IN AGYCAMP AS JPYPSAG1
DEFINE FILE PY
CLASSRNG/A5=PY:CLASS|'0';
END
EX PYFLDS FILENM=PY
EX PSFLDS FILENM=PY
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JSPPS |
|
JOIN CLEAR
JOIN SP:CLASSRNG
IN SP TO PS:CLASSRNG IN PS AS JSPPS
EX SP
EX PSFLDS FILENM=SP
Note: For
PS, records are retrieved at the class and range level.
|
JSPPS1 |
|
JOIN CLEAR
JOIN CLASSRNG WITH
SP:PSNSEQ IN SP TO PS:CLASSRNG IN PS AS JSPPS1
DEFINE FILE SP
CLASSRNG/A5=SP:CLASS|'0';
END
EX SPFLDS FILENM=SP
EX PSFLDS FILENM=SP
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JSACPS
|
|
JOIN CLEAR
JOIN SAC:CLASSRNG
IN SAC TO PS:CLASSRNG IN PS AS JSACPS
EX SAC
EX PSFLDS FILENM=SAC
Note: For
PS, records are retrieved at the class title level.
|
JSACPS1
|
|
JOIN CLEAR
JOIN
CLASSRNG WITH SAC:PSNSEQ IN SAC TO PS:CLASSRNG IN PS AS JSACPS1
DEFINE FILE SAC
CLASSRNG/A5=SAC:CLASS|'0';
END
EX SACFLDS FILENM=SAC
EX PSFLDS FILENM=SAC
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JSACJC1 |
|
JOIN CLEAR
JOIN SAC:JOBCAMP
WITH AC:CLASS IN SAC TO JC:JOBCAMP IN JC AS JSACJC1
DEFINE FILE SAC
SAC:JOBCAMP/A6
= SAC:JOBCAMP|AC:CAMPUSCD;
END
EX SACFLDS FILENM
= SAC
Note: This join
retrieves records at the campus level. Be aware that the
Job Code file is not historical. |
JSANPS
|
|
JOIN CLEAR
JOIN SAN:CLASSRNG
IN SAN TO PS:CLASSRNG IN PS AS JSANPS
EX SAN
EX PSFLDS FILENM=SAN
Note: For
PS, records are retrieved at the class and range level.
|
JSANPS1
|
|
JOIN CLEAR
JOIN
CLASSRNG WITH SAN:PSNSEQ IN SAN TO PS:CLASSRNG IN PS AS
JSANPS1
DEFINE FILE SAN
CLASSRNG/A5=IF
SAN:CBID EQ 'M80'
THEN SAN:TRKCLASS|'0'
ELSE SAN:CLASS|'0';
END
EX SANFLDS FILENM=SAN
EX PSFLDS FILENM=SAN
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JSTRPSAG |
|
JOIN CLEAR
JOIN STR:CLASSRNG
WITH STR:RANGE IN STR TO PS:CLASSRNG IN PS AS JSTRPS
JOIN STR:AGENCY
IN STR TO AGENCY IN AGYCAMP AS JSTRPSAG
EX STR
EX PSFLDS FILENM=STR
|
JSTRPSG1 |
|
JOIN CLEAR
JOIN CLASSRNG WITH
STR:RANGE IN STR TO PS:CLASSRNG IN PS AS JSTRPS
JOIN STR:AGENCY
IN STR TO AGENCY IN AGYCAMP AS JSTRPSAG
TABLE FILE STR
CLASSRNG/A5=STR:CLASS|'0';
END
EX STR
EX PSFLDS FILENM=STR
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|
JTRPSAG |
|
JOIN CLEAR
JOIN TR:CLASSRNG
WITH TR:RANGE IN TR TO PS:CLASSRNG IN PS AS JTRPS
JOIN TR:AGENCY
IN TR TO AGENCY IN AGYCAMP AS JTRPSAG
EX TR
EX PSFLDS FILENM=TR
|
JTRPSAG1
|
|
JOIN CLEAR
JOIN CLASSRNG WITH
TR:RANGE IN TR TO PS:CLASSRNG IN PS AS JTRPS
JOIN TR:AGENCY
IN TR TO AGENCY IN AGYCAMP AS JTRPSAG
DEFINE FILE TR
CLASSRNG/A5=TR:CLASS|'0';
END
EX TR
EX PSFLDS FILENM=TR
Note: For
the PS file, records are retrieved at the class title (range 0)
level. If this join is used, DO
NOT retrieve data elements from the lower segments in the
PS file, otherwise you will get erroneous data.
|