GMPLSAVE ; ISL/MKB,KER,JER,TC,PWC -- Save Problem List data ; April 09, 2019
Source file <GMPLSAVE.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Save Changes made to Existing Problem
|
|
| NOTES | ; Save Changes to Notes
|
|
| EXIT | ; Quit Saving Changes
|
|
| REFORM | ; Audit Entry that has been Reformulated
|
|
| REACTV | ; Audit Entry that has been Reactivated
|
|
| NEW | ; Save Collected Values in new Problem Entry
; Output DA (left defined) |
|
| NEWPROB(ICD,DFN) | ; Creates New Problem Entry in file #9000011
|
|
| NEWNOTE | ; Creates New Note Entries for Problem
; Requires GMPIFN Pointer to Problem ; GMPROV Current Provider ; GMPVAMC Facility |
|
| NN1 | ; Get New Note
|
|
| NNQ | ; Quit Getting New Notes
|
|
| NEXTNMBR(DFN,VAMC) | ; Returns Next Available Problem Number
|
|
| NTRTBULL(GMPY,GMPTERM,GMPSCT,GMPSRCH) | ; Send NTRT Request bulletin to NTRT mailgroup
|
|
| COEXPRS(GMPDA,GMPICD) | ; File multiple ICDs
|
|
| SPRCICD(GMPICD) | ; Is ICD string sparce (i.e., called from SDS API w/order > 2)?
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^AUPNPROB - [#9000011] | Classic Fileman Calls |