Jump to content

Validate International Securities Identification Number: Difference between revisions

Line 66:
=={{header|360 Assembly}}==
<lang 360asm>* Validate ISIN 08/03/2019
VALISIN CSECT assist plig\VALISINP
USING VALISIN,R13 base register
B 72(R15) skip savearea
Line 239:
PG DC CL80' ' buffer
XDEC DS CL12 temp for xdeco and xdeci
REGEQU number of lines: 433->175 (2.5)
END VALISIN assist plig\VALISINP</lang>
{{out}}
<pre>
1,392

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.