No. You can't have a 64-bit main written in assembler. While the 31-bit CEEENTRY macro has a MAIN=YES option, there isn't such a thing (as you've seen) in CELQPRLG.
In article <a68db43404da6a469b96e3e9a56f26c3ecf0f...@m4ukmbx1.intranet.macro4.com> you wrote: > Explanation > Errors were detected during initialization. > Reason code > Explanation > X'218' (536) > Language Environment initialization was requested for an AMODE 64 application > that does not contain a main. Specifically, the CELQMAIN CSECT is not present > in the program object or the CELQMAIN CSECT does not point to the main > routine (the address of the main is zero). One possible cause is that the > user attempted to invoke a DLL or fetchable routine as a main. > I tried including CELQMAIN, but the error still occurred. Can an assembler > program contain a main? If so, how is it done? > Thanks > Steve > Program source; > MAIN CELQPRLG DSASIZE=240,FETCHABLE=NO,PSECT=MAIN#A > MAIN ALIAS c'main' > CELQCALL __le_condition_token_build,(c_1,c_2,format,severity, x > control,facility_ID,i_s_info,cond_token,fc),WORKREG=15 > c_1 dc h'3' > c_2 dc h'5796' > format dc h'1' > severity dc h'3' > control dc h'1' > facility_ID dc c'CEE' > i_s_info dc f'0' > cond_token dc xl16'0' > fc dc xl16'0' > CELQEPLG > END > Assembly options; > NODECK,OBJECT,NOTERM,LIST(133),XREF(FULL),OPTABLE(ZS6,NOLIST),FLAG(NOALIGN),ASA,GOFF,NORENT' > Bind options; > MAP,RENT,DYNAM=DLL,CASE=MIXED,AMODE(64),RMODE(ANY) -- Don Poitras - SAS Development - SAS Institute Inc. - SAS Campus Drive [email protected] (919) 531-5637 Cary, NC 27513 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
