©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ACGSGET ;IHS/OIRM/DSD/THL,AEF - ROUTINE TO GET CIS FILES FROM AREA MACHINES; [ 03/27/2000 2:22 PM ]
Source file <ACGSGET.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| Q | ;;
|
|
| EN | ||
| 244 | ;;bilbao;244
|
|
| 249 | ;;tucdev;24992
|
|
| 247 | ;;phx-ao;247
|
|
| 248 | ;;pordps;248
|
|
| 245 | ;;nav-aa;245
|
|
| EN1 | ;F ACGI=235,239,241:1:,249,285 S ACG=$P($T(@ACGI),";;",2) Q:ACG="" S ACGX="getfrom "_$P(ACG,";")_" /usr/mumps/acg"_$P(ACG,";",2)_".asc > /dev/null",ACGX=$$JOBWAIT^%HOSTCMD(ACGX)
|
|
| 241 | ;;abr-ab;241
|
|
| 246 | ;;okc-ao;246
|
|
| EXIT | ||
| 239 | ;;bji-ao;239
|
|
| 243 | ;;akproc;243
|
|
| 242 | ;;albaao;242
|
|
| 102 | ;;seattle;10292
|
|
| 235 | ;;cao-as;235
|
|
| DATA | ;;
|
|
| 161 | ;;dallas;16192
|
|
| 285 | ;;nsaoa;285
|
| Name | Line Occurrences |
|---|---|
| EN1 | EN |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACG | EXIT!, EN1+1* |
| ACGI | EXIT!, EN1+1* |
| ACGX | EXIT!, EN1+1* |
| Name | Field # of Occurrence |
|---|---|
| $T(@ACGI | EN1+1 |