RMPVS925 ; OIT/JDA - SCAMP runtime support; Nov 17, 2024@23:35:37
Source file <RMPVS925.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TEST | ;test tag
|
|
| TEST2 | ;test tag
|
|
| RUN(REQUEST,RESPONSE) | ; set up input/output vars and run
|
|
| ERROR(MSG) | ; Set error return
|
|
| ISERROR() | ; If error, simulate up-arrow and return 1
|
|
| LOADVARS(REQUEST) | ; Load input variables into globals
|
|
| SETDFLT(PROP,DFLT) | ; Set defaults
|
|
| FIND6616 | ; Find the new record in file 661.6
|
|
| INIT | ; Initialization
|
|
| GET660 | ; Select appliance repair IEN
|
|
| DELED | ; Delete or edit
|
|
| TRAN | ; Transaction type
|
|
| PCAT | ; Patient category
|
|
| SPE | ; Special category
|
|
| BARC1 | ; Barcode
|
|
| CPT | ; Edit CPT prompt
|
|
| VEND | ; Vendor
|
|
| SOURCE | ; Source
|
|
| QTY | ; Quantity
|
|
| DATESERV | ; Date of service
|
|
| SER | ; Serial number
|
|
| LOT | ; Lot number
|
|
| REMA | ; Remarks
|
|
| POST | ; Post
|
|
| SITE | ; Site selection (669.9) "DIV+4^RMPRSIT"
|
| FileNo | Call Tags |
|---|---|
| ^RMPR(661.5 - [#661.5] | Classic Fileman Calls |