LJFPV200 ;IHS/ORDC/LJF - DUPLICATE PROV DATA IN FILE 200; [ 04/27/93 1:03 PM ]
Source file <LJFPV200.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| END | ;***> eoj
|
|
| MOVE | ;**> SUBRTN to move licensure data to file 200 then delete in file 6
|
|
| 1 | ;;0;;PS
|
|
| START | ;EP; ENTRY POINT called by Kernel 7 post init
|
|
| 3 | ;;9999999;;9999999
|
|
| 2 | ;;.11;;.11
|
|
| 4 | ;;I;;I
|
|
| DUPL | ;**> SUBRTN to duplicate data into file 200
|
|
| MOVE1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|