PSGOE42 ;BIR/CML - REGULAR ORDER ENTRY (CONT.) ;Feb 02, 2022
Source file <PSGOE42.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
1 | ||
A1 | ;
|
|
A2 | ;; START NCC T4 MODS >> 327*RJS
|
|
5 | ; self med
|
|
A5 | ||
6 | ; hospital supplied self med
|
|
DONE | ;
|
|
FF | ; up-arrow to another field
|
|
DEL | ; delete entry
|
|
YN | ; yes/no as a set of codes
|
|
2 | ; dispense drug multiple
|
|
IND(OI) | ;*399-IND
|
|
INDA | ;
|
|
CIND | ;
|
|
DIFFIND(PSJDFN,PSJORD,PSJNEWVL) | ;
; PSJDFN = IEN of #2 (not required for non-verified orders) ; PSJORD = IEN of #53.1/55 + indication like "P","U","V", example = "4033P" ; PSJNEWVL the new value after editing ; returns: ; piece #1 ; 1=different than the previous value ; 0=no changes ; -1=new record, no previous values ; piece #2 = value before editing if any (current value in DB) ; piece #3 = new value |
Name | Line Occurrences |
---|---|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | Classic Fileman Calls, GET1^DIQ |
^PS(53.1 - [#53.1] | GET1^DIQ |
^PS(53.45 - [#53.45] | Classic Fileman Calls |
55.06 | GET1^DIQ |