//**** START OF SPECIFICATIONS *****************************************00010000 //* *00020000 //* MODULE NAME = APSUC07V *00030000 //* *00040000 //* $MOD (APSUC07V) COMP(APS) PROD(PSF) : VERSION 3.3.0 *00050000 //* *00060000 //* DESCRIPTIVE NAME = RESOURCE EXIT - SAMPLE 4 *00070000 //* *00080000 //* STATUS = VERSION 3, RELEASE 3, LEVEL 0 *00090000 //* *00100000 //* FUNCTION = *00110000 //* This is sample installation exit APSUX07V written in C. *00120000 //* *00130000 //* THIS SAMPLE EXIT IS INTENDED TO DEMONSTRATE HOW TO INDICATE *00140000 //* TO PSF TO PERFORM MANY OF THE FUNCTIONS THAT CAN BE REQUESTED *00150000 //* ON THE INITIALIZATION (XTP7INIT) OR BEGIN DATA SET (XTP7BDS) *00160000 //* CALLS. ALL OF THE CODE IN THIS EXIT IS COMMENTED OUT. TO *00170000 //* ACTIVATE A FUNCTION(S), UNCOMMENT THE LINE(S) THAT ACTIVATE *00180000 //* THE FUNCTION *00190000 //* *00200000 //* OPERATION = *00210000 //* *00220000 //* *00230000 //* NOTES = *00240000 //* DEPENDENCIES = NONE *00250000 //* RESTRICTIONS = NONE *00260000 //* REGISTER CONVENTIONS = NONE *00270000 //* *00280000 //* MODULE TYPE = PROCEDURE *00290000 //* PROCESSOR = C *00300000 //* ATTRIBUTES = REENTRANT *00310000 //* AMODE 31 *00320000 //* RMODE ANY *00330000 //* *00340000 //* ENTRY POINT = APSUC07 *00350000 //* LINKAGE = *00360000 //* One parameter which is the address of APSGEXTP is passed *00370000 //* *00380000 //* INPUT = *00390000 //* APSGEXTP - PSF INSTALLATION EXIT PARAMETER AREA *00400000 //* *00410000 //* OUTPUT = *00420000 //* NONE *00430000 //* *00440000 //* EXIT NORMAL = RETURN TO CALLER *00450000 //* *00460000 //* EXIT ERROR = NONE *00470000 //* *00480000 //* EXTERNAL REFERENCES = *00490000 //* ROUTINES = NONE *00500000 //* DATA AREAS = *00510000 //* APSGEXTP - PSF INSTALLATION EXIT PARAMETER AREA *00520000 //* APSUECA - PSF EXIT COMMUNICATIONS AREA *00530000 //* APSURLST - PSF EXIT RESOURCE LIST AREA *00540000 //* IAZJSPA - JES SEPARATOR PAGE AREA *00550000 //* INCLUDES = NONE *00560000 //* *00570000 //* MACROS = NONE *00580000 //* *00590000 //* MESSAGES = NONE *00600000 //* *00610000 //* CHANGE ACTIVITY = *00620000 //* $B0=LAPS0008, HPRF320, 990928, BDKUAJT: Initial Version @B0A*00630000 //* $01=OW45477, HPRF320, 010103, BDKURLD: Force eject to new sheet *00640000 //* to ensure correct page *00650000 //* is jogged when in CSE *00660000 //* mode @01A*00670000 //* $02=OW47253, HPRF320, 001129, BDKURLD: Separate copymarks from *00680000 //* jogging @02A*00690000 //* $EV=LAPS0009,HPRF330,010530,BUQ4RLB: Version 3.3.0 @EVA*00700000 //* $EM=LAPS0009,HPRF330,011011,BDKURLD: ASAP support @EMA*00710000 //* *00720000 //**** END OF SPECIFICATIONS *******************************************00730000 00740000 #pragma comment(date) 00750000 #pragma csect(CODE,"$APSUC07") 00760000 #pragma csect(STATIC,"#APSUC07") 00770000 #pragma linkage(APSUC07,OS) 00780000 #pragma runopts(TRAP(OFF)) 00790000 #pragma map(apsuc07,"APSUC07") 00800000 00810000 /*----------------------------------------------------------------------00820000 #include these header files for struct & function definitions: 00830000 ----------------------------------------------------------------------*/00840000 00850000 #include "apsgextc.h" 00860000 #include "apsuecac.h" 00870000 #include "apsurlsc.h" 00880000 #include "apsujspc.h" 00890000 00900000 /*----------------------------------------------------------------------00910000 Declarations 00920000 ----------------------------------------------------------------------*/00930000 00940000 int len = 8; // Length of PRMODE values 00950000 00960000 /*----------------------------------------------------------------------00970000 Miscellaneous Constants 00980000 ----------------------------------------------------------------------*/00990000 01000000 #define PDRRLV 0 // Page definition RRLV value 01010000 #define FDRRLV 0 // Form definition RRLV value 01020000 #define PSRRLV 0 // Page segment RRLV value 01030000 #define CFRRLV 0 // Coded font RRLV value 01040000 #define PRSOSI1 "SOSI1 " // SOSI1 PRMODE value 01050000 #define PRSOSI2 "SOSI2 " // SOSI2 PRMODE value 01060000 #define PRSOSI3 "SOSI3 " // SOSI3 PRMODE value 01070000 01080000 void apsuc07(APSGEXTP * xtpptr) 01090000 { 01100000 01110000 /*--------------------------------------------------------------------- 01120000 Determine what type of call is being made to the exit 01130000 ---------------------------------------------------------------------*/ 01140000 01150000 switch (xtpptr->XTPRECP.XTPRECP7->XTP7ETYP) // Select on the 01160000 // type of call 01170000 { 01180000 case XTP7INIT: // Initialization call 01190000 /*---------------------------------------------------------------01200000 INITIALIZATION ROUTINE 01210000 - Request control at begin datset call time 01220000 - Set miscellaneous flags & fields 01230000 - To activate any of the functions just uncomment the 01240000 function desired 01250000 - A printf is provided with each function that can also be 01260000 uncommented to display to inform the user that the 01270000 function has been activated 01280000 - Set RRLVs for all resources 01290000 - To set an RRLV value just uncomment the code for the 01300000 RRLV you wish to change and then change the constant for 01310000 that RRLV from 0 to the desired value. 01320000 ---------------------------------------------------------------*/01330000 01340000 xtpptr->XTPRECP.XTPRECP7->XTP7NOTY.XTP7MISC = XTP7EBDS; 01350000 // Request control at 01360000 // beginning of data set 01370000 01380000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7ETFF; 01390000 // Set XTP7ETFF to eject to 01400000 // front facing between 01410000 // documents. 01420000 // printf("**XTP7ETFF SET ON**\n"); 01430000 01440000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7EFFH; 01450000 // Set XTP7EFFH to eject to 01460000 // front facing before the 01470000 // job header. 01480000 // printf("**XTP7EFFH SET ON**\n"); 01490000 01500000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7HDF; 01510000 // Set XTP7HDF to select the 01520000 // hardware default font 01530000 // printf("**XTP7HDF SET ON**\n"); 01540000 01550000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7PRNS; 01560000 // Set XTP7PRNS to set single 01570000 // byte font pruning. 01580000 // printf("**XTP7PRNS SET ON**\n"); 01590000 01600000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7PRND; 01610000 // Set XTP7PRND to set double 01620000 // byte font pruning. 01630000 // printf("**XTP7PRND SET ON**\n"); 01640000 01650000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7IPMF; 01660000 // Set XTP7IPMF to set mark 01670000 // forms request 01680000 // printf("**XTP7IPMF SET ON**\n"); 01690000 01700000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7IPOS; 01710000 // Set XTP7IPOS to offset stack01720000 // the interrupt message page 01730000 // printf("**XTP7IPOS SET ON**\n"); 01740000 01750000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7MTOF; 01760000 // Set XTP7MTOF to map fonts 01770000 // to outline fonts 01780000 // printf("**XTP7MTOF SET ON**\n"); 01790000 01800000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7RFNF; 01810000 // Set XTP7RFNF to activate a 01820000 // printer resident font 01830000 // printf("**XTP7RFNF SET ON**\n"); 01840000 01850000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7IPSU; 01860000 // Set XTP7IPSU to suppress 01870000 // interrupt message pages 01880000 // printf("**XTP7IPSU SET ON**\n"); 01890000 01900000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP738MO; 01910000 // Set XTP738MO to set the 390001920000 // media origin to the 3800 01930000 // media origin for the user's 01940000 // dataset 01950000 // printf("**XTP738MO SET ON**\n"); 01960000 01970000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7MDSD; 01980000 // Set XTP7MDSD to send the 01990000 // message data set to a 02000000 // sysout data set 02010000 // printf("**XTP7MDSD SET ON**\n"); 02020000 02030000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7C2SI; 02040000 // Set XTP7C2SI to convert a 02050000 // multiple-celled IM1 image 02060000 // to a single IOCA image. 02070000 // printf("**XTP7C2SI SET ON**\n"); 02080000 02090000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7JHMO; 02100000 // Set XTP7JHMO to set the job 02110000 // header media origin to the 02120000 // top left corner 02130000 // printf("**XTP7JHMO SET ON**\n"); 02140000 02150000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7JTMO; 02160000 // Set XTP7JTMO to set the job 02170000 // trailer media origin to the 02180000 // top left corner 02190000 // printf("**XTP7JTMO SET ON**\n"); 02200000 02210000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7DHMO; 02220000 // Set XTP7DHMO to set the data02230000 // set header media origin to 02240000 // the top left corner 02250000 // printf("**XTP7DHMO SET ON**\n"); 02260000 02270000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7MDMO; 02280000 // Set XTP7MDMO to set the 02290000 // message data set media 02300000 // origin to top left corner 02310000 // printf("**XTP7MDMO SET ON**\n"); 02320000 02330000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7WIDE; 02340000 // Set XTP7WIDE to indicate 02350000 // wide paper is being used 02360000 // printf("**XTP7WIDE SET ON**\n"); 02370000 02380000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7IHIB; 02390000 // Set XTP7IHIB to inhibit 02400000 // recovery 02410000 // printf("**XTP7IHIB SET ON**\n"); 02420000 02430000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7ENDC; 02440000 // Set XTP7ENDC to end the 02450000 // conversation 02460000 // printf("**XTP7ENDC SET ON**\n"); 02470000 02480000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG1 |= XTP7APSF; 02490000 // Set XTP7APSF to set ACK 02500000 // per sheet 02510000 // printf("**XTP7APSF SET ON**\n"); 02520000 02530000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG1 |= XTP7NSF; 02540000 // Set XTP7NSF to force a 02550000 // sheet eject if CSE 02560000 // mode @01A 02570000 // printf("**XTP7NSF SET ON**\n"); 02580000 // @01A 02590000 02600000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG1 |= XTP7CLOS; 02610000 // Set XTP7CLOS to close idle 02620000 // resource libraries 02630000 // printf("**XTP7CLOS SET ON**\n"); 02640000 02650000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG1 |= XTP7SDCH; 02660000 // Set XTP7SDCH to set default 02670000 // characer for single byte 02680000 // printf("**XTP7SDCH SET ON**\n"); 02690000 02700000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG1 |= XTP7RDSR; 02710000 // Set XTP7RDSR to release data02720000 // sets when repositioning. 02730000 // printf("**XTP7RDSR SET ON**\n"); 02740000 02750000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG1 |= XTP7CINR; 02760000 // Set XTP7CINR to capture 02770000 // inline resources when 02780000 // connected via DPF or WPM 02790000 // printf("**XTP7CINR SET ON**\n"); 02800000 02810000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG1 |= XTP7SUCM; 02820000 // Set XTP7SUCM to suppress 02830000 // copy marks 02840000 // printf("**XTP7SUCM SET ON**\n"); 02850000 02860000 // memcpy(xtpptr->XTPRECP.XTPRECP7->XTP7PRMD,PRSOSI1, len); 02870000 // Set PRMODE to SOSI1 02880000 // printf("**PRMODE SET TO SOSI1**\n"); 02890000 02900000 // memcpy(xtpptr->XTPRECP.XTPRECP7->XTP7PRMD,PRSOSI2, len); 02910000 // Set PRMODE to SOSI2 02920000 // printf("**PRMODE SET TO SOSI2**\n"); 02930000 02940000 // memcpy(xtpptr->XTPRECP.XTPRECP7->XTP7PRMD,PRSOSI3, len); 02950000 // Set PRMODE to SOSI3 02960000 // printf("**PRMODE SET TO SOSI3**\n"); 02970000 02980000 // xtpptr->XTPRECP.XTPRECP7->XTP7ACSE = XTP7NCK; 02990000 // Set the CSE checking 03000000 // to not check to see 03010000 // if page fits 03020000 // printf("**XTP7ACSE SET TO XTP7NCK**\n"); 03030000 03040000 // xtpptr->XTPRECP.XTPRECP7->XTP7ACSE = XTP7CK1P; 03050000 // Set the CSE checking 03060000 // to check only 1st page 03070000 // to see if it fits 03080000 // printf("**XTP7ACSE SET TO XTP7CK1P**\n"); 03090000 03100000 // xtpptr->XTPRECP.XTPRECP7->XTP7ACSE = XTP7CKAP; 03110000 // Set the CSE checking 03120000 // to check all pages 03130000 // to see if they fit 03140000 // printf("**XTP7ACSE SET TO XTP7CKAP**\n"); 03150000 03160000 // xtpptr->XTPRECP.XTPRECP7->XTP7JOG = XTP7NONE; 03170000 // Set jogging to none 03180000 // @02A 03190000 // printf("**XTP7JOG SET TO NONE**\n"); 03200000 // @02A 03210000 // xtpptr->XTPRECP.XTPRECP7->XTP7JOG = XTP7DSET; 03220000 // Set jogging to dataset 03230000 // @02A 03240000 // printf("**XTP7JOG SET TO DATASET**\n"); 03250000 // @02A 03260000 // xtpptr->XTPRECP.XTPRECP7->XTP7JOG = XTP7JOB; 03270000 // Set jogging to job 03280000 // @02A 03290000 // printf("**XTP7JOG SET TO JOB**\n"); 03300000 // @02A 03310000 03320000 // ********** RRLV SETTINGS ****************** 03330000 03340000 // xtpptr->XTPRECP.XTPRECP7->XTP7RRLV.XTP7RPD = PDRRLV; 03350000 // Set the pagedef RRLV03360000 // printf("**PAGE DEF RRLV CHANGED**\n"); 03370000 03380000 // xtpptr->XTPRECP.XTPRECP7->XTP7RRLV.XTP7RFD = FDRRLV; 03390000 // Set the formdef RRLV03400000 // printf("**FORM DEF RRLV CHANGED**\n"); 03410000 03420000 // xtpptr->XTPRECP.XTPRECP7->XTP7RRLV.XTP7RPS = PSRRLV; 03430000 // Set the page segment03440000 // RRLV 03450000 // printf("**PAGE SEGMENT RRLV CHANGED**\n"); 03460000 // xtpptr->XTPRECP.XTPRECP7->XTP7RRLV.XTP7RCF = CFRRLV; 03470000 // Set the coded font 03480000 // RRLV 03490000 // printf("**CODED FONT RRLV CHANGED**\n"); 03500000 03510000 break; 03520000 03530000 case XTP7BDS: // Begin data set call 03540000 03550000 /*---------------------------------------------------------------03560000 BEGIN DATA SET ROUTINE 03570000 - Set miscellaneous flags and fields 03580000 - To activate any of the functions just uncomment the 03590000 function desired. 03600000 - A WTO is provided wit each function that can also be 03610000 uncommented to verify that the correct function has 03620000 been activated. 03630000 - Set RRLVs for all resources 03640000 - To set an RRLV value just uncomment the code for the RRLV 03650000 you wish to change and then change the constant for that 03660000 RRLV from 0 to the desired value. 03670000 -------------------------------------------------------------*/03680000 03690000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7ETFF; 03700000 // Set XTP7ETFF to eject to 03710000 // front facing between 03720000 // documents. 03730000 // printf("**XTP7ETFF SET ON**\n"); 03740000 03750000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7TDS; 03760000 // Set XTP7TDS to terminate 03770000 // the data set. 03780000 // printf("**XTP7TDS SET ON**\n"); 03790000 03800000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7EFFH; 03810000 // Set XTP7EFFH to eject to 03820000 // front facing before the job 03830000 // header 03840000 // printf("**XTP7EFFH SET ON**\n"); 03850000 03860000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7HDF; 03870000 // Set XTP7HDF to select the 03880000 // hardware default font 03890000 // printf("**XTP7HDF SET ON**\n"); 03900000 03910000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7HQUE; 03920000 // Set XTP7HQUE to hold the 03930000 // data set. 03940000 // printf("**XTP7HQUE SET ON**\n"); 03950000 03960000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7IPMF; 03970000 // Set XTP7IPMF to set mark 03980000 // forms request 03990000 // printf("**XTP7IPMF SET ON**\n"); 04000000 04010000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7IPOS; 04020000 // Set XTP7IPOS to offset stack04030000 // the interrupt message page 04040000 // printf("**XTP7IPOS SET ON**\n"); 04050000 04060000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP738MO; 04070000 // Set XTP738MO to set the 390004080000 // media origin to the 3800 04090000 // media origin for the user's 04100000 // dataset 04110000 // printf("**XTP738MO SET ON**\n"); 04120000 04130000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7MDSD; 04140000 // Set XTP7MDSD to send the 04150000 // message data set to a 04160000 // sysout data set 04170000 // printf("**XTP7MDSD SET ON**\n"); 04180000 04190000 // xtpptr->XTPRECP.XTPRECP7->XTP7RFLG |= XTP7C2SI; 04200000 // Set XTP7C2SI to convert a 04210000 // multiple-celled IM1 image 04220000 // to a single IOCA image. 04230000 // printf("\n**XTP7C2SI SET ON**\n"); 04240000 04250000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7JHMO; 04260000 // Set XTP7JHMO to set the job 04270000 // header media origin to the 04280000 // top left corner 04290000 // printf("\n**XTP7JHMO SET ON**\n"); 04300000 04310000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7JTMO; 04320000 // Set XTP7JTMO to set the job 04330000 // trailer media origin to the 04340000 // top left corner 04350000 // printf("**XTP7JTMO SET ON**\n"); 04360000 04370000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7DHMO; 04380000 // Set XTP7DHMO to set the data04390000 // set header media origin to 04400000 // the top left corner 04410000 // printf("**XTP7DHMO SET ON**\n"); 04420000 04430000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7MDMO; 04440000 // Set XTP7MDMO to set the 04450000 // message data set media 04460000 // origin to top left corner 04470000 // printf("**XTP7MDMO SET ON**\n"); 04480000 04490000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7WIDE; 04500000 // Set XTP7WIDE to indicate 04510000 // wide paper is being used 04520000 // printf("**XTP7WIDE SET ON**\n"); 04530000 04540000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFLG |= XTP7IHIB; 04550000 // Set XTP7IHIB to inhibit 04560000 // recovery 04570000 // printf("**XTP7IHIB SET ON**\n"); 04580000 04590000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG1 |= XTP7SDCH; 04600000 // Set XTP7SDCH to set default 04610000 // character for single byte 04620000 // printf("**XTP7SDCH SET ON**\n"); 04630000 04640000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG1 |= XTP7CINR; 04650000 // Set XTP7CINR to capture 04660000 // inline resources when 04670000 // connected via DPF or WPM 04680000 // printf("**XTP7CINR SET ON**\n"); 04690000 04700000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG1 |= XTP7SUCM; 04710000 // Set XTP7SUCM to suppress 04720000 // copy marks 04730000 // printf("**XTP7SUCM SET ON**\n"); 04740000 04750000 // xtpptr->XTPRECP.XTPRECP7->XTP7MFG2 |= XTP7ASAP; 04760000 // Set XTP7ASAP to gather 04770000 // AFP statistics for the 04780000 // printfile @EMA 04790000 // printf("**XTP7ASAP SET ON**\n"); @EMA 04800000 04810000 // memcpy(xtpptr->XTPRECP.XTPRECP7->XTP7PRMD,PRSOSI1, len); 04820000 // Set PRMODE to SOSI1 04830000 // printf("**PRMODE SET TO SOSI1**\n"); 04840000 04850000 // memcpy(xtpptr->XTPRECP.XTPRECP7->XTP7PRMD,PRSOSI2, len); 04860000 // Set PRMODE to SOSI2 04870000 // printf("**PRMODE SET TO SOSI2**\n"); 04880000 04890000 // memcpy(xtpptr->XTPRECP.XTPRECP7->XTP7PRMD,PRSOSI3, len); 04900000 // Set PRMODE to SOSI3 04910000 // printf("**PRMODE SET TO SOSI3**\n"); 04920000 04930000 // xtpptr->XTPRECP.XTPRECP7->XTP7ACSE = XTP7NCK; 04940000 // Set the CSE checking 04950000 // to not check to see 04960000 // if page fits 04970000 // printf("**XTP7ACSE SET TO XTP7NCK**\n"); 04980000 04990000 // xtpptr->XTPRECP.XTPRECP7->XTP7ACSE = XTP7CK1P; 05000000 // Set the CSE checking 05010000 // to check only 1st page 05020000 // to see if it fits 05030000 // printf("**XTP7ACSE SET TO XTP7CK1P**\n"); 05040000 05050000 // xtpptr->XTPRECP.XTPRECP7->XTP7ACSE = XTP7CKAP; 05060000 // Set the CSE checking 05070000 // to check all pages 05080000 // to see if they fit 05090000 // printf("**XTP7ACSE SET TO XTP7CKAP**\n"); 05100000 05110000 // xtpptr->XTPRECP.XTPRECP7->XTP7JOG = XTP7NONE; 05120000 // Set jogging to none 05130000 // @02A 05140000 // printf("**XTP7JOG SET TO NONE**\n"); 05150000 // @02A 05160000 // xtpptr->XTPRECP.XTPRECP7->XTP7JOG = XTP7DSET; 05170000 // Set jogging to dataset 05180000 // @02A 05190000 // printf("**XTP7JOG SET TO DATASET**\n"); 05200000 // @02A 05210000 // xtpptr->XTPRECP.XTPRECP7->XTP7JOG = XTP7JOB; 05220000 // Set jogging to job 05230000 // @02A 05240000 // printf("**XTP7JOG SET TO JOB**\n"); 05250000 // @02A 05260000 05270000 // ********** RRLV SETTINGS ****************** 05280000 05290000 // xtpptr->XTPRECP.XTPRECP7->XTP7RRLV.XTP7RPD = PDRRLV; 05300000 // Set the pagedef RRLV05310000 // printf("**PAGE DEF RRLV CHANGED**\n"); 05320000 05330000 // xtpptr->XTPRECP.XTPRECP7->XTP7RRLV.XTP7RFD = FDRRLV; 05340000 // Set the formdef RRLV05350000 // printf("**FORM DEF RRLV CHANGED**\n"); 05360000 05370000 // xtpptr->XTPRECP.XTPRECP7->XTP7RRLV.XTP7RPS = PSRRLV; 05380000 // Set the page segment05390000 // RRLV 05400000 // printf("**PAGE SEGMENT RRLV CHANGED**\n"); 05410000 05420000 // xtpptr->XTPRECP.XTPRECP7->XTP7RRLV.XTP7RCF = CFRRLV; 05430000 // Set the coded font 05440000 // RRLV 05450000 // printf("**CODED FONT RRLV CHANGED**\n"); 05460000 05470000 break; 05480000 05490000 default: // No match found - error 05500000 break; 05510000 } // End of select on the 05520000 // type of call 05530000 05540000 return; // Return with no error 05550000 } // End of main routine 05560000 05570000 05580000 05590000 05600000 05610000