Please excuse the top post. Have you seen this from https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ceeam00/ceeam109.htm :
<quote> Any AMODE 64 assembler routine that is used within the scope of a Language Environment application must use 64-bit XPLINK save area conventions. Note: 1. Language Environment-conforming AMODE 64 assembler main routines are not supported. 2. Language Environment does not support the linkage stack. </quote> Observer note #1. Now, I know _zero_ about 64 bit LE, but the above says, to me, "you can't get there from here" (not even by adding a "t"). On Wed, Jul 13, 2016 at 9:12 AM, Steve Austin <[email protected]> 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) > > > > > -- > This e-mail message has been scanned and cleared by Google Message Security > and the UNICOM Global security systems. This message is for the named > person's use only. If you receive this message in error, please delete it > and notify the sender. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > -- "Pessimism is a admirable quality in an engineer. Pessimistic people check their work three times, because they're sure that something won't be right. Optimistic people check once, trust in Solis-de to keep the ship safe, then blow everyone up." "I think you're mistaking the word optimistic for inept." "They've got a similar ring to my ear." >From "Star Nomad" by Lindsay Buroker: Maranatha! <>< John McKown ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
