SDES2CRTPRVRES ;ALB/LAB,TAW - VISTA SCHEDULING SDES2 CREATE PROVIDER RESOURCE ;JULY 30,2025
Source file <SDES2CRTPRVRES.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 3 | (BUILDJSON,ERRLOG)^SDES2JSON VALCONTEXT^SDES2VALCONTEXT VALFILEIEN^SDES2VALUTIL |
| Kernel | 2 | $$NOW^XLFDT DUZ^XUP |
| VA FileMan | 2 | UPDATE^DIE $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CREATEPRVRES(RESULT,SDCONTEXT,SDPARAM) | ; create provider resource record 409.831
|
|
| VALIDATE(ERRORS,SDPARAM) | ; validate input array variables
|
|
| ASSIGNVARS(PROVIDERIEN,RESOURCE) | ;assign variables to use
|
|
| CREATERESOURCE(RETURN,ERRORS,SDCONTEXT,SDPARAM,RESOURCE) | ;create the provider resource
|
| Name | Field # of Occurrence |
|---|---|
| UPDATE^DIE | CREATERESOURCE+7 |
| $$GET1^DIQ | ASSIGNVARS+1 |
| BUILDJSON^SDES2JSON | CREATEPRVRES+4, CREATEPRVRES+7, CREATEPRVRES+11, CREATEPRVRES+12 |
| ERRLOG^SDES2JSON | VALIDATE+6 |
| VALCONTEXT^SDES2VALCONTEXT | CREATEPRVRES+3 |
| VALFILEIEN^SDES2VALUTIL | VALIDATE+2, VALIDATE+3 |
| $$NOW^XLFDT | CREATERESOURCE+4 |
| DUZ^XUP | CREATEPRVRES+5 |
| RPC Name | Call Tags |
|---|---|
| SDES2 CREATE PROVIDER RESOURCE | CREATEPRVRES |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SDEC(409.831 - [#409.831] | VALIDATE+6 |
| Name | Line Occurrences |
|---|---|
| ASSIGNVARS | CREATEPRVRES+9 |
| CREATERESOURCE | CREATEPRVRES+10 |
| VALIDATE | CREATEPRVRES+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DUZ | CREATEPRVRES+5~, CREATERESOURCE+5 |
| ERRORS | CREATEPRVRES+1~, CREATEPRVRES+3, CREATEPRVRES+4, CREATEPRVRES+6, CREATEPRVRES+7, CREATEPRVRES+10, CREATEPRVRES+11, VALIDATE~, VALIDATE+2, VALIDATE+3 , VALIDATE+4, VALIDATE+6, CREATERESOURCE~ |
| ERRORS("ResourceIEN" | CREATEPRVRES+4*, CREATEPRVRES+7*, CREATEPRVRES+11* |
| FILEDATA | CREATERESOURCE+1~, CREATERESOURCE+7! |
| FILEDATA( | CREATERESOURCE+2*, CREATERESOURCE+3*, CREATERESOURCE+4*, CREATERESOURCE+5*, CREATERESOURCE+6* |
| NEWIEN | CREATERESOURCE+1~ |
| NEWIEN(1 | CREATERESOURCE+8 |
| PROVIDERIEN | ASSIGNVARS~, ASSIGNVARS+1 |
| RESOURCE | CREATEPRVRES+1~, CREATEPRVRES+9, CREATEPRVRES+10, ASSIGNVARS~, ASSIGNVARS+1*, CREATERESOURCE~, CREATERESOURCE+2 |
| RESULT | CREATEPRVRES~, CREATEPRVRES+4, CREATEPRVRES+7, CREATEPRVRES+11, CREATEPRVRES+12 |
| RETURN | CREATEPRVRES+1~, CREATEPRVRES+10, CREATEPRVRES+12, CREATERESOURCE~ |
| RETURN("ResourceIEN" | CREATERESOURCE+8* |
| SDCONTEXT | CREATEPRVRES~, CREATEPRVRES+3, CREATEPRVRES+10, CREATERESOURCE~ |
| SDCONTEXT("US | ER DUZ" , CREATEPRVRES+5 |
| SDDUZ | CREATEPRVRES+1~ |
| SDPARAM | CREATEPRVRES~, CREATEPRVRES+6, CREATEPRVRES+10, VALIDATE~, CREATERESOURCE~ |
| SDPARAM("ClinicIEN" | VALIDATE+1*, VALIDATE+2, CREATERESOURCE+6 |
| SDPARAM("ProviderIEN" | CREATEPRVRES+9, VALIDATE+3, VALIDATE+6, CREATERESOURCE+3 |