Validate International Securities Identification Number: Difference between revisions

Content added Content deleted

Inline

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