COBOL Manual for TNS/E Programs (H06.03+)
Creating and Compiling HP COBOL Source
Programs
HP COBOL Manual for TNS/E Programs—520347-003
22-52
Compilation Summary
14. (p8) br.cond.dpnt.many .b1_8
15. DISPLAY STD-DATE
15. nop
15. nop
15. mov r34=r0
15. add r35=@gprel(pack_TESTT_STD-DATE_#),gp
15. ld4 r36=[r35]
15. nop
15. nop
15. nop
15. zxt4 r37=r36
15. add r38=128,r0
15. add r39=472,sp
15. add r40=r39,r34
15. add r41=8,r0
15. mov r49=r38
15. mov r50=r37
15. nop
15. nop
15. mov r51=r40
15. mov r52=r41
15. add r20=584,sp
15. nop
15. st8 [r20]=r34
15. nop
15. br.call.sptk b0=_SharedMilli_CQA#
15. add r20=496,sp
15. ld8 r34=[r20]
15. nop
15. mov gp=r34
15. movl r35=0xd000000000000000
15. nop
15. nop
15. add r36=472,sp
15. add r20=584,sp
15. ld8 r37=[r20]
15. nop
15. nop
15. nop
15. add r38=8,r37
15. mov r39=r0
15. mov r40=r0
15. mov r41=r0
15. nop
15. nop
15. mov r42=r0
15. mov r43=r0
15. add r44=16,sp
15. nop
15. st8 [r44]=r0
15. add r45=24,sp
15. nop
15. st8 [r45]=r0
15. add r46=32,sp
15. nop
Example 22-20. Symbolic Code Listing (page 5 of 23)










